主题:  很简单的一个vbscript问题``

airtiantian

职务:普通成员
等级:1
金币:0.0
发贴:5
注册:2002/7/15 11:33:00
#12002/7/15 11:34:37
很简单的一个问题``
在VBSCRIPT中``
想编写一个通过inputbox输入个数`然后我在一个数组里寻找`
找到则弹出显示`找不到也弹出另一个显示`怎么做?



玫儿

职务:普通成员
等级:1
金币:1.0
发贴:173
注册:2002/6/24 23:58:43
#22002/7/15 12:02:15
我怕VBS了~~!~



大雪糕

职务:普通成员
等级:2
金币:10.0
发贴:579
注册:2002/2/2 11:30:51
#32002/7/15 19:19:36
a=inputbox("请输入一个数","输入")
b=array("1","2","3","4","5")
dim i
for i=0 to ubound(b)
if a=b(i) then
msgbox("你输入的是"&b(i))
exit for
end if
next
if i>ubound(b) then
msgbox("数组中未找到,你输入的是"&a)
end if