vb中错误424是什么？为什么我不行？

来源：百度知道编辑：UC知道时间：2024/06/01 23:29:10

我的代码如下：Private Sub Command1_Click()
If Text1.Text = "123456" Then '当Text1内容等于123456 然后
If Text2.Text = "aaa" Then '当Text2内容等于aaa 然后
MsgBox "您成功登陆！", , "欢迎登陆" '这句是满足上面条件的时候提示登陆成功！
From1.Hide 'from1不显示 , 或者设置为退出也可以。
From2.Show 'from2显示前提是TEXT满足条件后。

End If

Else

Text1.Text = ""
Text2.Text = ""
MsgBox "密码错误", , "提示" '当Text1和Text2为空的时候提示密码错误。
End If
End Sub

为什么是错误424要求对象

首先确定有没有添加窗体form2，没有的话工程—》添加窗体
再次貌似你的代码有问题，if 的用法还不太清晰
Private Sub Command1_Click()
If Text1.Text = "123456" And Text2.Text = "abc" Then
MsgBox "登陆成功！！", , "欢迎登陆"
Form1.Hide
Form2.Show
Else
Text1="
Text2=""
MsgBox "密码错误"
End If
End Sub

请具体说明出错的语句（即报错时自动选中的代码）

VB中下标越界是什么错误啊为什么VB中会出现这样的计算错误 vb 中为什么会输入超过文件尾的错误为什么我的电脑不能玩波斯王子?出现的错误显示都是显卡不行?它的显卡要求是什么? vb中如何跳过错误谁帮我检查一下，为什么这个VB语句错误？ VB 错误424,怎么回事 VB 实时错误 424 vb错误424 为什么VB中复制别人的代码到自己的工程中会出现错误?

vb中错误424是什么？ 为什么我不行？

vb中错误424是什么？为什么我不行？