在线客服:
亚博买球 亚博买球
全国服务热线:010-53193650
您的位置:首页 > 新闻中心 >

VBScript语法

浏览 213次 来源:【jake推荐】 作者:-=Jake=-    时间:2021-01-07 20:05:33
[摘要] 是一种脚本语言'脚本语言是一种轻量级的编程语言也可以直接建一个vbs类型的文本文件,windows上可以点击运行文档中插入脚本,请使用utilelseif语句:语句:程序,我们可使用两种程序:子程序和函数程序。'函数程序:'调用子程序或函数程序'可以这样调用某个函数:语句:

'---------------------------------------------- -------------------------------------------------- -

'---------------------------------------------- -------------------------------------------------- -

'---------------------------------------------- -------------------------------------------------- -

'VBScript是一种脚本语言

“脚本语言是一种轻量级的编程语言

'VBScript是Microsoft编程语言Visual Basic的轻量级版本

'如何运作?1.将VBScript插入HTML文档时,Internet浏览器将读取该文档并解释VBScript。 VBScript可以立即执行,也可以在以后的事件发生时执行。

'2.也可以直接创建vbs类型的文本文件,您可以单击以在Windows上运行

'---------------------------------------------- -------------------------------------------------- -

'--------------如何在HTML文档中放置VBScript --------------

'

'

'

'

'

'

'上面的代码将生成以下输出:

“您好,来自VBScript!

'要在HTML文档中插入脚本电竞下注app ,请使用

'如何处理旧版浏览器

'不支持脚本的旧版浏览器会将脚本显示为网页的内容。为了避免这种情况,我们可以使用HTML注释标签:

'---------------------------------------------- -------------------------------------

'---------------------------------------------- -------------------------------------------------- -

'在使用时循环

dim a,ctr

ctr = 0

const pass =“ 123456”

在点击ctr a = inputbox(“请输入密码”)时执行

如果a = pass,则

msgbox“身份验证成功”

msgbox“(您可以在此处添加一些信息)”

退出做

其他

ctr = ctr + 1'如果密码错误,请增加错误的身份验证计数。

msgbox“验证错误,请检查密码”

如果结束

循环

'以这种方式实现的功能与前面的示例完全相同,让我们看一下放到循环后面的位置:

'功能是相同的,为什么要放在循环之后?通过将ctr的值更改为3,您会知道,而do之后的程序将直接退出,并且在循环之后将允许进行身份验证。循环结束。相反,while是直到,其用法与while是相同的凤凰彩票app ,但是它仅在以下表达式的值为false(表达式无效)时才执行循环主体。

dim avbscript语法,ctr

ctr = 0

const pass =“ 123456”

a = inputbox(“请输入密码”)

如果a = pass,则

msgbox“身份验证成功”

msgbox“(成功后,您可以在此处添加一条信息)”

退出做

其他

ctr = ctr + 1'如果密码错误,请增加错误的身份验证计数。

msgbox“验证错误,请检查密码”

如果结束

在点击率时循环

'---------------------------------------------- -------------------------------------------------- -

'---------------------------------------------- -------------------------------------------------- -

'---------------------------------------------- -------------------------------------------------- -

'为

昏暗我凤凰彩票代理 ,j

对于i = 1到9

对于j = 1到9

str = str&i * j&“”'&是串联字符串的符号

next'每个下一个对应于一个

str = str&vbCrlf'vbCrlf等效于键盘上的Enter键,因为您无法在键盘上键入内容,因此系统定义了默认常量

下一个

msgbox(str)

'---------------------------------------------- -------------------------------------------------- -

'---------------------------------------------- -------------------------------------------------- -

'---------------------------------------------- -------------------------------------------------- -

'数组

'一个位数组

dim name(7),str'共有8个学生,str变量用于将它们存储为输出的字符串

对于i = 0到7

name(i)= inputbox(“请输入第一个&i + 1和“学生的姓名”)

str = str&“”&名称(i)

下一个

msgbox Str

“二维数组

dim a(2,2)'从零开始,总共有3 X 3 = 9个数据

昏暗的我,需要两个柜台

对于i = 0到2

对于j = 0到2',请使用嵌套循环

a(i,j)=“ X”

下一个

下一步

'dim info(4,2)'共有5个人,有3种类型的数据要存储

昏暗我,j

对于i = 0到4

对于j = 0到2

dim opt'定义一个变量以存储数据项提示

选择案例j'判断应输入哪些数据

情况0

opt =“名称”

案例1

opt =“国籍”

案例2

opt =“国籍”

结束选择

info(i,j)= inputbox(“请输入第一个”,“ i + 1”和“个人”和“选择”)

下一个

下一步

“三维数组

dim a(1,2,3)'共有24个数组元素。

'---------------------------------------------- -------------------------------------------------- -

'---------------------------------------------- -------------------------------------------------- -

'---------------------------------------------- -------------------------------------------------- -

'如果...然后... Elseif

'如果要选择要执行的多组代码之一,则可以使用if ... then ... elseif语句:

如果付款=“现金”,则

msgbox“您要付现金!”

elseif payment =“ Visa”然后

msgbox“您将使用签证付款。”

elseif payment =“ AmEx”然后

msgbox“您将要使用美国运通卡付款。”

其他

msgbox“未知付款方式。”

如果结束

'---------------------------------------------- -------------------------------------------------- -

'---------------------------------------------- -------------------------------------------------- -

'---------------------------------------------- -------------------------------------------------- -

“选择案例”

'如果要选择要执行的多组代码之一凤凰彩票代理 ,则可以使用SELECT语句:

选择案例付款

“现金”案例

msgbox“您要付现金”

案例“签证”

msgbox“您将使用签证付款”

“ AmEx”案例

msgbox“您要使用美国运通卡付款”

其他情况

msgbox“未知付款方式”

结束选择

'---------------------------------------------- -------------------------------------------------- -

'-----------------------------------编程方法--------- ---------------------------------------------

'---------------------------------------------- -------------------------------------------------- -

'子例程,此子例程不返回值。

'功能程序vbscript语法,如果要返回某个值,可以使用功能程序。

'VBScript程序,我们可以使用两种程序:子程序和功能程序。

'子例程:

'是一系列语句,封装在Sub和End Sub语句中。

'可以执行某些操作,但不会返回任何值。

'可以通过程序调用将参数传递给子例程。

'否则,您必须使用空括号

Sub mysub()

一些陈述

结束子

Sub mysub(argument1,argument 2)

一些陈述

结束子

'功能程序:

'是一系列语句,封装在Function和End Function语句中。

“执行某些操作并返回值。

'可以通过程序调用将参数传递给它。

'否则,您必须使用空括号

'通过为功能程序名称分配值,它可以返回一个值。

函数myfunction()

一些陈述

myfunction =某个值

结束功能

函数myfunction(argument1,argument 2)

一些陈述

myfunction =某个值

结束功能

'调用子程序或功能程序

'您可以调用这样的函数:

名称= findname()

'此函数名为“ findname”,该函数返回一个值,该值存储在变量“ name”中。

'或者您可以这样做:

msgbox“您的名字是”&findname()

'我们调用了一个名为“ findname”的函数,该函数返回的值将显示在消息框中。

'您可以这样调用子程序:

致电MyProc(参数)

'或者,您可以省略Call语句:

MyProc参数

老王
本文标签:ctr,msgbox,vbscript

推荐阅读

最新评论