in die nächste Zeile Bewegen in einem DataGridView-Steuerelement in Visual Basic.NET -Anwendung mithilfe von ein paar DataGridView Eigenschaften . Ein DataGridView-Steuerelement bietet eine leistungsstarke und flexible Möglichkeit, Daten in tabellarischer Form angezeigt . Verwenden Sie dieses Steuerelement , um Daten durch den Benutzer oder aus anderen Quellen wie einer Datenbank gefüllt zeigen . Benutzen Sie den " CurrentRow " und " CurrentCell " Eigenschaften , um zur nächsten Zeile zu bewegen. Things You
Microsoft Visual Studio
brauchen anzeigen Weitere Anweisungen
1
Starten Sie Microsoft Visual Studio , klicken Sie auf "Neues Projekt" aus dem linken Bereich des Bildschirm Ihres Computers , und erweitern " Visual Basic " unter " Installierte Vorlagen . " Klicken Sie "Windows " und doppelklicken Sie auf "Windows Forms Application" aus der Mitte der Dialog um ein neues Projekt zu erstellen.
2
Doppelklicken Sie auf " DataGridView " aus der " Toolbox " pane hinzufügen eine in das Formular. Klicken Sie doppelt auf "Button" , um eine neue Schaltfläche, um Ihre Form hinzufügen.
3
Doppelklicken Sie auf das Formular, um eine Form Load-Ereignis zu erstellen , und fügen Sie den folgenden Code zu vier Zeilen mit Daten hinzufügen zum " DataGridView : " . . .
DataGridView1.ColumnCount = 2
DataGridView1
RowHeadersVisible = False
Columns (0) Name = " FName "
. Columns (1). Name =" LName "
End With
Dim GridRow As String () = {" John "," Smith "}
Dim gridRow1 As String () = {" Kitzia ", " Ramos "}
Dim gridRow2 As String () = {" Oscar ", " Gonzalez "}
Dim gridRow3 As String () = {" Alan ", " Duran "}
Mit
4
Schalter zurück zur Design-Ansicht und doppelklicken Sie auf " Button1 " zu bilden, um ein Click-Ereignis für die Schaltfläche erstellen. Fügen Sie den folgenden Code, um in die nächste Zeile zu bewegen , jedesmal wenn Sie auf den Button :
Dim As Integer = lastRowNum _
( Me.DataGridView1.Rows.Count - 1 - 1)
Dim curDataGridViewRow Wie DataGridViewRow = _
DataGridView1.CurrentRow
Dim As Integer = curRowNum curDataGridViewRow.Index
( curRowNum > = lastRowNum ) Then
MsgBox (" Keine Zeilen mehr " )
Else
Dim NextRow Wie DataGridViewRow = _
DataGridView1.Rows ( curRowNum + 1) german
DataGridView1.CurrentCell = nextRow.Cells (0)
nextRow.Selected = True End If
5
Presse "F5" , um das Programm zu starten , und klicken Sie " Button1 ", um in die nächste Zeile zu navigieren.