. DataGrid-kontrollen i Microsoft Visual Basic for NET ( VB.NET ) visar tabelldata på Windows Forms . Den DataGridBoolColumn sub - kontroll skapar kolonnen med en kryssruta , som accepterar och visar sanna eller falska värden för motsvarande datatypen Boolean . Det spårar BoolValChanged händelse som inträffar när kryssrutan värdet på blanketten ändras . Det booleskt värde kan förändras , om du klickar i cellen , eller tryck på tangenten mellanslag . Du måste peka föraren kolumnen händelsen till cellen för att hämta de booleska data för DataGrid -kontroll i VB.NET . Instruktioner
1
Klicka på "Start " -knappen i Windows och välj " Microsoft Visual Studio " från " Alla program " -menyn .
2
Klicka på " File" " öppna " och öppna VB.NET program som du vill hämta de booleska data för DataGrid -kontroll i VB.NET .
3
Lägg till följande kod efter " DataGridBoolColumn " linje i din VB.NET program .
Public Event BoolValueChanged _
BoolValueChangedEventHandler
Skyddade Överlast Åsidosätter Sub Edit ( ... ) katalog
Me.lockValue = Sant
Me.beingEdited = Sant
Me.saveRow = rowNum
Me.saveValue = CBool ( _
MyBase.GetColumnValueAtRow ( _
[ källa ] , rowNum ) ) katalog
MyBase.Edit ( ... ) katalog
End Sub ' Redigera
Public Event BoolValueChanged _
Som BoolValueChangedEventHandler
Skyddade Överlast Åsidosätter Sub Edit ( ... ) katalog
Me.lockValue = Sant
Me.beingEdited = Sant
Me.saveRow = rowNum
Me.saveValue = CBool ( _
MyBase.GetColumnValueAtRow ( _
[ källa ] , rowNum ) ) katalog
MyBase.Edit ( . .. ) katalog
End Sub "Redigera
Private Sub ManageBoolValueChanging ( _
ByVal rowNum As Integer , _
ByVal colNum As Integer ) katalog
Dim mousePos _
Point = Me.DataGridTableStyle.DataGrid.PointToClient ( _
Control.MousePosition ) katalog
Dim dg Som DataGrid = Me.DataGridTableStyle.DataGrid
Dim isClickInCell As Boolean = _
Control.MouseButtons = MouseButtons.Left andalso _
dg.GetCellBounds ( dg.CurrentCell ) . Innehåller ( mousePos ) katalog
Dim byte As Boolean = _
dg.Focused andalso isClickInCell _
OrElse GetKeyState ( VK_SPACE ) < 0
p Om inte lockValue andalso _
beingEdited andalso _
förändras andalso _
saveRow = rowNum Sedan
saveValue = Inte saveValue
lockValue = False
4
Klicka på "File ", " Spara " för att spara VB.NET program som du lagt till hämtning i DataGrid Boolean uppgifterna .