在数据绑定DataGridView中显示一个复选框

时间:2013-01-14 22:58:33

标签: vb.net datagridview

我无法从数据库的布尔列正确填充DataGridView复选框列。

第一个form_load代码:

Me.DataGridView1.DataSource = Me.bindingSource1
GetData("SELECT myInt, myBool, myString " & _
        "FROM " & myFavTable & " " & _
        "WHERE (myInt > 100) ORDER BY myString")

formatGrid()

在GetData中,我用myTable填充数据:

Me.dataAdapter.Fill(myTable)
Me.bindingSource1.DataSource = myTable

最后我在显示之前格式化了网格。

我手动格式化,因为加载比自动格式化要快得多。

    With DataGridView1
        .AllowUserToAddRows = False
        .AllowDrop = False
        .AllowUserToOrderColumns = False
        .AllowUserToResizeRows = False
        .SelectionMode = DataGridViewSelectionMode.FullRowSelect
        .MultiSelect = False
        .Dock = DockStyle.Fill
        .EditMode = DataGridViewEditMode.EditProgrammatically

       With .Columns(0)
            .Name = "postN"
            .HeaderText = "Postal"
            .Width = 55
        End With

        With .Columns(1) 'here should be a checkbox
            .Width = 20
        End With

        With .Columns(2)
            .Name = "colCity"
            .HeaderText = "City"
            .Width = 180
        End With
    End With

但是使用此代码,在我应该显示复选框的列中,当数据库为0时,将显示字符串值FALSE

在这种情况下,如何在中间列而不是文本中获取复选框?

我在绑定之前和之后尝试使用.Columns.Add ...但没有想要的结果 这样我可以获得checkboxes,但是在新列中。

3 个答案:

答案 0 :(得分:2)

在设计时将列添加到DataGridView并将中间列设置为CheckBoxColumn。

然后设置:

With DataGridView1
   .AutoGenerateColumns = False

修改 我现在看到了问题。您需要将DataPropertyName设置为与列相同。

向DataGridView添加列时,在该对话框中设置DataPropertyName以匹配DataTable(myTable)列名称。这是映射背后的魔力。

enter image description here

以下是代码:

DataTable dt = new DataTable();
dt.Columns.Add("TextBoxCol");
dt.Columns.Add("CheckBoxCol");
DataRow dr = dt.NewRow();
dr[0] = "Hello";
dr[1] = false;
dt.Rows.Add(dr);
dr = dt.NewRow();
dr[0] = "World";
dr[1] = true;
dt.Rows.Add(dr);
dataGridView1.DataSource = dt;

enter image description here

答案 1 :(得分:1)

我遇到了同样的问题。 我有一个DataSet,它正在填充这个SQL:

"SELECT nombre, CASE WHEN fecha IS NULL THEN 0 ELSE 1 END AS baja"

作业

dtgEmpleado.DataSource = ds.Tables(0)

With dtgEmpleado
    .Columns(0).HeaderText = "Nombre"
    .Columns(0).DataPropertyName = "nombre"
    .Columns(0).Name = "nombre"
    .Columns(0).Width = 100
    .Columns(1).HeaderText = "Baja"
    .Columns(1).DataPropertyName = "baja"
    .Columns(1).Name = "baja"
    .Columns(1).Width = 70
End With

我想要将“Baja”列显示为“复选框”。

我可以用:

AutoGenerateColumns = False

但更简单的方法是更改​​SQL语句:

"SELECT nombre, CAST(CASE WHEN fecha IS NULL THEN 0 ELSE 1 END AS BIT) AS baja"

答案 2 :(得分:0)

Dim cell As DataGridViewCell = New DataGridViewCheckBoxCell()

With DataGridView1
    With .Columns(1)
        .CellTemplate = cell
    End With
End With

修改

这是一个建议,请勿尝试在DataGridView的设计时添加列,因为您查询自己会生成DataGridViewCheckBoxCell

GetData("SELECT myInt AS Id, myBool AS Bool, myString AS String " & _
        "FROM " & myFavTable & " " & _
        "WHERE (myInt > 100) ORDER BY myString")


Me.dataAdapter.Fill(myTable)
Me.bindingSource1.DataSource = myTable

DataGridView1.DataSource = bindingSource1;