自己做的闹钟程序，初学VB请别见笑~! - VB6论坛

purana

来　自：广东-广州
等　级：版主
威　望：66
帖　子：6039
专家分：0
注　册：2005-6-17

第 12 楼

得分:0

没怎讲
灌水而已.

我的msn: myfend@

2007-09-22 16:09

蓝色理想

等　级：新手上路
帖　子：6
专家分：0
注　册：2007-7-21

第 14 楼

得分:0

没装ＶＢ就是错

2007-09-22 16:20

缘吇弹

来　自：地球
等　级：版主
威　望：43
帖　子：3038
专家分：27
注　册：2007-7-2

第 16 楼

得分:0

以下是引用蓝色理想在2007-9-22 16:20:49的发言：
没装ＶＢ就是错

Dim I$
If I="听了你的话之后" & "没装VB" Then I="知错必改了"

Repeat Life=Study;Until (death);

2007-09-22 16:25

purana

来　自：广东-广州
等　级：版主
威　望：66
帖　子：6039
专家分：0
注　册：2005-6-17

第 18 楼

得分:0

end if没少.
建议楼上看看if语句的用法.

我的msn: myfend@

2007-09-22 16:44

那边有朵蘑菇云

来　自：很……那啥的一个地方
等　级：新手上路
威　望：1
帖　子：390
专家分：0
注　册：2007-9-3

第 20 楼

得分:0

Dim I$
If I="听了你的话之后" & "没装VB" Then
I="知错必改了"
ELSE
I=“我就不改，气死你”
end if

如果没ELSE 就直接 END IF

其实你们说的没END IF 也可以这件事是吧我也知道我也明白但是我自己在VB6.0环境下测试过没END IF
就一直提示我少 END IF END SELECT 之类的是不是和我加了option explicit有关系啊？如果没我XP Professional sp2 环境下安装的VB6.0 为什么我不写 END IF 编译测试时候就报告少END IF 呢？

身不残志更不坚

2007-09-22 17:16