Thiết kế UserForm bài số 02: Tạo form đăng ký thông tin cá nhân

tuhocvba

Administrator
Thành viên BQT
Bài học thiết kế số 01, bạn xem ở đây:
__________________
Sự tỷ mỉ tới từng chi tiết sẽ cho ra một cái form rất đẹp. Cùng đọc bài viết sau nhé.
Tôi có cái form như sau:
Bạn cần đăng nhập để thấy hình ảnh

Và tôi muốn cải thiện nó.
Bạn cần đăng nhập để thấy hình ảnh

Như vậy tôi sẽ sử dụng một dải Label, để màu xám, và Caption là rỗng "".
Sau vài lần ấn Backward thì nút bấm đã hiện lên trên label.
Bạn cần đăng nhập để thấy hình ảnh

Kết quả:
Bạn cần đăng nhập để thấy hình ảnh

Tôi nghĩ là cần thêm dòng tiêu đề cho một form, như thế thì thông tin đến người sử dụng được đầy đủ hơn. Vì thế tôi cần một label nữa cho lên đầu.
Bạn cần đăng nhập để thấy hình ảnh

Chợt nhớ tới form đăng ký bất cứ một forum nào đều có những trường thông tin bắt buộc. Tôi giả định địa chỉ mail là trường thông tin bắt buộc.
Vậy tôi cần một label để caption = "*"
Bạn cần đăng nhập để thấy hình ảnh

Tôi muốn khi ấn nút thì chữ trên nút ấn hiện màu đỏ, và khi nhả nút ấn ra thì chữ trên nút ấn hiện trở lại màu đen.
Bạn cần đăng nhập để thấy hình ảnh

Vì thế tôi thêm các sự kiện Enter và Exit cho nút bấm:
Mã:
Private Sub CommandButton2_Enter()
    CommandButton2.ForeColor = vbRed
End Sub

Private Sub CommandButton2_Exit(ByVal Cancel As MSForms.ReturnBoolean)
    CommandButton2.ForeColor = vbBlack
End Sub
Cùng xem video sau nhé:
Bạn cần đăng nhập để thấy đa phương tiện
Nguồn tham khảo:
 
Top