View Full Version : سوال: ثبت سه صفر در تکس باکس
moghadam1372
شنبه 22 دی 1397, 19:12 عصر
سلام
در یک تکس باکس با کلیک کردن کد اسکی 46 چطوری می توان در همان تکس باکس سه صفر ثبت کرد
isaac23
سه شنبه 25 دی 1397, 10:37 صبح
می خوای چیکار کنید دقیقا ....>؟
Text1.Text = Text1.Text + "000"
منظورتون اینه ؟
moghadam1372
سه شنبه 25 دی 1397, 15:00 عصر
می خوای چیکار کنید دقیقا ....>؟
Text1.Text = Text1.Text + "000"
منظورتون اینه ؟
می خواهم زمانی که کلیک . کنار صفر صفحه کلید را فشار میدهیم سه عدد صفر داخل تکس تایپ شود که کد اسکی . یا همان del مساوی 46 است
جهت ماشین حساب که سه صفر دارد ویا دو صفر ویک صفر
isaac23
چهارشنبه 26 دی 1397, 11:47 صبح
بنظرم از دو تا کلید باشه بهتره مثلا این دستور کلید Ctrl+Enter رو همزمان فشار بدی میاد 000 رو به مبغلی که زدی اضافه می کنه
Private Sub Text1_KeyDown(KeyCode As Integer, Shift As Integer)
If KeyCode = 13 And Shift = 2 Then Text1.Text = Text1.Text + "000"
End Sub
moghadam1372
چهارشنبه 26 دی 1397, 15:40 عصر
[QUOTE=isaac23;2408956]بنظرم از دو تا کلید باشه بهتره مثلا این دستور کلید Ctrl+Enter رو همزمان فشار بدی میاد 000 رو به مبغلی که زدی اضافه می کنه
[VB]Private Sub Text1_KeyDown(KeyCode As Integer, Shift As Integer)
If KeyCode = 13 And Shift = 2 Then Text1.Text = Text1.Text + "000"
جهت سهولت در ارقام زیاد که صفر دارند بهتر است که از یک کلیک عدد استفاده شود که بهترین گزینه همان del کنار صفر است
vBulletin® v4.2.5, Copyright ©2000-1403, Jelsoft Enterprises Ltd.