منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب
تصحيح كود - نسخة قابلة للطباعة

+- منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب (http://vb4arb.com/vb)
+-- قسم : قسم لغة الفيجوال بيسك VB.NET (http://vb4arb.com/vb/forumdisplay.php?fid=182)
+--- قسم : قسم اسئلة VB.NET (http://vb4arb.com/vb/forumdisplay.php?fid=183)
+--- الموضوع : تصحيح كود (/showthread.php?tid=32366)

تصحيح كود - bidaya - 05-12-19

كود :
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


RE: تصحيح كود - bidaya - 06-12-19

Dodgy


RE: تصحيح كود - bidaya - 07-12-19

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

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

RE: تصحيح كود - smalw - 07-12-19

(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


RE: تصحيح كود - bidaya - 07-12-19

(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

اشكرك اخي الغالي
الله يرضى عليك