UC知道各位高手帮我看一下，这段VB程序错在哪了
来源：百度知道 编辑：UC知道 时间：2024/05/12 10:47:02
Private Sub Form_Load()
Show
For a = 0 To 80
For b = 0 To 40
For c = 0 To 16
If a + b + c = 30 And a + b * 2 + c * 5 = 80 Then
n = n + 1
Print Tab(2); "壹元张数："; a
Print Tab(17); "贰元张数："; b
Print Tab(32); "伍元张数："; c
End If
Next c, b, a
Print "人民币取法的总数为：": n
End Sub
为什么运行的时候总是提示“缺少子程序，函数或属性”
Show
For a = 0 To 80
For b = 0 To 40
For c = 0 To 16
If a + b + c = 30 And a + b * 2 + c * 5 = 80 Then
n = n + 1
Print Tab(2); "壹元张数："; a
Print Tab(17); "贰元张数："; b
Print Tab(32); "伍元张数："; c
End If
Next c, b, a
Print "人民币取法的总数为：": n
End Sub
为什么运行的时候总是提示“缺少子程序，函数或属性”
Private Sub Form_Load()
Show '这里是缺少的过程吧
For a = 0 To 80
For b = 0 To 40
For c = 0 To 16
If a + b + c = 30 And a + b * 2 + c * 5 = 80 Then
n = n + 1
Print Tab(2); "壹元张数："; a ‘这里没有问题
Print Tab(17); "贰元张数："; b
Print Tab(32); "伍元张数："; c
End If
Next c, b, a
Print "人民币取法的总数为：": n
End Sub
在你的、print那一块找毛病吧。有些格式不对，再看看提示信息，是说媒没有函数，或是子程序，说明你写的格式是在引用程序，所以你要检查一下你的格式。好长时间没有编VB了，具体的也不记得了，但是这一块可能有问题！