本文介绍了Datagridview两个复选框列控件的处理方法,对大家解决问题具有一定的参考价值,需要的朋友们下面随着小编来一起学习吧! 问题描述 我有一个11列的datagridview。 6.和7.列是复选框列。如果6.列已选中,则在当前行中选择7.列(已选中)时必须是自动解锁。 我尝试了很多但我不能这样做。 我尝试了什么: Hi,I have a datagridview with 11 column. 6. and 7. columns are checkbox column. if 6. column is Checked, it must be UnChecked automaticaly when select 7. column (Checked) in current row.I tried alot of thing but I cann't do it.What I have tried:Private Sub dgTestler_CellContentClick(sender As Object, e As DataGridViewCellEventArgs) Handles dgTestler.CellContentClick If e.RowIndex >= 0 Then If dgTestler.Rows(e.RowIndex).Cells(6).Selected = True Then If dgTestler.Rows(e.RowIndex).Cells(6).Value = False And dgTestler.Rows(e.RowIndex).Cells(7).Value = False Then dgTestler.Rows(e.RowIndex).Cells(6).Selected = True dgTestler.Rows(e.RowIndex).Cells(9).Value = dgTestler.Rows(e.RowIndex).Cells(8).Value GenelToplam = GenelToplam + dgTestler.Rows(e.RowIndex).Cells(9).Value dgTestler.Rows(e.RowIndex).Cells(10).Value = dgTestler.Rows(e.RowIndex).Cells(8).Value * 100 dgTestler.Rows(e.RowIndex).Cells(11).Value = 1 TextBox1.Text = GenelToplam.ToString() Exit Sub ElseIf dgTestler.Rows(e.RowIndex).Cells(6).Value = True And dgTestler.Rows(e.RowIndex).Cells(7).Value = False Then dgTestler.Rows(e.RowIndex).Cells(6).Selected = False GenelToplam = GenelToplam - dgTestler.Rows(e.RowIndex).Cells(9).Value dgTestler.Rows(e.RowIndex).Cells(9).Value = "" dgTestler.Rows(e.RowIndex).Cells(10).Value = "" dgTestler.Rows(e.RowIndex).Cells(11).Value = "" TextBox1.Text = GenelToplam.ToString() Exit Sub ElseIf dgTestler.Rows(e.RowIndex).Cells(6).Value = True And dgTestler.Rows(e.RowIndex).Cells(7).Value = True Then dgTestler.Rows(e.RowIndex).Cells(6).Selected = True dgTestler.Rows(e.RowIndex).Cells(7).Selected = False dgTestler.Rows(e.RowIndex).Cells(9).Value = dgTestler.Rows(e.RowIndex).Cells(8).Value GenelToplam = GenelToplam + dgTestler.Rows(e.RowIndex).Cells(9).Value dgTestler.Rows(e.RowIndex).Cells(10).Value = dgTestler.Rows(e.RowIndex).Cells(8).Value * 100 dgTestler.Rows(e.RowIndex).Cells(11).Value = 1 TextBox1.Text = GenelToplam.ToString() Exit Sub End If ElseIf dgTestler.Rows(e.RowIndex).Cells(7).Selected = True Then If dgTestler.Rows(e.RowIndex).Cells(7).Value = False And dgTestler.Rows(e.RowIndex).Cells(6).Value = False Then dgTestler.Rows(e.RowIndex).Cells(7).Selected = True 'GenelToplam = GenelToplam - dgTestler.Rows(e.RowIndex).Cells(9).Value dgTestler.Rows(e.RowIndex).Cells(9).Value = 0 dgTestler.Rows(e.RowIndex).Cells(10).Value = 0 dgTestler.Rows(e.RowIndex).Cells(11).Value = 1 'TextBox1.Text = GenelToplam.ToString() Exit Sub ElseIf dgTestler.Rows(e.RowIndex).Cells(7).Value = True And dgTestler.Rows(e.RowIndex).Cells(6).Value = False Then dgTestler.Rows(e.RowIndex).Cells(7).Selected = False 'GenelToplam = GenelToplam - dgTestler.Rows(e.RowIndex).Cells(9).Value dgTestler.Rows(e.RowIndex).Cells(9).Value = "" dgTestler.Rows(e.RowIndex).Cells(10).Value = "" dgTestler.Rows(e.RowIndex).Cells(11).Value = "" 'TextBox1.Text = GenelToplam.ToString() Exit Sub ElseIf dgTestler.Rows(e.RowIndex).Cells(7).Value = True And dgTestler.Rows(e.RowIndex).Cells(6).Value = True Then dgTestler.Rows(e.RowIndex).Cells(6).Selected = False dgTestler.Rows(e.RowIndex).Cells(7).Selected = True GenelToplam = GenelToplam - dgTestler.Rows(e.RowIndex).Cells(9).Value dgTestler.Rows(e.RowIndex).Cells(9).Value = 0 dgTestler.Rows(e.RowIndex).Cells(10).Value = 0 dgTestler.Rows(e.RowIndex).Cells(11).Value = 1 TextBox1.Text = GenelToplam.ToString() Exit Sub End If End If End IfEnd Sub 推荐答案 这篇关于Datagridview两个复选框列控件的文章就介绍到这了,希望我们推荐的答案对大家有所帮助,也希望大家多多支持!
10-11 11:38