شمارش خطوط چاپ شده روی فرم

[vafanezhad]

سلام دوستان
من می خوام یه بازی بنویسم که یه عدد کامپیوتر تصادفی انتخاب می کنه و کاربر اونقدر عدد پیشنهاد میده تا به عدد مورد نظر کامپیوتر برسه
حالا من می خوام اینایی که روی فرم چاپ می کنه رو بشمارم و تا به 20تا رسید بازی متوقف بشهو کاربر ببازه
مثلا روی فرم چاپ میشه
عدد شما560از عددمورد نظر کوچکتر است.
عدد شما700از عدد مورد نظر برگتر است.
این خطوطی که قرمزش کردم تا 20تا شد بازی متوقف بشه.
ممنون میشم اگه کسی جوابمو بده.
با تشکر

[M.T.P]

شما یک متغیر پابلیک تعریف کنید که هر بار که کاربر اشتباه پاسخ داد بعلاوه یک بشه و هربار مقدارش رو بررسی کنید اگه 20 شد ، کاربر ببازه.

[vafanezhad]

میشه بیشتر توضیح بدید من یه تازه واردم وازاین چیرها سر در نمیارم
ومن فقط می خوام به 20تا که رسید کاربر ببازه ونه این که چیزی کم و زیاد کنه

[MiladMR]

میشه بیشتر توضیح بدید من یه تازه واردم وازاین چیرها سر در نمیارم
ومن فقط می خوام به 20تا که رسید کاربر ببازه ونه این که چیزی کم و زیاد کنه

شما توی قسمت Form_Load این کد رو اضافه کنید

Dim Cnt As Byte
Cnt = 0


بعدی توی قسمتی که کد مربوط به وارد کردن عدد توسط کاربر رو نوشتی این کد رو اضافه کن


If Cnt>=20 Then
Msgbox "GAMEOVER"
Else
................................................
Cnt=Cnt+1
End If

بجای اون قسمتی که نقطه چین گذاشتم کد خودتو بنویس

[MiladMR]

برنامه ای که میخواستی رو واست نوشتم

اینم سورسش : دانلود (http://faupload.com/uploads/13331870741.zip)

[رامین مرادی]

ببخشید دوست عزیز شما چه طور تونستید به یک متغییر محلی از جای دیگه به اون دسترسی :متعجب:داشته باشی!!!!!!!!!!!!!!!
باید اون متغییر اولی رو قبل از تمام رویداد ها بنویسید لطفا" اصول برنامه نویسی رو هم رعایت کنید و تازه کار ها رو درست راهنمایی کنید با عرض ادب اگه تندی از من سر زد ببخشید!!!

[MiladMR]

ببخشید دوست عزیز شما چه طور تونستید به یک متغییر محلی از جای دیگه به اون دسترسی :متعجب:داشته باشی!!!!!!!!!!!!!!!
باید اون متغییر اولی رو قبل از تمام رویداد ها بنویسید لطفا" اصول برنامه نویسی رو هم رعایت کنید

اصلاً متوجه منظورت نمیشم
من یاد گرفتم معمولاً متغیر رو توی general تعریف کنم
یعنی اصـــــــــــــــــــــــ ـــــــلا نگرفتم چی گفتین ؟!؟

[Javad-2010]

برنامه ای که میخواستی رو واست نوشتم

اینم سورسش : دانلود (http://faupload.com/uploads/13331870741.zip)

من نتونستم این فایل رو دانلود کنم!

[رامین مرادی]

شما توی قسمت Form_Load این کد رو اضافه کنید

Dim Cnt As Byte
Cnt = 0



ببینید شما تو این قسمت گفتید که متغییر رو توی فرم لود بزارین خوب شما نمی تونید به یه متغییر دیگه ای که تویه یه ساب دیگه اونم اینکه به صورت محلی تعریف شده از ساب دیگه دسترسی پیدا کنید . پس باید تو قسمت جنرال متغییر رو می زاشتید. البته این یک یادآوری بود :لبخندساده:

[MiladMR]

من یاد گرفتم معمولاً متغیر رو توی general تعریف کنم


ببینید شما تو این قسمت گفتید که متغییر رو توی فرم لود بزارین خوب شما نمی تونید به یه متغییر دیگه ای که تویه یه ساب دیگه اونم اینکه به صورت محلی تعریف شده از ساب دیگه دسترسی پیدا کنید . پس باید تو قسمت جنرال متغییر رو می زاشتید. البته این یک یادآوری بود :لبخندساده:

آها، خودمم گفتم که توی general تعریف میکنم
ولی سوال مبتدی بود اینجوری نوشتم
چون یادمه خودم که شروع کرده بودم یاد بگیرم بهم میگفتم اینجوری بنویس، همین، مرســ ـیـ