DataGridViewでの例外

環境/言語:[WindowsXP、VB.NET]
分類:[.NET]

DataGridView内にIPアドレスを入力して、実行ボタンを押したらpingを打っていく
というプログラムを作っているのですが。途中で例外が発生し
『オブジェクト参照がオブジェクトインスタンスに設定されておりません』
と出ます。どのようにしたらよろしいでしょうか。

'変数宣言
Private reply() As System.Net.NetworkInformation.PingReply

'ここから実行ボタンｲﾍﾞﾝﾄ
Dim rows As String
rows = DataGridView1.Rows.Count
ReDim reply(rows)

For i As Integer = 0 To rows

Dim ip(rows) As String
ip(i) = DataGridView1.Item(0, i).Value

If reply(i).Status = Nothing Then　←ここで例外が発生

Else
reply(i) = p.Send(ip(i).ToString)

If reply(i).Status = System.Net.NetworkInformation.IPStatus.Success Then
DataGridView1.Item(2, i).Value = "○"
Else
DataGridView1.Item(2, i).Value = "×"
End If
End If

Next i

■No25552に返信(きなこさんの記事)
> '変数宣言
> Private reply() As System.Net.NetworkInformation.PingReply
PingReply クラスの配列、この時点では初期化されておらず、
reply は Nothing な状態ですね。

> ReDim reply(rows)
ここで rows + 1 個分の配列が用意されます。
ただし、それぞれの reply(0)〜reply(rows) はまだ Nothing です。

> If reply(i).Status = Nothing Then　←ここで例外が発生
この時点で、reply(i) は Nothing です。
何も無いところから、Status プロパティを見る事はできません。

それと、「 = Status」という比較式も不自然です。
この部分では、何を判定しようとしているのでしょうか?