Hỏi về code thoát Form! (1 người xem)

[vova2209]

Em muốn thoát form bằng nút Esc thì phải làm như nào ạ. Em xin cảm ơn

 

[ndu96081631]

Em muốn thoát form bằng nút Esc thì phải làm như nào ạ. Em xin cảm ơn

View attachment 184504

Trong cửa sổ VBA, chọn nút "Lối thoát", đặt thuộc tính Cancel = True
Vậy là xong

 

[vova2209]

Trong cửa sổ VBA, chọn nút "Lối thoát", đặt thuộc tính Cancel = True
Vậy là xong

View attachment 184506

Vâng được rồi ạ!
Em hỏi thêm chút nữa khi show form lên muốn đặt thời gian khoảng 5s thoát thì làm như nào ạ

 

[vova2209]

Thoát form trong 3s bị lỗi là sao thầy!
Sub ShowMenu()
Application.OnTime Now + TimeValue("00:00:05"), "ThoatForm3s"
MenuForm.Show
End Sub
Private Sub ThoatForm3s()
Unload Me
End Sub

 

[ndu96081631]

Thoát form trong 3s bị lỗi là sao thầy!
Sub ShowMenu()
Application.OnTime Now + TimeValue("00:00:05"), "ThoatForm3s"
MenuForm.Show
End Sub
Private Sub ThoatForm3s()
Unload Me
End Sub

Unload Me là.. trật lất! "Me" là cái gì. Ở tại "nhà mình" (tức ở ngay trong cái UseForm của mình) thì mình nói "me" nó hiểu là "tôi". Ở chỗ khác nó chẳng hiểu đâu. Phải ghi rõ họ tên, số CMND vào ---> Unload MenuForm mới xong

 

[vova2209]

Unload Me là.. trật lất! "Me" là cái gì. Ở tại "nhà mình" (tức ở ngay trong cái UseForm của mình) thì mình nói "me" nó hiểu là "tôi". Ở chỗ khác nó chẳng hiểu đâu. Phải ghi rõ họ tên, số CMND vào ---> Unload MenuForm mới xong

Vâng đúng rồi ạ! em cảm ơn thầy..