كيف أنهي عمل زر يعطي عمل متكرر عن طريق زر آخر

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

و في الزر الاخر يدخل رقم الانهاء

مثال

Private Sub Command1_Click()

If Text1.Text = "AAA" Then

Exit Sub

Else

Text2.Text = Text1.Text

End If

End Sub

Private Sub Command2_Click()

Text1.Text = "AAA"

End Sub

"عندي زر بعطي أمر يقول انقل ما هو موجود في التكست الأولى الى التكست الثانية كل ثانية (أي عمل متككر يبقى فعال بعد النقر على الزر)

"

افهم من كده انك بتستخدم اداة التايمر

لو الامر كذلك استخدم الخاصيه enabled