την εφαρμογή Microsoft Visual Studio , κάντε κλικ στο " New Project" από το αριστερό τμήμα του παραθύρου της οθόνης του υπολογιστή σας , και επεκτείνουν " Visual Basic " κάτω " εγκατεστημένα πρότυπα . " Κάντε κλικ στο "Windows" και κάντε διπλό κλικ στο " Windows Forms Application " από το κέντρο του παραθύρου διαλόγου για να δημιουργήσετε ένα νέο έργο . 2
διπλό κλικ στο " datagridview " από την " Toolbox" παράθυρο για να προσθέσετε ένα στη φόρμα σας . Κάντε διπλό κλικ στο " κουμπί" για να προσθέσετε ένα νέο κουμπί στη φόρμα σας .
Εικόνων 3
διπλό κλικ στη φόρμα για να δημιουργήσετε ένα συμβάν φόρτωσης της φόρμας και προσθέστε τον παρακάτω κώδικα για να προσθέσει τέσσερις γραμμές δεδομένων στο « DataGridView : "
DataGridView1.ColumnCount = 2
με DataGridView1
RowHeadersVisible = False
Στήλες ( 0 ) Το όνομα = " . . . ΟΝΟΜΑ "
. Στήλες ( 1 ) . Όνομα = " ΕΠΙΘΕΤΟ "
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 " }
Με Με τη
4
Επιστρέψτε για να σχηματίσουν άποψη σχεδιασμού και κάντε διπλό κλικ στο " Button1 " για να δημιουργήσετε ένα συμβάν κλικ του κουμπιού . Προσθέστε τον ακόλουθο κώδικα για να μετακινηθείτε στην επόμενη γραμμή κάθε φορά που κάνετε κλικ στο κουμπί :
Dim lastRowNum As Integer = _
( Me.DataGridView1.Rows.Count - 1 - 1 )
Dim curDataGridViewRow Όπως DataGridViewRow = _
DataGridView1.CurrentRow
Dim curRowNum As Integer = curDataGridViewRow.Index
Αν ( curRowNum > = lastRowNum ) Στη συνέχεια,
MsgBox ( "No more σειρές" )
υπόλοιπα
Dim nextRow Όπως DataGridViewRow = _
DataGridView1.Rows ( curRowNum + 1 )
DataGridView1.CurrentCell = nextRow.Cells ( 0 )
nextRow.Selected = True
End If
5
Πατήστε το " F5 " για να εκτελέσετε το πρόγραμμα και κάντε κλικ " Button1 " για να μεταβείτε στην επόμενη σειρά .
Η
εικόνων
Πνευματικά δικαιώματα © Γνώση Υπολογιστών Όλα τα δικαιώματα κατοχυρωμένα