VB6中调用from2窗体 点击按钮无响应？

Question

在from1窗体中点击按钮调用from2 窗体，却发现弹出的窗体内容无法点击，这是为什么？ 
而且我调试from2中代码，每次按F8弹出的都是from1，这是怎么回事？

Answer 1

弹出Form2窗体后，要设置焦点：form2.setfocus
 Form2.Show
 Form2.SetFocus

Answer 2

form2控件必须得到焦点
比如FORM2上有text1sub command1_click()
FORM2.show 1
FORM2.text1.SetFocusend sub

Answer 3

试过了还是不行。
from1的代码是：Private Sub Command1_Click()
 Form2.Show
 Form2.SetFocusEnd Sub
form2 的代码是：
Private Sub Command1_Click()
Dim name As String
Dim password As String  name = Text1.Text
  password = Text2.Text
  
 Dim CN  ' As ADODB.Connection                 '定义数据库的连接
    Dim Rs  'As New ADODB.Recordset
    Set CN = CreateObject("adodb.connection")
    Set Rs = CreateObject("adodb.recordset")
    
    CN.ConnectionString = "Provider=sqloledb;Data Source=10.10.2.14;persist Security Info=True;Initial Catalog=kemdo;User Id=sa;Password=5868;"    CN.Open      Sql = "select  * from dbo.RAM_USER where DISPATCH_ID=&'& name &'&"
      Rs.Open Sql, CN, 1, 3    If password = Rs.USER_PWD Then
      Load Form1
      Else
      MsgBox "用户名或密码错误"
      End If
      End SubPrivate Sub Form_Load()
  Form2.SetFocusForm2.ShowEnd Sub

Answer 4

可以了，多谢指教。我是从VBA转到vb6的，感觉还是有很多不一样。