ubiquitour.com

Cómo definir una información sobre herramientas personalizada en una columna de DataGridView

Cómo definir una información sobre herramientas personalizada en una columna de DataGridView

Agregando ToolTips personalizados en celdas para una columna DataGridView con Visual Basic puede ayudarle a comunicar más información sobre una célula particular a usuarios como aportando una descripción alternativa del contenido de la celda. Un control DataGridView muestra datos en formato tabular similar a una tabla de base de datos relacional. Utilizar el evento "CellFormatting" para ejecutar código que cambia la propiedad "ToolTipText" para una celda determinada. Información sobre herramientas se usa para mostrar las explicaciones de texto en las filas que muestran imágenes.

Instrucciones

1 Inicie Microsoft Visual Studio, haga clic en "Nuevo proyecto" en el panel izquierdo de la pantalla del ordenador y expandir "Visual Basic" debajo de "Installed plantillas." Haga clic en "Windows" y haga doble clic en "Aplicación de Windows Forms" del centro de la ventana de diálogo para crear un nuevo proyecto.

2 Haga doble clic en "DataGridview" desde el panel "Toolbox" para agregar uno a su forma. Haga doble clic en el formulario para crear un evento de load del formulario. Copie y pegue el siguiente código para rellenar el "DataGridView" con los datos:

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

Cambiar de nuevo a formar diseño y haga clic en el control de "DataGridView" y haga clic en "Propiedades". Haga clic en el icono de "Evento" que se asemeja a un rayo y doble clic al lado de "CellFormatting" para crear este evento.

4 Agregue el código siguiente para mostrar un TooTip personalizado para cada celda en la columna "Descripción":

Si e.ColumnIndex = Me.DataGridView1.Columns("Description"). _ Índice

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

Presione "F5" para ejecutar el programa y mueva el cursor del ratón sobre cada celda de la columna de descripción.