View Full Version : نیاز مند کمک هستم
mam061
یک شنبه 04 دی 1390, 19:41 عصر
سلام من برنامه ای نوشتم که در آن labels که حروف لاتین میباشند را به صورت آرایه در آوردم و توسط تابع rnd آن ها را از بالا به پایین فرم می آورد و پس از ان که کلید معادل label را در keyboard فشار دهیم اگر صحیح باشد به من امتیاز میدهد و در صورت اشتباه بودن امتیاز کثر میکند حالا میخواهم کاری کنم که پس از کلید بر روی صفحه به علاوه امتیاز آن label را hide کند چون به صورت آرایه میباشد نمیدانم چگونه این کار را انجام دهم
لطفا کمک کنید
mam061
یک شنبه 04 دی 1390, 22:31 عصر
هیچ کس نظری نداره
:متفکر:
SlowCode
چهارشنبه 07 دی 1390, 23:35 عصر
با این کد وقتی که اعداد 1-9 کیبورد زده بشه لیبل متناسب با اون پنهان میشه و امتیاز شما توی LblPoint نشان داده میشه:
Private Sub Form_KeyPress(KeyAscii As Integer)
If KeyAscii > 48 And KeyAscii < 57 Then
lbl(Chr(KeyAscii)).Visible = False
LblPoint.Caption = LblPoint.Caption + 1
End If
End Sub
البته تا این حد منطورتون رو فهمیدم.
sr2m72
پنج شنبه 22 دی 1390, 15:53 عصر
هیچ کس نظری نداره
:متفکر:
سلام.
شرمنده دوست عزيز، من منظورتون رو متوجه نمي شم.
اگه اشكال نداره سورس رو بزاريد تا كمكتون كنيم.
program2vb
پنج شنبه 22 دی 1390, 16:57 عصر
سلام من برنامه ای نوشتم که در آن labels که حروف لاتین میباشند را به صورت آرایه در آوردم و توسط تابع rnd آن ها را از بالا به پایین فرم می آورد و پس از ان که کلید معادل label را در keyboard فشار دهیم اگر صحیح باشد به من امتیاز میدهد و در صورت اشتباه بودن امتیاز کثر میکند حالا میخواهم کاری کنم که پس از کلید بر روی صفحه به علاوه امتیاز آن label را hide کند چون به صورت آرایه میباشد نمیدانم چگونه این کار را انجام دهم
لطفا کمک کنید
label1(X).Visible =False
حالا x=index لیبل خودت قرار بده تا اون لیبل مورد نظر مخفی بشه
vBulletin® v4.2.5, Copyright ©2000-1404, Jelsoft Enterprises Ltd.