将复选框列添加到DataGridView中

-1

我使用VS 2008和VB.NET作为语言。我有两个网格。在一个网格中，ii有用户的数据。例如手机号码，电子邮件和其他信息。在第二格，我有一些已经增加了警报。将复选框列添加到DataGridView中

我需要在报警gridview的每一行中附加两个复选框列。点击该复选框后，将执行特定的数据库操作。

目前，我添加复选框到datagridview中，但我无法检查/取消选中它们。

请帮我解决检查/取消选中的问题，并给我一个提示，执行复选框单击的数据库操作。

我这是怎么加入到复选框在DataGridView

Dim email As DataGridViewCheckBoxColumn = New DataGridViewCheckBoxColumn(True) 
Dim sms As DataGridViewCheckBoxColumn = New DataGridViewCheckBoxColumn(True) 

email.HeaderText = "Email" 
email.ReadOnly = False 
sms.HeaderText = "SMS" 
sms.ReadOnly = False 

UserAlarmDataGridView.Columns.Add(email) 

UserAlarmDataGridView.Columns.Add(sms)

我试图让列的只读属性设置为false，但它不工作。

来源

2013-07-13 user2119449

检查下面的代码

Private Sub Form1_Load(sender As System.Object, e As System.EventArgs) Handles MyBase.Load 
    Dim AlarmColumn1 As New DataGridViewCheckBoxColumn(True) 
    Dim AlarmColumn2 As New DataGridViewCheckBoxColumn(True) 

    AlarmColumn1.Name = "Alarm1" 
    AlarmColumn1.HeaderText = "Email" 
    AlarmColumn1.ReadOnly = False 

    AlarmColumn2.Name = "Alarm2" 
    AlarmColumn2.HeaderText = "SMS" 
    AlarmColumn2.ReadOnly = False 

    UserAlarmDataGridView.Columns.Add(AlarmColumn1) 
    UserAlarmDataGridView.Columns.Add(AlarmColumn2) 
    UserAlarmDataGridView.ReadOnly = False 
End Sub

，使基于一个复选框点击数据库操作，使用下面的

Private Sub UserAlarmDataGridView_CellContentClick(sender As Object, _ 
    e As System.Windows.Forms.DataGridViewCellEventArgs) Handles UserAlarmDataGridView.CellContentClick 

    Dim ColumnName1 As String = UserAlarmDataGridView.Columns(e.ColumnIndex).Name 

    If ColumnName1 = "Alarm1" Or ColumnName1 = "Alarm2" Then 
     Dim CellCheckBox1 As DataGridViewCheckBoxCell = _ 
      CType(UserAlarmDataGridView.Rows(e.RowIndex).Cells(ColumnName1), DataGridViewCheckBoxCell) 

     Dim CellCheckBoxState1 As String = CellCheckBox1.EditingCellFormattedValue.ToString 

     MsgBox("Row = " & CellCheckBox1.RowIndex & vbCrLf & _ 
       "Column = " & CellCheckBox1.ColumnIndex & vbCrLf & _ 
       "State = " & CellCheckBoxState1) 
    End If 
End Sub

来源

2013-07-13 10:38:58

Thanx。这是有帮助的...... :) – user2119449

一种更好的方式来捕捉复选框状态值....

If CBool(DG1.Rows(e.RowIndex).Cells(clmChecked.Index).Value) Then 
    'checked 
Else 
    'Not checked 
End if

来源

2018-02-19 16:53:35

将复选框列添加到DataGridView中

回答

相关问题