كود :
If (Not ((DirectCast(e.KeyCode, Keys).ToString = "F2") Is 0) Is Nothing) Then
End If
كود :
Private Sub DisplayDataCheckBox(ByVal value As Boolean)
Me._CheckBox.Invoke((sender, e) => Me._CheckBox.Checked = value)
End Sub