την εφαρμογή Microsoft Visual Studio , κάντε κλικ στο " New Project" από το αριστερό τμήμα του παραθύρου της οθόνης του υπολογιστή σας , και επεκτείνουν " Visual Basic " κάτω " εγκατεστημένα πρότυπα . " Κάντε κλικ στο "Windows" και κάντε διπλό κλικ στο " Windows Forms Application " από το κέντρο του παραθύρου διαλόγου για να δημιουργήσετε ένα νέο έργο . 2
διπλό κλικ στο " datagridview " από την " Toolbox" παράθυρο για να προσθέσετε ένα στη φόρμα σας . Κάντε διπλό κλικ στη φόρμα για να δημιουργήσετε ένα συμβάν φόρτωσης της φόρμας . Αντιγράψτε και επικολλήστε τον παρακάτω κώδικα για να συμπληρώσετε το " DataGridView " με δεδομένα:
DataGridView1.ColumnCount = 2
Με DataGridView1
RowHeadersVisible = False
. . Στήλες ( 0 ) . Name = "ID "
. Στήλες ( 1 ) . Name = " Περιγραφή "
End With
Dim gridRow As String ( ) = { " 3 " , " Αυτοκίνητο " }
Dim gridRow1 As String ( ) = { " 4 " , " Truck" }
Dim gridRow2 As String ( ) = { " 5 " , " Μοτοσικλέτα " }
Dim gridRow3 As String ( ) = { " 6 " , " SUV " }
Με Με
εικόνων 3
Επιστρέψτε για να σχηματίσουν το σχεδιασμό και κάντε δεξί κλικ στο " DataGridView " ελέγχου και κάντε κλικ στο " Ιδιότητες". Κάντε κλικ στο εικονίδιο " Event" που μοιάζει με μια απεργία αστραπής και κάντε διπλό κλικ δίπλα στο " CellFormatting " για να δημιουργήσετε αυτό το γεγονός .
Η 4
Προσθέστε τον ακόλουθο κώδικα για να εμφανίσετε ένα TooTip για κάθε κελί στο " " στήλη :
Αν e.ColumnIndex = Me.DataGridView1.Columns Περιγραφή ( « Περιγραφή » ) Δείκτης _
andalso ( e.Value isnot τίποτα) Στη συνέχεια
Με . Me.DataGridView1.Rows ( e.RowIndex ) . κύτταρα ( e.ColumnIndex )
Αν e.Value.Equals ( " Αυτοκίνητο ") Στη συνέχεια
. ToolTipText = " πολύ κακή "
ElseIf e.Value.Equals ( "SUV ") Στη συνέχεια
. ToolTipText = " κακό "
ElseIf e.Value.Equals ( « Μοτοσικλέτας ") Στη συνέχεια
. ToolTipText = " καλό "
ElseIf e.Value.Equals ( " Truck ") Στη συνέχεια
. ToolTipText = " very good"
End If
End With
End If
5
Πατήστε το " F5 " για να τρέξει το πρόγραμμα και να μετακινήσετε το δείκτη του ποντικιού σας πάνω από κάθε κελί της στήλης περιγραφής .
Η
εικόνων
Πνευματικά δικαιώματα © Γνώση Υπολογιστών Όλα τα δικαιώματα κατοχυρωμένα