[bidaya]

كود :

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

[bidaya]

[bidaya]

يا اخواني ممكن حد يجاوبنب باي جواب ههههههههههههه

الله يرضى عليكم

[smalw]

(05-12-19, 12:59 PM)bidaya كتب :

كود :

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

(05-12-19, 12:59 PM)bidaya كتب : منشان يعمل مفتاح f2 عدل خاصيت الفورم keypreview الى true

كود :

If e.KeyCode = Keys.F2 Then
         
       End If

 

كود :

Private Sub DisplayDataCheckBox(ByVal value As Boolean)
           Me._CheckBox.Invoke(Sub() Me._CheckBox.Checked = value)
   End Sub

[bidaya]

(07-12-19, 10:06 PM)smalw كتب :

(05-12-19, 12:59 PM)bidaya كتب :

كود :

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

(05-12-19, 12:59 PM)bidaya كتب : منشان يعمل مفتاح f2 عدل خاصيت الفورم keypreview الى true

كود :

If e.KeyCode = Keys.F2 Then
         
       End If

 

كود :

Private Sub DisplayDataCheckBox(ByVal value As Boolean)
           Me._CheckBox.Invoke(Sub() Me._CheckBox.Checked = value)
   End Sub

اشكرك اخي الغالي

الله يرضى عليك