Điều kiển con trỏ chuột theo ý muốn và thông báo tự đóng

[ZUNGNN]

Các bác cho hỏi trong 1 form có thể dùng hàm hoặc lệnh nào để điều khiển con trỏ vào đầu textbox này hoặc cuối textbox kia trong cùng 1 form. Ví dụ textbox ngày tháng thì nhảy vào đầu dòng để chỉnh sửa ngày, textbox năm sinh thỉ nhảy vào cuối dòng chỉ để sửa hàng đơn vị của năm sinh.v.v..

Ván đề thứ 2 nhờ các bác chỉ dẫn là trong AS có câu lệnh hoặc loại MSGbox nào để khi đưa ra thông báo thì msgbox sẽ tự đóng sau 1 khoảng thời gian nào đó (1s, 2s,..) mà không cần tác động của user, mục đích là để thông báo tiến trình xử lý .
Cảm ơn các bác hướng dẫn.

 

[nguoiconxunui]

Các bác cho hỏi trong 1 form có thể dùng hàm hoặc lệnh nào để điều khiển con trỏ vào đầu textbox này hoặc cuối textbox kia trong cùng 1 form. Ví dụ textbox ngày tháng thì nhảy vào đầu dòng để chỉnh sửa ngày, textbox năm sinh thỉ nhảy vào cuối dòng chỉ để sửa hàng đơn vị của năm sinh.v.v..

Ván đề thứ 2 nhờ các bác chỉ dẫn là trong AS có câu lệnh hoặc loại MSGbox nào để khi đưa ra thông báo thì msgbox sẽ tự đóng sau 1 khoảng thời gian nào đó (1s, 2s,..) mà không cần tác động của user, mục đích là để thông báo tiến trình xử lý .
Cảm ơn các bác hướng dẫn.

1. không biết he he
2. thử cái sau3s)

Private Sub Form_Load()
Dim AckTime As Integer, InfoBox As Object
Set InfoBox = CreateObject("WScript.Shell")
AckTime = 3
Select Case InfoBox.PopUp("Click OK or do nothing within 3 seconds.", _
AckTime, "This is your Message Box", 0)
Case 1, -1
Exit Sub
End Select

End Sub