PrivateSubForm_Load()Me.ShowText1.SetFocusEndSub注：要使得窗體先顯示出來，再設置Text1的焦點，不然會出錯的。擴展資料：VB中關于setfocus用法注意事項1、SetFocus函數發送WM_KILLFOCUS消息到失去鍵盤焦點的窗口，并且發送WM_SETFOCUS消息到接受鍵盤焦點的窗口，它也激活接受鍵盤焦點的窗口或接受鍵盤焦點的窗口的父窗口。

2、若一個窗口是活動的，但沒有鍵盤焦點，則任何按鍵將會產生WM_SYSCHAR,WM_SYSKEYDOWN或WM_SYSKEYUP消息。

若VK_MENU鍵也被按下，則消息的IParam參數將設置第30位，否則，所產生的消息將不設置此位。

3、使用AttachThreadInput函數，一個線程可將輸入處理連接到其他線程。

這使得線程可以調用SetFocus函數為一個與其他線程的消息隊列相關的窗口設置鍵盤焦點。