DataGridViewのセルをenterキーで横移動したいです。

VB.NET2005にてDataGridviewのセルを横移動させたいんです。
いろんな物を参考に以下のプログラムを何とかプログラムを組んでみましたが、ビルド時セル（0,0）→セル（0,1）→セル（0,2）→セル（0,3）・・・と1行目がenterキーで移動できず、2行目へ下がってしまいます。2行目からは横移動できるようになりました。
1週間近く試行錯誤しましたが、うまく動きません。
訂正箇所を教えていただけないでしょうか？
よろしくお願いします。

いまの行と列の取得
Dim currentRow As Integer = Me.DataGridView1.CurrentRow.Index
Dim currentColumn As Integer = Me.DataGridView1.CurrentCell.ColumnIndex
Dim nextColumn As Integer = currentColumn + 1
Dim nextRow As Integer = currentRow
'押したキーがENTERだったら
Dim t As Object
t = e.KeyCode()
If t = 13 Then
If nextColumn = 6 Then '列数が最終列を超えたとき
nextColumn = 0 '最初の列数へ
Else
nextRow -= 1
End If
MessageBox.Show("nextColumn =" & nextColumn & "nextRow = " & nextRow)
Try
Me.DataGridView1.CurrentCell = Me.DataGridView1(nextColumn, nextRow)
Catch
If Not (Me.DataGridView1.CurrentCell Is Nothing) Then
nextColumn = 0
nextRow = 0
Me.DataGridView1.CurrentCell = Me.DataGridView1(nextColumn, nextRow)
Exit Sub
Else
Me.DataGridView1.CurrentCell = Me.DataGridView1(nextColumn, nextRow)
Exit Sub
End If
End Try
End If

No.2 ベストアンサー 回答者： naganaga_001 回答日時： 2006/12/15 13:16

連続投稿すみません

VB で実装してあるページを見つけました。
http://www.vbstation.net/tips/inherits_control.htm

この回答へのお礼

ありがとうございます。
横移動できました。

お礼日時：2006/12/16 00:04

No.1 回答者： naganaga_001 回答日時： 2006/12/14 16:30

お世話になります。

GDNJ の過去ログで同じようなスレッドがあったようです。（C# ですが）
http://www.microsoft.com/japan/msdn/community/gd …