16,556
社区成员
发帖
与我相关
我的任务
分享
'--dv 是 dataview
'--db 是数据库接口类
'--dgplanlist是datagridview
dv = db.RunSelectSQL("select 状态, 编号 from 计划表")
DGPlanList.DataSource = dv.Table.DefaultView()
DGPlanList.Columns.Remove("状态")
Dim cbk As New DataGridViewCheckBoxColumn
cbk.HeaderText = "状态"
cbk.DataPropertyName = "状态"
cbk.TrueValue = 1
cbk.FalseValue = 0
DGPlanList.AutoGenerateColumns = False
DGPlanList.Columns.Insert(0, cbk)
'假设你要设置的单元格是第0行,第3列
Dim cbCell As DataGridViewCheckBoxCell = CType(Me.dgfac.Item(3, 0), DataGridViewCheckBoxCell)
cbCell.Value = True 'True是选中,False是不选
select 编号,(case when 状态='是' then '1' else '0' end) from 表
cn = New MySqlConnection(myConnectionString)
myAdapter = New MySqlDataAdapter(myQuery, cn)
ds = New DataSet()
myAdapter.Fill(ds, "myTablei")
dataGridView1.DataSource = ds
dataGridView1.DataMember = "myTable"
dataGridView1.AutoGenerateColumns = False
dataGridView1.Columns.Remove("状态")
Dim myCheck As New DataGridViewCheckBoxColumn()
myCheck.HeaderText = "状态"
myCheck.DataPropertyName = "Extra"
myCheck.FalseValue = "1"
myCheck.TrueValue = "0"
dataGridView1.AutoGenerateColumns = False
dataGridView1.Columns.Insert(1, myCheck)
cn.Close()
'假设你要设置的单元格是第0行,第3列
Dim cbCell As DataGridViewCheckBoxCell = CType(Me.dgfac.Item(3, 0), DataGridViewCheckBoxCell)
cbCell.Value = True 'True是选中,False是不选
cn = new MySqlConnection(myConnectionString);
myAdapter = new MySqlDataAdapter(myQuery, cn);
ds = new DataSet();
myAdapter.Fill(ds, "myTablei");
dataGridView1.DataSource = ds;
dataGridView1.DataMember = "myTable";
dataGridView1.AutoGenerateColumns = false;
dataGridView1.Columns.Remove("状态");
DataGridViewCheckBoxColumn myCheck = new DataGridViewCheckBoxColumn();
myCheck.HeaderText = "状态";
myCheck.DataPropertyName = "Extra";
myCheck.FalseValue = "1";
myCheck.TrueValue = "0";
dataGridView1.AutoGenerateColumns = false;
dataGridView1.Columns.Insert(1, myCheck);
cn.Close();