Question

VB缺少语句结束什么原因？

VB缺少语句结束什么原因？

Answer 1

你好！因为我的电脑上已经没有VB6了，所以无法通过运行验证你的代码，但是仍然想给你一些可能的答案。

　　首先，end sub 总是与 private sub成对出现的，但是在你的代码的结尾，就没有看到end sub，这是不合理的。可能被你误删了。

　　其次，也可能是在某个if语句之后，没有使用 end if 来结尾。但是由于你编写代码没有养成格式缩进的良好习惯，已经很难看出是在哪里缺少 end if 了。为此，给你两个建议：
　　一是在使用结构语句时，结构中的语句应该比关键词缩进3格，如果结构语句1之内嵌套着结构语句2，那么2中的语句依次再缩进3格，以此类推。这样的好处是，编写出来的代码，层次分明，便于阅读与分析。
　　二是在使用结构语句时，先把关键词都写完，并且其缩进完全相同，然后才填写其中的过程代码，这样的好处是保证关键词成对出现，不会缺失。

下面给一些例子，供你参考：

private sub　uiunxun()
dim i as integer
dim a as integer

for i = 0 to 10
if i < 5 then
a=a+2*i
else
a=a+i
end if
next i

do while a >0
a=a-1
loop
end sub

如此格式，便能脉络清楚，层次分明了。
我的回答，并不是希望得到你百度式的“采纳”，只是希望对你有所帮助我就满足了。

Answer 2

多了些空格，
0. 5 中间多了空格，
ComboB. Text 也多了空格
Else If 中间也不要空格
Picture1. ScaleW idth 也多两空格