料青山看我应如是
Private Sub Form_Load()Me.ShowText1.SetFocusEnd Sub注：要使得窗体先显示出来，再设置Text1的焦点，不然会出错的。扩展资料：VB中关于setfocus用法注意事项1、SetFocus函数发送WM_KILLFOCUS消息到失去键盘焦点的窗口，并且发送WM_SETFOCUS消息到接受键盘焦点的窗口，它也激活接受键盘焦点的窗口或接受键盘焦点的窗口的父窗口。2、若一个窗口是活动的，但没有键盘焦点，则任何按键将会产生WM_SYSCHAR,WM_SYSKEYDOWN或WM_SYSKEYUP消息。若VK_MENU键也被按下，则消息的IParam参数将设置第30位，否则，所产生的消息将不设置此位。3、使用AttachThreadInput函数，一个线程可将输入处理连接到其他线程。这使得线程可以调用SetFocus函数为一个与其他线程的消息队列相关的窗口设置键盘焦点。