Feeling_nothing
Thành viên mới
- Tham gia
- 15/9/21
- Bài viết
- 9
- Được thích
- 0
Em đang gặp vấn đề đau hết đầu khi khai báo biến trong userform. Câu lệnh của em là
Private sub txtbarkey2_keydown(byval keycode as msform.returninteger, byval shift as integer)
If keycode = vbkeyreturn then
Dim i as string
I = left(txtbarkey2.value,5)
Msgbox i
End if
End sub
Nhưng khi em chạy thì lần đầu tiên thì hiện được giá trị. Còn lần khác thì toàn nhận về giá trị rỗng. Có cao thủ nào chỉ em với. Em soạn trên điện thoại nên ko up đc file lên ạ.
Private sub txtbarkey2_keydown(byval keycode as msform.returninteger, byval shift as integer)
If keycode = vbkeyreturn then
Dim i as string
I = left(txtbarkey2.value,5)
Msgbox i
End if
End sub
Nhưng khi em chạy thì lần đầu tiên thì hiện được giá trị. Còn lần khác thì toàn nhận về giá trị rỗng. Có cao thủ nào chỉ em với. Em soạn trên điện thoại nên ko up đc file lên ạ.
