Flyt til næste række i en DataGridView kontrol i din Visual Basic.NET ansøgning at bruge et par DataGridView egenskaber. En DataGridView kontrol giver en kraftfuld og fleksibel måde at vise data i et tabelformat . Brug denne kontrol for at vise data befolket af brugeren eller fra andre kilder, såsom en database. Brug " CurrentRow " og " CurrentCell " egenskaber til at flytte til den næste række. Ting du skal
Microsoft Visual Studio
Vis Flere Instruktioner
1

Launch Microsoft Visual Studio , klik på " Nyt projekt " fra venstre rude på din computerskærm , og expand " Visual Basic " under " Installerede skabeloner ". Klik på " Windows" og dobbeltklik på "Windows Forms Application " fra midten af dialogvinduet for at oprette et nyt projekt.
2

Dobbeltklik på " datagridview " fra " Toolbox" ruden for at tilføje en til din formular . Dobbeltklik på " Button " for at tilføje en ny knap til formularen .
3

Dobbeltklik på formularen for at oprette en form load begivenhed og tilføje følgende kode til at tilføje fire rækker af data til " DataGridView : " . . .

DataGridView1.ColumnCount = 2

DataGridView1

RowHeadersVisible = False

kolonner ( 0) = " fname "

. kolonner ( 1). Name =" lname "

End With

Dim gridRow As String () = {" John " , " Smith "} < br >

Dim gridRow1 As String () = {" Kitzia ", " Ramos "}

Dim gridRow2 As String () = {" Oscar ", " Gonzalez "}

Dim gridRow3 As String () = {" Alan ", " Duran "}

Med
4

Skift tilbage til at danne design visning og dobbeltklik på " Button1 " for at oprette et klik begivenhed for knappen. Føj følgende kode til at flytte til den næste række , hver gang du klikker på knappen : Hej

Dim lastRowNum As Integer = _

( Me.DataGridView1.Rows.Count - 1 - 1 ) < br >

Dim curDataGridViewRow Som DataGridViewRow = _

DataGridView1.CurrentRow

Dim curRowNum As Integer = curDataGridViewRow.Index
p Hvis ( curRowNum > = lastRowNum ) Derefter < br >

MsgBox ( " ikke flere rækker " )

Else

Dim nextRow Som DataGridViewRow = _

DataGridView1.Rows ( curRowNum + 1)
< p > DataGridView1.CurrentCell = nextRow.Cells (0)

nextRow.Selected = Sand

End If
5

Tryk på " F5 " for at køre programmet, og klik på " Button1 " for at navigere til den næste række.