批处理之家 - Powered by Discuz! Board

标题: [问题求助] [已解决]为什么下面的VBS代码出现编译器错误？ [打印本页]

作者: 悬崖之树 时间: 2013-10-4 21:13 标题: [已解决]为什么下面的VBS代码出现编译器错误？

本帖最后由悬崖之树于 2013-10-6 18:29 编辑

Option  Explicit
Dim a
a = InputBox ("shuru")
If a >= 0 Then 
	If a < 10 Then 
		MsgBox "1"
	ElseIf a < 100 Then
		MsgBox "2"
	Else If a < 1000 Then 
		MsgBox "3"
	Else 
		MsgBox "太大了"
	End If 
Else
	MsgBox "太小了"
End If
复制代码

错误提示是：
未命名.vbs(14, 1) Microsoft VBScript 编译器错误: 缺少 'End'
可是我已经加了end了。

作者: apang 时间: 2013-10-4 23:24

Else If ≠ ElseIf

作者: 悬崖之树 时间: 2013-10-6 18:27

回复 2# apang

真是vbs编程大神啊，一语点醒梦中人。我当时调试了好多时间都没有发现呢，thank you very much !

欢迎光临批处理之家 (http://bbs.bathome.net/)