Tạo thuộc tính cho nút OK trong form

[Hoàng Trọng Nghĩa]

Tôi không biết đặt tiêu đề như thế nào cho cụ thể nữa, cho nên tạm đặt là như vậy, mong thông cảm.

Như các Dialog hoặc form của Excel, tôi thấy mình chọn hoặc nhấn nút Tab vào bất cứ control nào ngoại trừ tab vào CommanButton thì khi ta bấm phím Enter nó đều bấm vào nút OK hết, vậy trong Userform, mình có thể tạo thuộc tính đó được không?

 

[huuthang_bd]

Em nghĩ cái này chắc phải tạo Macro gán vào sự kiện khi nhấn phím Enter cho các Control trên UserForm.

 

[sealand]

Bạn thiết lập Onkey khi mở form thì chắc là được.

 

[ndu96081631]

Tôi không biết đặt tiêu đề như thế nào cho cụ thể nữa, cho nên tạm đặt là như vậy, mong thông cảm.

Như các Dialog hoặc form của Excel, tôi thấy mình chọn hoặc nhấn nút Tab vào bất cứ control nào ngoại trừ tab vào CommanButton thì khi ta bấm phím Enter nó đều bấm vào nút OK hết, vậy trong Userform, mình có thể tạo thuộc tính đó được không?

Ví dụ thế này:

Private Sub UserForm_Initialize()
 CommandButton2.SetFocus
End Sub

Khởi động Form, bấm Enter sẽ tương đương với sự kiện CommandButton2_Click

 

[ptm0412]

Mỗi command button có 1 property là Default, giá trị là True và False Minh thiện thử xem file mẫu.

 

[ptm0412]

Ví dụ thế này:

Private Sub UserForm_Initialize()
 CommandButton2.SetFocus
End Sub

Khởi động Form, bấm Enter sẽ tương đương với sự kiện CommandButton2_Click

vấn đề là Focus đang ở các textbox mà enter vẫn chạy code của commandbutton cơ. Ngoài ra, khi mở form, textbox vẫn có focus để nhập liệu gì đó, mà vẫn enter cho button được.

 

[Hoàng Trọng Nghĩa]

Mỗi command button có 1 property là Default, giá trị là True và False Minh thiện thử xem file mẫu.

Cám ơn Sư phụ, đã rất đúng ý của em ạ!

 

[ptm0412]

Nhân tiện, muốn khi nhấn phím Esc trên bàn phím thì chạy code của Command button nào, thì set property "Cancel" của button đó là True.
Thử xem: Bất kể Focus đang ở đâu, kể cả focus đang ở button khác, kể cả button có Default = True, thì phím Esc cũng cướp quyền chạy code.