Giải thích Code (1 người xem)

Liên hệ QC

Người dùng đang xem chủ đề này

a.nguoidensau

Thành viên hoạt động
Tham gia
12/4/12
Bài viết
138
Được thích
28
Chào mọi người!
Tôi đang tìm hiểu về VBA và tôi có đoạn Code dưới đây, nhưng chưa hiểu ý nghĩa nó thế nào.
Bác nào rảnh thì giải thích giùm tôi nhé, xin cảm ơn.
Mã:
  Private Sub TextBox1_KeyUp(ByVal KeyCode As MSForms.ReturnInteger, ByVal Shift As Integer)
  -------------------------------------------
  End Sub
   
  Private Sub TextBox2_BeforeUpdate(ByVal Cancel As MSForms.ReturnBoolean)
  ---------------------------------------------
  End Sub
   
   
  Private Sub TBNgayCT_BeforeUpdate(ByVal Cancel As MSForms.ReturnBoolean)
  ----------------------------
  End Sub
   
  Private Sub textbox2_KeyPress(ByVal KeyAscii As MSForms.ReturnInteger)
  [I]----------------------------------------------[/I]
  End Sub
   
  Private Sub textbox5_KeyPress(ByVal KeyAscii As MSForms.ReturnInteger)
  [I]---------------------------------------------------[/I]
  End Sub
 
Event keyup xảy ra khi nhả phím (event nhấn phím là keydown)
Keypress xảy ra khi bấm phím, chỉ nhận các phím ký tự, space... Khác keydown nhận cả phím chức năng.
Beforeupdate xảy ra khi thay đổi nội dung textbox, nếu không muốn thay đổi như nội dung không hợp lệ thì chọn cancel=true.
 
Upvote 0
Chào mọi người!
Tôi đang tìm hiểu về VBA và tôi có đoạn Code dưới đây, nhưng chưa hiểu ý nghĩa nó thế nào.
Bác nào rảnh thì giải thích giùm tôi nhé, xin cảm ơn.

bạn cứ đặt thử 1 lệnh Msgbox kèm theo ---> xem trình tự xảy ra của mỗi sự kiện,

Mã:
Private Sub TextBox1_KeyUp(ByVal KeyCode As MSForms.ReturnInteger, ByVal Shift As Integer)
    MsgBox "kich' hoat. TextBox1_KeyUp"
End Sub

tham khảo ví dụ cho dễ hiểu: http://www.giaiphapexcel.com/forum/showthread.php?92410-Giúp-em-bẩy-lổi-form-nhập-liệu-với-ạ
 
Upvote 0

Bài viết mới nhất

Back
Top Bottom