15-03-16, 08:54 PM
سلام عليكم اخوتي في الله
اريد ان اتعلم كيفيفة ادخال مساج بوكس في مصفوفة erry
مثلا الكود التالي
وانا عندي فورمات كثيرة فهذا فورم خاص بالطالب وفورم خاص بالاستاذ وفورم خاصة بالدروس ,,,, إلخ
اريد ان ادخلها في كلاس بحث اناديها من اي فورم اخرى
مثال عندي الكود التالي انا واضعو في كلاس واواريد ان اناديه من اي فورم اخرى وهذا الكود عبارة عن تحويل Tab إلى Enter يعني إذا ضغطت على Enter يعمل عمل Tab ويقفز من txtBx إلى TxtBx
أخرى
واريد ان اناديها من فورم الطلاب في الحدث keyup
اكتب الكود التالي
اريد نفس الطريقة بالنسبة msgbox التي اعرف عليها في classe وا ناديها في فورم الطلاب سامحيوني على الإطالة في الموضوع
أفيدوني أفادكم الله وشكرا
اريد ان اتعلم كيفيفة ادخال مساج بوكس في مصفوفة erry
مثلا الكود التالي
إقتباس : If TxtStudentName.Text = "" Then
MsgBox(" يجب أدخال الاسم واللقب ")
TxtStudentName.Focus()
Return
End If
If TxtAddress.Text = "" Then
MsgBox(" يجب أدخال العنوان ")
TxtAddress.Focus()
Return
End If
If TxtN_Fone.Text = "" Then
MsgBox(" يجب أدخال رقم الهاتف")
TxtN_Fone.Focus()
Return
End If
If TxtJob.Text = "" Then
MsgBox("يجب أدخال الوظيفة")
TxtJob.Focus()
Return
End If
وانا عندي فورمات كثيرة فهذا فورم خاص بالطالب وفورم خاص بالاستاذ وفورم خاصة بالدروس ,,,, إلخ
اريد ان ادخلها في كلاس بحث اناديها من اي فورم اخرى
مثال عندي الكود التالي انا واضعو في كلاس واواريد ان اناديه من اي فورم اخرى وهذا الكود عبارة عن تحويل Tab إلى Enter يعني إذا ضغطت على Enter يعمل عمل Tab ويقفز من txtBx إلى TxtBx
أخرى
إقتباس :(Sub senderd (e As KeyEventArgs
If e.KeyCode = Keys.Enter Then
("{SendKeys.Send("{Tab
End If
End Sub
اكتب الكود التالي
إقتباس : (MyConn.senderd(e
اريد نفس الطريقة بالنسبة msgbox التي اعرف عليها في classe وا ناديها في فورم الطلاب سامحيوني على الإطالة في الموضوع
أفيدوني أفادكم الله وشكرا