编程论坛 → VB6论坛

遇到麻烦了，大神来看看！~

VB丶小宇发布于 2013-03-11 12:06， 426 次点击

最近闲来无事，编一个小程序，请看一下代码：
Private Sub Command1_Click()
TxInput.Text = ""
TxInput.TabIndex = 0
End Sub

Private Sub CmdCancel_Click()
TxInput.Text = ""
TxInput.SetFocus
End Sub

Private Sub CmdOk_Click()
If TxInput.Text = "123456" Then MsgBox ("密码正确！") Else MsgBox ("密码错误，请重新输入。")
TxInput.Text = ""
TxInput.SetFocus
End Sub

Private Sub Form_Load()
TxInput.Text = ""
TxInput.TabIndex = 0
End Sub
一运行就会出现实时错误424，要求对象，请问大神怎么改，万分感谢！~

7 回复

#2

lowxiong2013-03-11 12:14

代码没什么大的问题，可以运行。“要求对象”提示一般是控件名称不对应，如你代码中TxInput文本控件名称不对，你仔细检查下。

#3

VB丶小宇2013-03-11 12:22

回复 2楼 lowxiong

感谢解答，我马上查看一下

#4

VB丶小宇2013-03-11 12:26

回复 2楼 lowxiong

出现错误后，我点调试，代码中的
Private Sub Form_Load()
TxInput.Text = ""
TxInput.TabIndex = 0
End Sub
TxInput.Text = ""这一行代码呈现黄色，请问是不是这一行代码有错误，应该怎么改？

#5

风吹过b2013-03-11 13:43

窗体上没这个名字的控件。

按照你学习用的书上面控件说明去改控件名字。

这个应该是窗体上你用来输入密码的那个 TEXTBOX 控件的名字。你到你的窗体上看一下。

#6

VB丶小宇2013-03-11 14:44

回复 5楼风吹过b

您好，感谢您的解答，我还是不太明白怎么改。

#7

xbj_hyml2013-03-11 17:50

回到窗体设计界面
以你拖动Button的方式拖动一个文本框TextBox到窗体上
将TextBox的名称改为TxInput
运行

#8

VB丶小宇2013-03-11 19:34

回复 7楼 xbj_hyml

您好，具体怎样操作？还是不懂，麻烦加下QQ：371856173

1