vbscript脚本编程(用vbscript脚本编写猜数字)

本文目录
- 用vbscript脚本编写猜数字
- msscript.ocx支持几种脚本
- 使用VBScript脚本语言编写一个函数,用来比较三个数字的大小,并返回最大值
- 使用VBScript脚本语言编写一个函数,用来比较两组数之间的包含关系,并返回结果
用vbscript脚本编写猜数字
dim i
do
i=int(1+10*rnd)
u=inputbox("系统已给定一个1~10间的数字,你猜它是多少(输入0,结束程序)","请输入","0")
u=cint(u)
if u=0 then exit do
j=1
do while u《》i
j=j+1
if u》i then
s="你猜的大了"
else
s="你猜的小了"
end if
u=inputbox(s & ",再猜! ","请输入","0")
u=cint(u)
loop
msgbox "你第" & j & "次猜对了,它是" & i
loop
msscript.ocx支持几种脚本
msscript.ocx是指 Microsoft Script Control 用于支持在 Visual Basic 等开发环境中使用脚本语言的 ActiveX 控件,它可以使开发人员轻松地将VB等开发语言的能力扩展到其他脚本语言中。而这些支持的脚本语言包括 JScript、VBScript、PerlScript 和 PythonScript 等。JScript 和 VBScript 是 msscript.ocx 最常用的脚本编程语言,JScript 是微软的一种基于 ECMA 语言标准的 JavaScript 实现,而 VBScript 是一种基于微软 VB 语言的脚本编程语言,使用 VBScript 可以快速方便地编写小型的应用程序。同时 msscript.ocx 还支持使用 Perl 和 Python 编写脚本,这些脚本语言也在一定程度上提高了开发效率。需要注意的是,msscript.ocx 支持的脚本语言是依赖于操作系统和在当前计算机的安装程序,也就是说如果没有安装相应的解析引擎或运行环境的话,msscript.ocx 也就无法解析相应的脚本语言。此外,如果使用 msscript.ocx 开发应用程序还需要遵守其相关的 API 编程规则。
使用VBScript脚本语言编写一个函数,用来比较三个数字的大小,并返回最大值
dim a,b,c,d
a=inputbox("请输入第一个数")
b=inputbox("请输入第二个数")
c=inputbox("请输入第三个数")
if a》=b and a》=c then d=a
if b》=a and b》=c then d=b
if c》=a and c》=b then d=c
msgbox "最大的数是" & d
使用VBScript脚本语言编写一个函数,用来比较两组数之间的包含关系,并返回结果
function ArrComp(arr1(), arr2())
s="|" & join(arr2,"|") & "|"
ArrComp=0
for i=0 to ubound(arr1)
if instr(s, "|" & arr1(i) & "|") then
ArrComp=ArrComp+1
s=replace(s, "|" & arr1(i) & "|", "|")
end if
next
end function
a1=array(2,2,2)
a2=array(2,3,2)
msgbox "数组a1在数组a2中的包含值为:" & ArrComp(a1,a2)

更多文章:
androidapp源码免费下载(如何实现APK的反编译得到APK的源码)
2026年9月22日 18:00
service pack 3(操作系统版本升级(SP) Service Pack 3当中的“Service Pack 3”是什么意思)
2026年9月22日 10:20
html代码怎么写大佬教程(html网页的题来个大佬,写代码,题目在图上)
2026年9月22日 10:10
结构体内又一个struct(c++ 在结构体中再嵌入一个结构体如何调用)
2026年9月22日 09:40
cocos creator中文(cocoscreator和cocoscreator3d的区别)
2026年9月22日 02:30





