最近闲来无事，编一个小程序，请看一下代码：
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，要求对象，请问大神怎么改，万分感谢！~

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

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

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

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

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

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

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

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

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