VB 光标跳转问题,高手进
一个程序form1有个combo1和一个text1和一个command1,form2有个command1.程序打开时在combo1和text1输入内容后单击command...
一个程序form1有个combo1和一个text1和一个command1,form2有个command1.
程序打开时在combo1和text1输入内容后单击command1就会跳转到form2。form2单击了command1后又回到form1.
我想让程序打开的时候光标在combo1处,当form2跳转回form1时光标在text1处并选中之前输入容易怎么写?
问题还没解决...
只要打开程序的时候光标在combo1,form2返回form1的时候光标在text1. 展开
程序打开时在combo1和text1输入内容后单击command1就会跳转到form2。form2单击了command1后又回到form1.
我想让程序打开的时候光标在combo1处,当form2跳转回form1时光标在text1处并选中之前输入容易怎么写?
问题还没解决...
只要打开程序的时候光标在combo1,form2返回form1的时候光标在text1. 展开
2个回答
展开全部
formload 里用Combo1.SetFocus 好像会出错
后来我用 Combo1.TabIndex = 0 解决了
具体如下
form1 里写
Private Sub Command1_Click()
Me.Hide
Form2.Show
End Sub
Private Sub Form_Load()
'Combo1.SetFocus
Combo1.TabIndex = 0
End Sub
form2 里写
Private Sub Command1_Click()
Me.Hide
Form1.Show
With Form1.Text1
.SetFocus
.SelStart = 0
.SelLength = Len(.Text)
End With
End Sub
后来我用 Combo1.TabIndex = 0 解决了
具体如下
form1 里写
Private Sub Command1_Click()
Me.Hide
Form2.Show
End Sub
Private Sub Form_Load()
'Combo1.SetFocus
Combo1.TabIndex = 0
End Sub
form2 里写
Private Sub Command1_Click()
Me.Hide
Form1.Show
With Form1.Text1
.SetFocus
.SelStart = 0
.SelLength = Len(.Text)
End With
End Sub
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询