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

+- منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب (http://vb4arb.com/vb)
+-- قسم : قسم أسئلة واستفسارات الأعضاء - المنتدى القديم (http://vb4arb.com/vb/forumdisplay.php?fid=94)
+--- قسم : قسم Visual Basic 6 وما قبله (http://vb4arb.com/vb/forumdisplay.php?fid=167)
+--- الموضوع : كوماند تم ضغطه (/showthread.php?tid=9723)

كوماند تم ضغطه - asto - 21-07-13

السلام عليكم

مطلوب كود يعطي اسم الكوماند الذي تم الضغط عليه في تكست بوكس

كوماند تم ضغطه - VB_Coder - 21-07-13

السلام عليكم

- طريقة على الطاير , إستخدمها إلا إن وجد أسهل منها .
- ضع هذا الكود في كود كل زر تريد معرفة ما إن تم ضغطه :

كود :
Private Sub Command1_Click()

Text1.Text = "Command1"

End Sub

- تحياتي .

كوماند تم ضغطه - samee119485r - 21-07-13

اخي القصة مش محتاجة كود

ستخدم الداله الشريطيه if

وهاذا مثال وضعته لك

للقياس عليه

تفضل

كوماند تم ضغطه - asto - 21-07-13

بس انا اريد رقم الكوماند

كوماند تم ضغطه - asto - 21-07-13

asto كتب :بس انا اريد رقم الكوماند

جربت
كود :
right(command1.name,1)


كوماند تم ضغطه - ناجي إبراهيم - 21-07-13

السلام عليكم...

ليكون الطلب أوضح أعطنا مثال للـ Command (ما اسمه) و ماذا تريد أن يظهر في الـ TextBox.

سلام.

كوماند تم ضغطه - samee119485r - 21-07-13

والله حيرتنا

اخي الكومند اسمه متغير ليس ثابت

كوماند تم ضغطه - asto - 22-07-13

طيب مثال كوماند3

اضع هذه التعليمات ضمنه فيعطيني رقمه
كود :
If Command3 = True Then

u=right(command3.name,1)

text1.text=u

endif

يعني التكست بوكس لازم يعطي رقم

بهذه التعليمة

كود :
right(command1.name,1)

لكن النتيجة على شكل نص و اريده على شكل رقم

و مشكورين سلفا

كوماند تم ضغطه - Top GreaT - 22-07-13

السلام عليكم

اخي الحبيب
لنفرض ان الكومند اسمه على command3
ماذا تريد ان يظهر في مربع النص ,,, بمعنى هلى تريد ان يظهر الرقم 3 او تريد غير هذا الرقم
ونحن معك ,,,

كوماند تم ضغطه - VB6DAO - 22-07-13

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

بعدين اضغط مرتين على اي واحد منهم راح يكون الكود بهذا الشكل
Private Sub Command1_Click(Index As Integer)

End Sub

حط في داخله الأمر msgbox index واضغط على اي كوماند راح يطلع لك رقم الكوماند