Aggiunta di descrizioni comandi personalizzati nelle celle di una colonna di DataGridView utilizzando Visual Basic può aiutarvi a comunicare più informazioni su una particolare cella agli utenti ad esempio fornendo una descrizione alternativa del contenuto della cella. Un controllo DataGridView Visualizza i dati in formato tabulare simile a una tabella di database relazionale. Utilizzare l'evento "CellFormatting" per eseguire il codice che cambia la proprietà di "ToolTipText" per una determinata cella. Le descrizioni comandi sono comunemente usati per visualizzare le spiegazioni del testo sulle righe che visualizzano le immagini.

Istruzioni

1

Avviare Microsoft Visual Studio, fare clic su "Nuovo progetto" dal riquadro sinistro dello schermo del computer ed espandere "Visual Basic" sotto "Modelli installati." Fare clic su "Windows" e fare doppio clic su "Windows Forms Application" dal centro della finestra di dialogo per creare un nuovo progetto.

2

Fare doppio clic "DataGridview" dal riquadro "Toolbox" per aggiungerne uno al form. Fare doppio clic sul form per creare un evento di caricamento del modulo. Copiare e incollare il codice seguente per popolare il "DataGridView" con i dati:

DataGridView1.ColumnCount = 2

With DataGridView1

.RowHeadersVisible = False

.Columns(0).Name = "ID"

.Columns(1).Name = "Description"

End With

Dim gridRow As String() = {"3", "Car"}

Dim gridRow1 As String() = {"4", "Truck"}

Dim gridRow2 As String() = {"5", "Motorcycle"}

Dim gridRow3 As String() = {"6", "SUV"}

With Me.DataGridView1.Rows

.Add(gridRow)

.Add(gridRow1)

.Add(gridRow2)

.Add(gridRow3)

End With3

Tornare al modulo progettazione e tasto destro del mouse il controllo "DataGridView" e scegliere "Proprietà". Fare clic sull'icona di "Evento" che assomiglia ad un colpo di lampo e fare doppio clic su accanto a "CellFormatting" per creare questo evento.

4

Aggiungere il codice seguente per visualizzare un ToolTip personalizzato per ogni cella nella colonna "Descrizione":

Se ColumnIndex = Me.DataGridView1.Columns("Description"). Index _

AndAlso (e.Value IsNot Nothing) Then

With Me.DataGridView1.Rows(e.RowIndex).Cells(e.ColumnIndex)

If e.Value.Equals("Car") Then

.ToolTipText = "very bad"

ElseIf e.Value.Equals("SUV") Then

.ToolTipText = "bad"

ElseIf e.Value.Equals("Motorcycle") Then

.ToolTipText = "good"

ElseIf e.Value.Equals("Truck") Then

.ToolTipText = "very good"

End If

End With

End If5

Premere "F5" per eseguire il programma e spostare il cursore del mouse su ciascuna cella della colonna Descrizione.