Nhập số vào textbox

[nhatthuc147]

em muốn textbox tương tác với người dùng có thể nhập số thực bất kỳ nhưng không nhập ký tự, vậy em viết code ra sao?

 

[dat2007]

Bạn dùng Code sau:

Private Sub TextBox1_Exit(ByVal Cancel As MSForms.ReturnBoolean)
  If IsNumeric(Me.TextBox1) = False Then Me.TextBox1.SetFocus
End Sub

 

[Mr Okebab]

Bạn dùng Code sau:

Private Sub TextBox1_Exit(ByVal Cancel As MSForms.ReturnBoolean)
  If IsNumeric(Me.TextBox1) = False Then Me.TextBox1.SetFocus
End Sub

Nên sử dụng sự kiện KeyPress bác a.

Thân!

 

[nhatthuc147]

đúng là nên dùng keypress nhưng em không biết viết tương tác,bác chỉ giùm đi.thank