[x7rBI]

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



كيفكم ي اخوان ؟
عساكم بخير


المهم ي اخوان

انا ابي اسوي نفس فكرة ذا الموقع لاكن برنامج بالفيجوال بيسك
http://www.brainbashersgames.com/games/10seconds.asp
فائدة حسب عدد ضغطات الماوس ل 10 ثواني

المهم اقدر اسوي مثله بالفيجوال بيسك ؟


واذا اقدر ممكن تكتبون لي الطريقة

[es5s930]

تقريبا

اول شي تعرف متغير بنوع Integer

وكل ماجيت تضغط الزر يزيد المتغير رقم

لين م يوصل الى 10 ويوقف الضغط

مثال بسيط

كود :

   Dim Clicks As Integer = 0
   Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
       If Clicks = 10 Then
           MsgBox("تخطيت الازرار المسموحه")
       Else
           Clicks = Clicks + 1
       End If
   End Sub

[silverlord]

تفضل اخوي انا عملت لك نموذج
http://www.mediafire.com/download/h06qoo...logger.rar