Я хочу установить внимание на текстовое поле на одной форме от другой формы. Как я выполняю это в VB6?
Предполагая, что FormA хочет установить сфокусируйтесь на Text1 на FormB Я думаю, вы могли бы просто сделать что-то вроде:
В FormB создайте подпрограмму с именем FocusOnText1
и в этой подпрограмме укажите код Text1.SetFocus
, а затем просто вызовите этот суб из FormA.
Однако, как говорит Джангвеньи, вам нужно убедиться, что он виден, поэтому я предлагаю добавить что-то вроде его оператора if в подпрограмму FocusOnText1
, иначе вы можете получить ошибки (я думаю, ошибка 5).
при условии, что у вас есть Form1 и Form2 с TextBox на Form2 в command1_click в Form1-Modul:
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
Вы не можете установить фокус на текстовое поле в другой форме, если эта форма не отображается. Поэтому сначала проверьте, видна ли форма
If (form2.Visible)
begin
txtBox2.SetFocus()
end