PDA

View Full Version : چرا KeyPress و KeyDown همیشه یک کلید رو بیخیال میشن؟



Developer Programmer
جمعه 18 تیر 1389, 19:01 عصر
من دارم قسمتی از برنامه رو مینویسم که قیمت کل فاکتور رو نشون کاربر میده و اجازه میده که کاربر هزینه سرویس و تخفیف رو دستی وارد کنه تا مبلغ قابل پرداخت رو محاسبه کنه.

منتها رویداد های KeyPress و Keydown همیشه یک کلید عقب میمونن!! یعنی وقتی 200 رو می زنم عدد رو 20 در نظر میگیره و وقتی 2000 می زنم تازه عدد رو 200 در نظر میگیره ( تصور میکنم دیر از بافر Keyboard میخونه )

در TextChange هم نمیتونم بذارم چون عملیات دیگه ای انجام میشه...


باید چیکار کنم؟

mohammad.moosaei
شنبه 19 تیر 1389, 02:13 صبح
سلام داداش امیدوارم کمکت کنه:


Private Sub TextBox1_KeyPress(ByVal sender As System.Object, ByVal e As System.Windows.Forms.KeyPressEventArgs) Handles TextBox1.KeyPress
If Asc(e.KeyChar) < 48 And Asc(e.KeyChar) <> 8 Or Asc(e.KeyChar) > 58 Then

e.Handled = True

End If
TextBox2.Text = TextBox1.Text
End Sub

Private Sub TextBox1_KeyUp(ByVal sender As Object, ByVal e As System.Windows.Forms.KeyEventArgs) Handles TextBox1.KeyUp
TextBox2.Text = TextBox1.Text
End Sub

vbworm
پنج شنبه 24 تیر 1389, 05:45 صبح
میتونی از رویداد TextUpdate استفاده کنی