. O controle DataGrid do Microsoft Visual Basic for NET ( VB.NET ) exibe os dados da tabela sobre os Windows Forms. O sub- controle DataGridBoolColumn cria a coluna com uma caixa de seleção , que aceita e exibe valores verdadeiros ou falsos para representar o tipo de dados booleano . Ele rastreia o evento BoolValChanged que ocorre , quando o valor de caixa de seleção sobre as mudanças de forma. O valor booleano pode mudar , se você clicar na célula, ou pressione a tecla barra de espaço. Você precisa apontar o manipulador de eventos da coluna para a célula , a fim de recuperar os dados booleanos do controle DataGrid em VB.NET . Instruções
1
Clique no botão " Iniciar" do Windows e selecione " Microsoft Visual Studio " no menu "Todos os Programas " .
2
Clique no botão " Arquivo" "Abrir" e VB.NET programa aberto, no qual você deseja recuperar os dados booleanos do controle DataGrid em VB.NET .
3
Adicione o seguinte código após a linha " DataGridBoolColumn " em seu programa de VB.NET .
Pública BoolValueChanged Evento _
Como BoolValueChangedEventHandler
Sobrecargas Protected Overrides Sub Edit ( ... )
Me.lockValue = True
Me.beingEdited = True
Me.saveRow = rowNum
Me.saveValue = CBool (_
MyBase.GetColumnValueAtRow (_ < br >
[fonte ] , rowNum ) )
MyBase.Edit ( ... )
End Sub 'Edit
Feriado BoolValueChanged _
Como BoolValueChangedEventHandler
Sobrecargas Protected Overrides Sub Edit ( ... )
Me.lockValue = True
Me.beingEdited = True
Me.saveRow = rowNum
Me.saveValue = CBool (_
MyBase.GetColumnValueAtRow (_
[fonte ] , rowNum ) )
MyBase.Edit ( . ..)
End Sub 'Edit
Private Sub ManageBoolValueChanging (_
ByVal rowNum As Integer , _ ByVal
colNum As Integer)
Dim mousePos _
Como Ponto = Me.DataGridTableStyle.DataGrid.PointToClient (_
Control.MousePosition )
Dim dg Como DataGrid = Me.DataGridTableStyle.DataGrid
Dim isClickInCell As Boolean = _
Control.MouseButtons = MouseButtons.Left AndAlso _
dg.GetCellBounds ( dg.CurrentCell ) . Contém ( mousePos )
mudança Dim As Boolean = _
dg.Focused AndAlso isClickInCell _
OrElse GetKeyState ( VK_SPACE ) <0
If Not lockValue AndAlso _
beingEdited AndAlso _
mudando AndAlso _
saveRow = rowNum Então
saveValue = Não saveValue
lockValue = False
4
Clique em " Arquivo", " Salvar" para salvar o programa de VB.NET em que você adicionou a recuperação dos dados DataGrid booleanos.
