PDA

View Full Version : enter


aliyeh
یک شنبه 11 تیر 1385, 19:28 عصر
سلام
من در فرم یک برنامه چند textbox قرار دادم در زمان اجرا بعد از پر کردن هر textbox میخواهم با زدن کلید (enter) کنترل به textbox بعدی بره اما نمیدونم چطور اگه میشه راهنمائیم کنید
با تشکر
هانی هاشمی
یک شنبه 11 تیر 1385, 22:23 عصر
با سلام
میتونی از این کد استفاده کن

Private Sub Text1_KeyPress(KeyAscii As Integer)
If KeyAscii = 13 Then Text2.SetFocus
End Sub
hosseiny5524
دوشنبه 12 تیر 1385, 14:23 عصر
هانی جون دست درد نکنه جواب خوبی دادی خوشحال می شم با من در تماس باشی
hosseiny5524@yahoo.com
farzad sahraei
دوشنبه 12 تیر 1385, 17:46 عصر
یه راه بهتر اینه که روال زیر رو دنبال کنی
1. TabIndex تمام کنترل های روی فرمت رو ست کن
2. key Preview فرمت رو True کن
3. توی keypress فرمت دستور زیر رو تایپ کن
if keyAscii = vbkeyreturn then sendkeys "{TAB}" : keyAscii=0
این کار باعث میشه که تمام کنترل های روی فرمت با enter کارکنن در ضمن بعد از کلید enter صدای beep سیستم نمیاد