13问答网 > 初学VB求助：教材上的一段“短信平台”VB代码调试不错，请高手指点错在哪，急，谢谢！

初学VB求助：教材上的一段“短信平台”VB代码调试不错，请高手指点错在哪，急，谢谢！

2025-02-22 11:44:41

推荐回答（2个）

回答1：

载图代码和文本代码不一致。
1、文本代码错误：（注意空格）
代码：Private SubCmdUser1_Click()
应该是Private Sub CmdUser1_Click()
代码：IfCmdUser1.Caption = "发送" Then
应该是If CmdUser1.Caption = "发送" Then
2、载图代码错误：
载图： Private Sub SubCmdUser1_Click(Index As Integer)
请确认按键是否有下标如果没有应该是：
Private Sub CmdUser1_Click()

回答2：

是不是IF后面没空格？