如何在Vb.net中執行期間在列表視圖中禁用複選框..

Question

在我的應用程序中，我希望當用戶選擇一個複選框時，所有其他應該被禁用，當他取消選中該複選框時，它將從列表視圖和其他禁用應該可以爲他... 刪除部分已經這麼親切地指導我第二部分

Answer 1

Checkbox1_CheckedChange方法是你所需要的。

If Checkbox1.Checked = True Then 
    Checkbox2.Enabled = False 
    Checkbox3.Enabled = False 
Else 
    Checkbox2.Enabled = True 
    Checkbox3.Enabled = True 
End If 

Answer 2

我會加強@ David's答案：

你必須爲你的複選框，例如註冊CheckedChanged事件在Form's Load事件：

Private Sub Form1_Load(sender As Object, e As EventArgs) Handles MyBase.Load 
    For Each checkbox In Controls.OfType(Of CheckBox) 
     AddHandler checkbox.CheckedChanged, AddressOf Checkbox_CheckedChanged 
    Next 
End Sub 

其中處理該事件當用戶手動clickes複選框的Checkbox_CheckedChanged：

Private Sub Checkbox_CheckedChanged(sender As Object, e As EventArgs) 
    'Checkbox the user manually clicked 
    Dim changedCheckbox = DirectCast(sender, CheckBox) 

    If changedCheckbox.Checked Then 
     For Each otherCheckbox In Controls.OfType(Of CheckBox) 
      'We don´t want to change the state of the checkbox the user clicked on 
      If changedCheckbox IsNot otherCheckbox Then 
       otherCheckbox.Checked = False 
      End If 
     Next 
    Else 
     'Your part of deleting in listview 
    End If 
End Sub 

Answer 3

也許是更好的函數：

Public Function DisableCheckBox(ByVal OriginalCheckBox As CheckBox) 
    Try 
     Dim Parent As Control = OriginalCheckBox.Parent 

     For Each Chk As CheckBox In Parent.Controls.OfType(Of CheckBox)() 
      If Not Chk.Name = OriginalCheckBox.Name Then 
       Chk.Enabled = Not Chk.Enabled 
      End If 
     Next 

     Return True 
    Catch ex As Exception 
     Return False 
    End Try 
End Function 

然後你可以簡單地打電話給：

​​