. DataGrid kontrol med Microsoft Visual Basic for NET ( VB.NET ) viser tabeldata på Windows Forms. Den DataGridBoolColumn sub- kontrol skaber søjlen med et afkrydsningsfelt , der accepterer og viser sande eller falske værdier for repræsenterer den booleske datatype. Det sporer BoolValChanged begivenhed, der indtræffer , når afkrydsningsfeltet værdi på form ændres . Den booleske værdi kan ændre sig, hvis du klikker på cellen , eller tryk på mellemrumstasten nøgle. Du er nødt til at pege kolonnen hændelseshandler til cellen for at hente de booleske data DataGrid kontrol VB.NET . Instruktioner
1
Klik på "Start " knappen i Windows og vælg "Microsoft Visual Studio" fra " Alle programmer " menuen.
2
Klik på " File" "Open" og åbne VB.NET program, hvor du ønsker at hente de booleske data DataGrid kontrol VB.NET .
3
Føj følgende kode efter " DataGridBoolColumn " linjen i din VB.NET program.
offentlig begivenhed BoolValueChanged _
p Som BoolValueChangedEventHandler
Beskyttede Overbelastninger Tilsidesætter Sub Edit (...)
Me.lockValue = Sand
Me.beingEdited = Sand
Me.saveRow = rowNum
Me.saveValue = CBool (_
MyBase.GetColumnValueAtRow (_ < br >
[ source ] rowNum ) )
MyBase.Edit (...)
End Sub 'Rediger
offentlig begivenhed BoolValueChanged _
< p > Som BoolValueChangedEventHandler
Beskyttede Overbelastninger Tilsidesætter Sub Edit (...)
Me.lockValue = Sand
Me.beingEdited = Sand
Me.saveRow = rowNum
Me.saveValue = CBool (_
MyBase.GetColumnValueAtRow (_
[ source ] rowNum ) )
MyBase.Edit ( . ..)
End Sub 'Rediger
Private Sub ManageBoolValueChanging (_
ByVal rowNum As Integer , _
ByVal colNum As Integer )
Dim mousePos _
p Som punkt = Me.DataGridTableStyle.DataGrid.PointToClient (_
Control.MousePosition )
Dim dg Som DataGrid = Me.DataGridTableStyle.DataGrid
Dim isClickInCell Som Boolean = _
Control.MouseButtons = MouseButtons.Left andalso _
dg.GetCellBounds ( dg.CurrentCell ) . Indeholder ( mousePos )
< p> Dim forandring Som Boolean = _
dg.Focused andalso isClickInCell _
OrElse GetKeyState ( VK_SPACE ) < 0
p Hvis ikke lockValue andalso _
< p > beingEdited andalso _
skiftende andalso _
saveRow = rowNum Så
saveValue = Ikke saveValue
lockValue = False
4 < p> Klik på "Filer ", " Gem" for at gemme VB.NET program, hvor du har tilføjet indhentning af DataGrid booleske data.