Question

VB：实时错误424，要求对象。求解决方法

使用版本：VB6.0 企业版
代码：
Private Sub Command1_Click()
If Text1.Text = "我已阅读并同意用户须知" Then From2.Show Else: Text1.Text = "错误"
End Sub
设计方案：
当用户点击按钮1时，如果文本框1为“我已阅读并同意用户须知”，则转到窗体2。否则，文本框1显示“错误”。
请各位帮忙指点一下究竟是什么地方有问题，再把修改后的源码发上来。谢谢了~
已经创建了窗体2，当前在窗体1。

Answer 1

Private Sub Command1_Click()
If Text1.Text = "我已阅读并同意用户须知" Then Form2.Show Else: Text1.Text = "错误"
End Sub
;错误是你打错了一个字form2错成from2

Answer 2

可能是你缺少了某个控件，你看黄色的报错信息在哪，还有可能是你控件不缺，但是代码中控件的名称不是默认的。

Answer 3

可能是你缺少了某个控件，你看黄色的报错信息在哪，还有可能是你控件不缺，但是代码中控件的名称不是默认的。

Answer 4

可能是你缺少了某个控件，你看黄色的报错信息在哪，还有可能是你控件不缺，但是代码中控件的名称不是默认的。

Answer 5

拼写错误 From2改为 Form2