Lancering Microsoft Visual Studio , klikt u op " New Project" van het linkerpaneel van uw computerscherm , en uitbreiden " Visual Basic " onder " Installed Sjablonen . " Klik op " Windows " en dubbelklik op " Windows Forms Application " van het centrum van het dialoogvenster om een ​​nieuw project aan te maken .

Dubbelklik op " Datagridview " 2 van de " Toolbox " deelvenster toe te voegen een aan uw formulier . Dubbelklik op " knop" om een nieuwe knop toe te voegen aan uw formulier .
3

Dubbelklik op het formulier om een formulier load gebeurtenis te maken en voeg de volgende code toe aan vier rijen gegevens toe te voegen aan de " DataGridView : " . . .

DataGridView1.ColumnCount = 2

met DataGridView1

RowHeadersVisible = False

Columns ( 0 ) Name = " FName "

. Columns
( 1 ) . Name = " lNaam "

End
Met

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 " }

Met Met

Switch 4 terug naar het ontwerp bekijken en dubbelklik op " Button1 " te vormen om een click event voor de knop te maken . Voeg de volgende code aan iedere keer dat u op de knop naar de volgende rij :

Dim lastRowNum
als Geheel _

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

Dim curDataGridViewRow > Zoals DataGridViewRow = _

DataGridView1.CurrentRow

Dim curRowNum
As Integer = curDataGridViewRow.Index

Als ( curRowNum > = lastRowNum ) dan < br ( " Geen rijen meer " ) op Twitter

Else

Dim nextRow
Zoals DataGridViewRow = _

DataGridView1.Rows
( curRowNum + 1 ) op Twitter <

MsgBox > > DataGridView1.CurrentCell = nextRow.Cells ( 0 )

nextRow.Selected = True

Eind
Als

Druk op " F5 " 5 om het programma uit te voeren en klik " Button1 " om naar de volgende rij .