Come recuperare i dati booleani di DataGrid per VB.NET

. 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 ( _

[ fonte ] , rOWNUM ) ) per

MyBase.Edit ( ...) in

End Sub ' Modifica

Public Event BoolValueChanged _

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

Dim cambiando As Boolean = _

dg.Focused AndAlso isClickInCell _

OrElse GetKeyState ( VK_SPACE ) < 0

Se Non lockValue AndAlso _

beingEdited AndAlso _
cambiando

AndAlso _

saveRow = rOWNUM Poi

saveValue = Non saveValue

lockValue =
False
4

Fare clic su " File ", "Salva" per salvare il programma VB.NET nel quale si è aggiunto il recupero dei dati DataGrid booleani .

• Come determinare la casella di controllo è selezionata in Visual Basic Net 
• Come connettersi a MS SQL con VBScript