VB6 - 将焦点设置在另一个表单上的文本字段中

Question

我想将焦点设置在一个表单上的文本字段中，而不是另一个表单。 我如何在VB6中实现这一目标？

Answer 1

假设您在Form2上有Form1和Form2以及TextBox 在Form1-Modul的command1_click中：

Private Sub Command1_Click()
    Load Form2
    Form2.Show
    Form2.SetFocus
    If Form2.Text1.Visible And Form2.Text1.Enabled Then
        Form2.Text1.SetFocus
    End If
End Sub

Answer 2

如果该窗体不可见，则无法将焦点设置为其他窗体上的文本字段。 因此，您应首先检查表单是否可见

If (form2.Visible)
begin
 txtBox2.SetFocus()
end

Answer 3

假设FormA想要将​​重点放在FormB上的Text1上，我认为你可以这样做：

在FormB中创建一个名为FocusOnText1的子组件，并在该子组件中包含代码Text1.SetFocus，然后从FormA调用该子组件。

正如Jangwenyi所说，你需要确保它是可见的，所以我建议在FocusOnText1 sub中添加类似if语句的内容，否则你可能会收到错误（我认为错误5）。