phuyen89
Thành viên tích cực
- Tham gia
- 20/11/08
- Bài viết
- 875
- Được thích
- 341
- Nghề nghiệp
- Student
Private Sub CommandButton1_Click()
If TextBox1.Text = "user" And TextBox2.Text = "pass" Then
F.Hide
Else
MsgBox "Sai mat khau."
Application.Quit
End If
End Sub
Private Sub CommandButton2_Click()
Application.Quit
End Sub
Các anh,chị ơi.Em tạo một cái Form đăng nhập.Nhưng còn cái nút OK.Để khi mà mình nhập xong,nhấn OK thì chấp nhận.Còn không muốn thì nhấn Cancel để hủy bỏ.Như vậy thì hai nút lệnh trên viết code như thế nào.Các bác hướng dẫn giùm.
Bạn click đôi vào nút OK rồi viết code như sau :
Nếu nhập 2 ô lần lượt là "user" và "pass" rồi bấm OK thì thoát form để vào Excel, nếu không thì thông báo sai mật khẩu và thoát Excel. Nếu bấm Cancel thì thoát Excel. Nhưng mà mình nghĩ cái code này chỉ để cho vui thôi, chứ người ta không cần nhập gì mà chỉ cần bấm Ctrl - Break thì cũng thoát form như thường.PHP:Private Sub CommandButton1_Click() If TextBox1.Text = "user" And TextBox2.Text = "pass" Then F.Hide Else MsgBox "Sai mat khau." Application.Quit End If End Sub Private Sub CommandButton2_Click() Application.Quit End Sub
Phương thức Hide chỉ ẩn thôi, muốn thoát khỏi không còn lưu luyến gì thì dùng Unload.
Em thử .Unload thấy không được, nó báo thế này :
Nhưng mà mình nghĩ cái code này chỉ để cho vui thôi, chứ người ta không cần nhập gì mà chỉ cần bấm Ctrl - Break thì cũng thoát form như thường.
Ctrl + Break chuyên dùng để "ngắt ngang" 1 tiến trình ---> Theo tôi thì bạn không nên cố gắng "cấm" nó ---> Sẽ có lúc bạn gặp trường hợp code bị lổi, chạy hoài không nghĩ thì còn có đường hậu mà thoát chứGiờ tôi mới biết cái vụ Ctrl+Break này đó, cám ơn bạn nhé. Theo bạn thì có code nào để không cho Ctrl+Break thi hành lệnh không?
Cám ơn.
Ctrl + Break chuyên dùng để "ngắt ngang" 1 tiến trình ---> Theo tôi thì bạn không nên cố gắng "cấm" nó ---> Sẽ có lúc bạn gặp trường hợp code bị lổi, chạy hoài không nghĩ thì còn có đường hậu mà thoát chứ
Nghiên cứu Application.Sendkeys xemThôi, nếu không có code cấm chạy Ctrl+Break, thôi thì đão lại, các Anh Chị có code nào để viết tương tự như Ctrl+Break hay không ạ?
Cũng đôi khi dùng Form, tác giả viết code muốn người dùng chỉ có thể thao tác trên Form mà thôi, ngoài ra "cấm" làm bất cứ thứ gì khác ---> Hợp lý thôi!Tại sao Excel có sẳn rồi mà ko xài? Mắt gì phải viết thêm một cái giống y chang người ta chi cho mệt nhỉ? Mà mục đích nó cũng giống y chang luôn? Thật là...
Thân.
Dạ, có những cái em muốn lợi dụng sự kiện lỗi để bẫy lỗi thôi ạ, nếu bấm vào đó thì nói gì nữa ạ.Nghiên cứu Application.Sendkeys xem
Nhưng thông thường ta chỉ bấm nút này khi code chạy bị treo thôi, đúng không? ---> Mà đã "treo" rồi thì bạn còn chạy được code nào khác nữa chứ ---> tự tay bấm Ctrl + Break cho lẹ