07/07/27 13:50:09
>>348
表示位置を管理する変数のことですよ。
Dim iSelectRow As Integer = 0 ' 表示位置
Dim tblData As DataTable ' 住所録
tblDataの中にID、名前、住所が入っているとして
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
IF iSelectRow < tblData.Rows.Count - 1 THEN
' 次の行を選択
iSelectRow += 1
' IDの取得
TextBox1.Text = tblData.Rows(iSelectRow)(0).Value
' 名前の取得
TextBox2.Text = tblData.Rows(iSelectRow)(1).Value
' 住所の取得
TextBox3.Text = tblData.Rows(iSelectRow)(2).Value
END IF
End Sub