21-07-13, 05:54 PM
21-07-13, 06:54 PM
السلام عليكم
- طريقة على الطاير , إستخدمها إلا إن وجد أسهل منها .
- ضع هذا الكود في كود كل زر تريد معرفة ما إن تم ضغطه :
- تحياتي .
- طريقة على الطاير , إستخدمها إلا إن وجد أسهل منها .
- ضع هذا الكود في كود كل زر تريد معرفة ما إن تم ضغطه :
كود :
Private Sub Command1_Click()
Text1.Text = "Command1"
End Sub- تحياتي .
21-07-13, 06:55 PM
اخي القصة مش محتاجة كود
ستخدم الداله الشريطيه if
وهاذا مثال وضعته لك
للقياس عليه
تفضل
ستخدم الداله الشريطيه if
وهاذا مثال وضعته لك
للقياس عليه
تفضل
21-07-13, 07:52 PM
بس انا اريد رقم الكوماند
21-07-13, 09:10 PM
asto كتب :بس انا اريد رقم الكوماند
جربت
كود :
right(command1.name,1)21-07-13, 11:00 PM
السلام عليكم...
ليكون الطلب أوضح أعطنا مثال للـ Command (ما اسمه) و ماذا تريد أن يظهر في الـ TextBox.
سلام.
ليكون الطلب أوضح أعطنا مثال للـ Command (ما اسمه) و ماذا تريد أن يظهر في الـ TextBox.
سلام.
21-07-13, 11:40 PM
والله حيرتنا
اخي الكومند اسمه متغير ليس ثابت
اخي الكومند اسمه متغير ليس ثابت
22-07-13, 12:09 AM
طيب مثال كوماند3
اضع هذه التعليمات ضمنه فيعطيني رقمه
يعني التكست بوكس لازم يعطي رقم
بهذه التعليمة
لكن النتيجة على شكل نص و اريده على شكل رقم
و مشكورين سلفا
اضع هذه التعليمات ضمنه فيعطيني رقمه
كود :
If Command3 = True Then
u=right(command3.name,1)
text1.text=u
endifيعني التكست بوكس لازم يعطي رقم
بهذه التعليمة
كود :
right(command1.name,1)لكن النتيجة على شكل نص و اريده على شكل رقم
و مشكورين سلفا
22-07-13, 08:45 AM
السلام عليكم
اخي الحبيب
لنفرض ان الكومند اسمه على command3
ماذا تريد ان يظهر في مربع النص ,,, بمعنى هلى تريد ان يظهر الرقم 3 او تريد غير هذا الرقم
ونحن معك ,,,
اخي الحبيب
لنفرض ان الكومند اسمه على command3
ماذا تريد ان يظهر في مربع النص ,,, بمعنى هلى تريد ان يظهر الرقم 3 او تريد غير هذا الرقم
ونحن معك ,,,
22-07-13, 09:25 AM
سوي فوم جديد وحط كوماند واحد وبعدين انسخ هذا الكوماند والصقه على الفورم راح تطلع لك رسالة اختار نعم والصق كم مرة على قد الكوماندز اللي تريد راح تلاقيها بنفس الاسم
بعدين اضغط مرتين على اي واحد منهم راح يكون الكود بهذا الشكل
Private Sub Command1_Click(Index As Integer)
End Sub
حط في داخله الأمر msgbox index واضغط على اي كوماند راح يطلع لك رقم الكوماند
بعدين اضغط مرتين على اي واحد منهم راح يكون الكود بهذا الشكل
Private Sub Command1_Click(Index As Integer)
End Sub
حط في داخله الأمر msgbox index واضغط على اي كوماند راح يطلع لك رقم الكوماند