Question

vb中如果将检查框选了以后怎样让光标自动定位在相应的文本框中

Answer 1

在检查框的click事件中，写代码

Text1.SetFocus

追问

Private Sub Check1_Click()
If Check1.Value = 0 Then
Text1.Text = ""
Else
Text1.SetFocus = Text1.Text
End If
End Sub
提示缺少函数或变量，麻烦你了……

追答

Private Sub Check1_Click()
If Check1.Value = 0 Then
Text1.Text = ""
Else
Text1.SetFocus '就这样，光标会自动跳到文本框中去
End If
End Sub