[sasa no love]

السلام عليكم ورحمه الله وبركاته

صباح/مساء الخير عليكم جميعا

اريد كود عداد تصاعدى بالارقام كل ما ادوس زر معين يزيد رقم لا هنتم

[3amo]

sasa no love كتب :السلام عليكم ورحمه الله وبركاته

صباح/مساء الخير عليكم جميعا

اريد كود عداد تصاعدى بالارقام كل ما ادوس زر معين يزيد رقم لا هنتم

السلام عليكم ورحمة الله وبركاته
جرب هذا الكود

كود :

Private Sub Command1_Click()Label1.Caption = Label1.Caption + 1
End Sub


Private Sub Form_Load()
Label1.Caption = "0"
End Sub

[sasa no love]

3amo كتب :السلام عليكم ورحمة الله وبركاته
جرب هذا الكود

كود :

Private Sub Command1_Click()Label1.Caption = Label1.Caption + 1
End Sub


Private Sub Form_Load()
Label1.Caption = "0"
End Sub

بارك الله فيك يا غالى
تسلم على المساعده ولكن هنا عند الضغط على الزر يظهر الرقم المكتوب بالامر اللى هو 1 Label1.Caption = Label1.Caption + 1
انا اريد مع كل ضغطه رقم تصاعدى
1
2
3
4
5
6
الخ
الكود كان معايا بس راح من دماغى ومن المشاريع جهازى اتفرمط

[sasa no love]

3amo كتب :السلام عليكم ورحمة الله وبركاته
جرب هذا الكود

كود :

Private Sub Command1_Click()Label1.Caption = Label1.Caption + 1
End Sub


Private Sub Form_Load()
Label1.Caption = "0"
End Sub

الف شكر يا غالى
الكود يعمل بنجاح
كان الخطأ منى اسف
طلب اخر لو سمحت عندى صوره تحركه وضعتها بالفورم وشغاله تمام بس اللى اريدو كود اظهار الصوره عند الضغط على الزر

[3amo]

بارك الله فيك

إقتباس :

طلب اخر لو سمحت عندى صوره تحركه وضعتها بالفورم وشغاله تمام بس اللى اريدو كود اظهار الصوره عند الضغط على الزر

ارفق المشروع للإطلاع عليه