. Del controllo DataGrid di Microsoft Visual Basic NET ( VB.NET ) visualizza i dati della tabella sui Windows Forms . Il DataGridBoolColumn sotto- controllo crea la colonna con una casella di controllo , che accetta e visualizza valori true o false per rappresentare il tipo di dati booleano . Tiene traccia l'evento BoolValChanged che si verifica quando il valore della casella di controllo sulla forma cambia . Il valore booleano può cambiare , se si fa clic nella cella , o premere il tasto barra spaziatrice . È necessario puntare il gestore di eventi colonna alla cella in modo da recuperare i dati booleani del controllo DataGrid in VB.NET . Istruzioni
1
Fare clic sul pulsante "Start " di Windows e selezionare " Microsoft Visual Studio " dal menu " Tutti i programmi " .
2
Fare clic su " File ", "Open" e programma open VB.NET in cui si desidera recuperare i dati booleani del controllo DataGrid in VB.NET .
3
Aggiungere il seguente codice dopo la riga " DataGridBoolColumn " nel programma VB.NET .
pubblica evento BoolValueChanged _
BoolValueChangedEventHandler
Sovraccarico protette Overrides Sub Modifica ( ...) in
Me.lockValue = True
Me.beingEdited = True
Me.saveRow = rOWNUM
Me.saveValue = CBool ( _
MyBase.GetColumnValueAtRow ( _ < br >
[ fonte ] , rOWNUM ) ) per
MyBase.Edit ( ...) in
End Sub ' Modifica
Public Event BoolValueChanged _
< p > Come BoolValueChangedEventHandler
Sovraccarico protette Overrides Sub Modifica ( ...) in
Me.lockValue = True
Me.beingEdited = True
Me.saveRow = rOWNUM
Me.saveValue = CBool ( _
MyBase.GetColumnValueAtRow ( _
[ fonte ] , rOWNUM ) ) per
MyBase.Edit ( . ..)
End
'Sub Modifica
private Sub ManageBoolValueChanging ( _
ByVal rOWNUM As Integer , _ ByVal
colNum As Integer ) per
Dim mousePos _
Point = Me.DataGridTableStyle.DataGrid.PointToClient ( _
Control.MousePosition ) per
Dim dg Come DataGrid = Me.DataGridTableStyle.DataGrid
Dim isClickInCell As Boolean = _
Control.MouseButtons = MouseButtons.Left AndAlso _
dg.GetCellBounds ( dg.CurrentCell ) . Contiene ( mousePos ) per < p > Dim cambiando As Boolean = _
dg.Focused AndAlso isClickInCell _
OrElse GetKeyState ( VK_SPACE ) < 0
Se Non lockValue AndAlso _
< p > beingEdited AndAlso _
cambiando
AndAlso _
saveRow = rOWNUM Poi
saveValue = Non saveValue
lockValue =
False
4 < p > Fare clic su " File ", "Salva" per salvare il programma VB.NET nel quale si è aggiunto il recupero dei dati DataGrid booleani .