我真搞不懂了,都说我错了,我真以为我错了,可是怎么就是没出错!!!怪了还! Private Sub Form_Load() Show Text1.SetFocus End Sub
我说的是程序启动的时候的第一个主窗体,而你说的是程序已经加载到内存以后,用show的方法显示另外一个窗体。 ___________________ form1的代码: Private Sub Command1_Click() Form2.Show End Sub ________________________________ form2的代码: Private Sub Form_Load() Show Text1.SetFocus End Sub 所以不相关了。
Form_Load发生时窗体加载但不显示,没有控件可以接受焦点。先得Me.Show
我的代码: Private Sub Form_Load() Me.Show Text1.SetFocus End Sub
大家试试,就一个from(上边有text1),下编的代码会出错?? Private Sub Form_Load() Show Text1.SetFocus End Sub
不会出错,你是对的!我错了!我认输!不好意思,我倒霉一点,两种情况都碰到过(出错/不出错) 如下:一个空白的程序,VB----SP5的条件下,在主窗体中写: Private Sub Form_Load() Show Text1.SetFocus End Sub h____________我想倒霉的不可能只有我一个吧?f_______________t 因为我想还是绝对不出错的代码好一点,所以我放了一下午的屁_________stop!!!
Show
Text1.Setfocus
Index=0
Private Sub Form_Load()
Show
Text1.SetFocus
End Sub
___________________
form1的代码:
Private Sub Command1_Click()
Form2.Show
End Sub
________________________________
form2的代码:
Private Sub Form_Load()
Show
Text1.SetFocus
End Sub
所以不相关了。
Private Sub Form_Load()
Me.Show
Text1.SetFocus
End Sub
'这不就行了:
TextX.TabIndex = 0
Private Sub Form_Load()
Show
Text1.SetFocus
End Sub
如下:一个空白的程序,VB----SP5的条件下,在主窗体中写:
Private Sub Form_Load()
Show
Text1.SetFocus
End Sub
h____________我想倒霉的不可能只有我一个吧?f_______________t
因为我想还是绝对不出错的代码好一点,所以我放了一下午的屁_________stop!!!
Private Sub Form_Load()
Show
Text1.SetFocus
End Sub
可以的,
To aqinag(刘志强):谢了