标题: [VBA] 求教代码错误 [打印本页]

---

作者: 秋秋    时间: 2008-7-9 09:25     标题: 求教代码错误

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

Private Sub Form_Load()
TxtInput.Text = ""
TxtInput.TablIndex = 0
End Sub

---

作者: Nothing    时间: 2008-7-9 09:58

是
TxtInput.TabIndex = 0
不是
TxtInput.TablIndex = 0
你字母打多了一个

---

欢迎光临 编程开发论坛 (http://bbs.lihuasoft.net/)

Powered by Discuz! 6.0.0