هل ممكن تحديد عدد مرات الضغط على Command1 للدخول الى Form2

Static intShowForm As Integer
intShowForm = intShowForm + 1
If(intShowForm <= 5)Then 
	   Form2.Show
End If

اعتقد ان السؤال لبعد غلق البرنامج

اي يحتفظ بقيمه المتغير حتي بعد الغلق

ولو كنت فهمت السؤال غلط فأليك طريقه اخري

Dim x As Integer

Private Sub Command1_Click()
x = x + 1
If x < 6 Then
Form2.Show
Else
MsgBox"ممنوع الدخول"
End If
End Sub


Private Sub Form_Load()
x = 1
End Sub

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

ولو ضغطت ستة مرات لا يدخلك على الفورم رقم 2

الحقيقة في كل مره لا تستطيع أن تضغط على الكوماند ستة مرات وذلك على حسب طلبك لأنك لو ضغطت خمسة مرات يدخلك للفورم رقم 2

فكيف تستطيع أن تضغط على الكوماند ستة مرات ؟

اخواني الاعضاء الله يعطيكم العافية جميع على الردود وهي فعلا تفي في بلمطلوب

ولكن هي يمكن ذالك كما اعتقد الاخ tamer ان السؤال لبعد غلق البرنامج

اي يحتفظ بقيمه المتغير حتي بعد اغلاق البرنامج

اخي محمد V ان المطلوب ان لا تستطيع الدخول الى الفورم 2 بعد خمسة ضغطات على الكوماند 000 للتوضيح فقط

ونشكر كل الاخوة على هذة الحلول000 وننتظر المزيد

اقتباس

اي يحتفظ بقيمه المتغير حتي بعد اغلاق البرنامج

تستطيع تخزين المتغير ي ملف , أو في نفس البرنامج (هناك كود ولكن لا اذكره أظن أن فيه App.savesetting)