下载
加入VIP
  • 专属下载特权
  • 现金文档折扣购买
  • VIP免费专区
  • 千万文档免费下载

上传资料

关闭

关闭

关闭

封号提示

内容

首页 VBS编程教程

VBS编程教程.doc

VBS编程教程

Honey静丫头
2017-09-18 0人阅读 举报 0 0 暂无简介

简介:本文档为《VBS编程教程doc》,可适用于综合领域

VBS编程教程VBS编程教程发现大部分黑白的朋友都不会编程,这可不是件好事,所以这次我就写了一个简单的编程教程,讲一下VBScript主要面向菜鸟,懂得编程的朋友就不要浪费时间了,如果你想接触以下VBScript也可以,但既然有编程基础推荐直接去找一些参考书来读,会比较快什么是VBScript呢VBScript的全称是:MicrosoftVisualBasicScriptEditon(微软公司可视化BASIC脚本版)正如其字面所透露的信息,VBS(VBScript的进一步简写)是基于VisualBasic的脚本语言我进一步解释一下,MicrosoftVisualBasic是微软公司出品的一套可视化编程工具,语法基于Basic脚本语言,就是不编译成二进制文件,直接由宿主(host)解释源代码并执行,简单点说就是你写的程序不需要编译成exe,而是直接给用户发送vbs的源程序,用户就能执行了我知道菜鸟现在最关心的就是用什么工具来开发VBS程序了,答案是:记事本(Notepad)我不是开玩笑,其实任何一种文本编辑器都可以用来开发VBS开发,只不过记事本是由系统自带的,比较好找而已尽管如此,我还是建议你去下载一个专业的文本编辑器,因为这些工具可以提供"语法高亮"等功能,更加方便开发,用哪一个随你喜好,我比较喜欢EditPlus()OK,我们先来写一个VBScript程序热热身REM输入并回显你的名字’使用InputBox和Msgbox函数Dimname,msgmsg="请输入你的名字:"name=Inputbox(msg,"名称")Msgbox(name)把上面的程序清单输入到记事本里面,然后保存为以vbs为扩展名的文件("保存类型"里面选择"所有文件")然后双击运行,观察运行结果注意:请自己输入程序清单,不要复制>粘贴!我来解释一下这个程序,第一行和第二行的开头分别是"REM"语句和"’",这两个东西的作用是相同的,表示本行是注释行,就是说这两行什么也不干,只是用来说明这段程序的功能,版权信息等等注释行是程序最重要的部分之一,尽管它不是必需的,但对于其他人阅读源代码,以及自己分析源代码是很有好处的好的习惯是在必要的地方加上清晰,简洁的注释Dim用来声明一个变量,在VBS中,变量类型并不是那么重要,就是说VBS会帮你自动识别变量类型,而且变量在使用前不一定要先声明,程序会动态分配变量空间在VBS中你不用考虑name储存的是一个整数还是一个小数(学名叫"浮点数"),也不用考虑是不是字符串(一串字符,比如:"HelloWorld"),VBS会自动帮你搞定所以第三行语句可以删除,效果不会变,但我强烈反对这么做,一个变量的基本原则就是:先声明,后使用变量名用字母开头,可以使用下划线,数字,但不能使用vbs已经定义的字,比如dim,也不能是纯数字下一行被称之为"赋值","="是赋值符号,并不是数学中的等于号,尽管看起来一样这是正统的理解,你要理解成等于也没有什么不可赋值号的左边是一个变量,右边是要赋给变量的值,经过赋值以后,msg这个变量在程序中等同于"请输入你的名字:"这个字符串,但当msg被再次复制的时候,原值就会消失不光字符串,其他任何变量都这样被赋值,例如:a=,b=等等再往下,Inputbox和Msgbox是VBS内建的函数,一个函数就相当于一个"黑箱",有输入(参数)和输出(返回值),你可以不用了解函数是怎么运作的,只要了解这个函数能干什么就行了,我们也可以定义自己的函数,不过那要等到以后再讲现在我们只要了解,一个函数可以有返回值也可以没有,可以有参数也可以没有例如Inputbox就是有返回值的函数,我们用赋值号左边的变量来"接"住InputBox的返回值就是你输入的内容在inputbox右边的括号里是参数列表,每个参数用","分隔开,每个参数有不同的功效,比如第一个参数会显示在提示里,我们把msg这个变量作为第一个参数传给了Inputbox函数,而msg="请输入你的名字:",所以我们在对话框的提示栏就会看到"请输入你的名字:"第二个参数是对话框的标题,我们用直接量(学名叫"常量",这里是"字符串常量")传递给函数,当然你也可以传递变量Inputbox还有很多参数,比如你在"名称"后面再加一个","然后输入随便一串字符(字符串,用双引号""包裹起来的一串字符叫做字符串)然后运行,看看结果你会发现用于输入的文本框有了默认的值,这就是第三个参数的作用VBS编程教程Msgbox函数是用来输出的函数,在VBS中没有专门的输出函数(BASIC中的print,C中的printf),所以我们只能用对话框来观察输出结果,Msgbox的必要参数只有一个,就是要输出的内容,在这种情况下,我们不需要理会msgbox的返回值关于Msgbox和Inputbox我们以后还会在讨论,今天只是热热身,到此为止要点:)注释(以REM或’开头)行在程序中不起作用,但能让别人更容易读懂你的程序)变量好像一个盒子,或一个代号,可以代表你想代表的东西变量赋值使用"=")以""包裹起来的字符称之为"字符串")函数像一个"黑箱",有参数和返回值,用"="左边的变量可以接住返回值)Inputbox函数弹出一个输入对话框,Msgbox则用于输出作业:)试验Inputbox的第三个参数)写一段程序输出你的年龄)写一段程序进行次输入,分别输入你和你父母的姓名(要求显示提示),并分次输出第二篇:我真没想到,第一次的作业竟然有人不会看来要讲的非常非常细致才行,嗯,今天讲各种"量"和基本运算先说常量,这个比较简单什么是常量呢,常量就是其值不可变化的量常量分为两种:第一种,自然常量这叫是因为它们本身就是常量,你怎么更改的值呢他永远都是,不可能变成如果你在程序中使用"=",这样的语句将会引发一个错误同样的,字符串也是常量(还记得字符串吗就是包裹在""之间的一串字符),"HelloWorld"就是一个例子,如果你使用"HelloWorld"="Bye"这样的语句同样会引发一个错误你能举出自然常量的更多例子吗第二种,是我们自己定义的常量,这种量也使用代号,他们也被赋值,但和变量的不同点在于,他们在定义的时候被赋值,以后就不能改变了,如果企图改变将会引发一个错误定义一个变量,我们使用"const"这个关键字(关键字的意思是系统定义了有特殊功能的字,不能作为变量名或常量名使用),格式是:const常量名=常量值例如:constPI=constNAME="记忆碎片"这样我们就定义了两个常量,PI和NAME,一般说来,常量名全部使用大写,但也可以不用,随你喜好将一些在程序中不需要改变的值定义为常量是个好习惯,这样能防止不必要的意外另外,使用自定义常量也可以减少你的工作量比如:msgbox("HelloWorld")msgbox("HelloWorld")msgbox("HelloWorld")msgbox("HelloWorld")msgbox("HelloWorld")这个程序输出五次HelloWorld,如果你想要改变输出为ByeBye,就必须修改全部程序,当然你可以手动修改次,但如果你要输出次呢常量就可以替我们解决这个问题:consthw="HelloWorld"msgbox(hw)msgbox(hw)msgbox(hw)msgbox(hw)msgbox(hw)这样当你要修改输出的时候只要修改hw的值就行了好了,现在我们来看看编程的第一块重要"基石":变量解释变量最好的办法我觉得是"盒子",一个变量好像一个盒子,里面只能装一个东西,当你要装进去别的东西的时候必须把原有的东西拿出来这个"盒子"是有名称的,当你在程序中使用变量的时候,系统会打开盒子取出里面的东西,让这些东西参与处理,而不是盒子有些语言是很依赖"盒子"里面装些什么东西,这样才能找到合适的"盒子"(比如C语言),但VBS给我提供的是能够自动伸缩的"魔术盒",我们不用关心装进去的是什么东西,VBS会自动调整盒子的大小例如:Dima,a,aa=a=a="Hello"而不用像C语言那样麻烦:或者是VB的正规声明(VB可以声明也可以不用)那样:intaDimaasintegerfloataDimaasDoublechar*aDimaasstrnig作者:*:回复此发言VBS编程教程a=a=a=a=a="Hello"a="Hello"嗯……扯远了……变量有什么用呢哇,那用处可大了最简单,你并不能确定程序运行时变量的值,比如前一节课我们编的输入姓名的程序,你不能确定InputBox返回的是什么(还记得Inputbox的返回值吗就是你输入的内容),所以你就没有办法应对各种情况,但我们用name这个"盒子"把用户的名字装起来,到用的时候我们只要知道name这个盒子的名字就行了,系统会自己打开他并把里面的内容拿出来用再举个例子,我们编写一个程序计算一个矩形的面积,比如这个程序要发给小学生使用:dima,b,sa=b=s=a*bmsgbox(s)这样就可以求出长为,宽为的矩形的面积了,是不是很简单当然,这个程序也可以这样写:dimss=*msgbox(s)这样看起来程序短了许多,也节约内存,但并不是鼓励的做法,为什么请看下面现在,我们的程序要变得像点样子才行,谁的程序写出来还要别人修改源代码才能用啊所以,我们要接受用户的输入,还记得吗InputBox函数修改后程序如下:dima,b,sa=inputbox("请输入矩形的长:")b=inputbox("请输入矩形的宽:")s=a*bmsgbox(s)ok,这么一修改,无论用户输入怎样的数据,我们都能计算出矩形的面积了如果你用s=*能改嘛当然不行我想你已经发现了,vbs中的数学计算和真正的算术没有什么不同,,,*,,(),,{}都是一样的用法,比如:dimansans=()*msgbox(ans)四则运算的法则在编程中同样生效,你可以在编程中重新获得小学时候的乐趣(你恨数学那就别学电脑了)在编程中有一个有趣的运算符是"mod",这个运算符叫做"取余运算符",就是取得一次除法的余数,例如dimaa=mod你知道a等于几吗Bingo!没错,就是因为=,所以mod计算的结果就是还有一个运算符是"^"(就是键盘""上面的小箭头),他表示"乘幂"(或者是"方")比如:dima,b,ca=b=a^c=a^msgbox(a)msgbox则b=a*a=,c=a*a*a=我们一次不要讲太多,这次就讲到这里,现在总结一下要点:)常量分为自然常量和自定义常量,常量的值不可修改)变量就像盒子,我们不在乎盒子里装的是什么,但一定要知道盒子的名字)四则运算在编程中没有任何不同)MOD是取余运算作业:)编一个程序,计算圆形的面积,半径由用户给出(使用Inputbox)PI取值)编一个程序取得的余数第三篇(共六篇):首先,我来解决一下上次课程的几个疑问第一,那个余数问题,=,是因为我改过前面的部分,后面的忘了改了,不好意思第二,请看一下程序清单:)Dima,b,ca=inputbox("a是:","输入半径")b=Inputbox("b是:","输入半径")c=a*b*Msgbox这个输入、时是)Dima,b,ca=inputbox("a是:","输入半径")b=Inputbox("b是:","输入半径")c=(ab)*Msgbox这个输入、时是为什么会不一样呢在数学上c=(ab)*和c=a*b*是等价的,在VBS中也是如此问题出在""上,在VBS中,不仅仅是加号的意思还表示把两个字符串连接起来,例如"Hello""World"="HelloWorld"haveyouunderstood你还记得InoutBox函数的返回值吗是字符串!这就看出问题了吧,在编程中""不等于(<>),""是一个字符,而是一个数,所以a,b都是字符串变量,""""="",这就好像我们小时跟伙伴开玩笑问他们=一样,我们总是笑着说"错啦,应该是"但为什么,a可以*却不发生错误呢这时VBS比较智能的一个表现,如果这个字符串的内容是一个数且对他进行数学运算,则把字符串强制转换成数参与运算,如果字符串代表一个数,但不参加数学运算,而是参加字符串运算(合并)则当作字符串处理,所以你看到ab=,这时候ab的结果()是一个字符串,当它要乘以的时候就被强制转换成了数字,这样我就得到了结果作者:*:回复此发言VBS编程教程怎么修改这个程序呢我们需要用到另一个内建的函数:int,int函数的功能是将输入值转化成整数值,我们这样修改:c=(int(a)int(b))*这个意思就是把a作为参数传递给int函数,int函数就会返回那个整数(你的输入值),然后让返回值参与运算,这样就得到了正确答案所以,以后如果你用的是inputbox函数的话,最好用int语句加工一下:比如c=int’c是你自己的变量大家是不是觉得这个课程有点枯燥,呵呵,变量和运算符部分的确是这样的,不过多多练习也就好了,这次,我们写写真正好玩的东西:流程控制语句这个部分开始才是真正的编程首先介绍判断结构在此之前,我们先介绍一种简单的变量类型:布尔值(Boolean),这种变量只有两个可能值:True,Flase,即真或假这种变量在某些情况下很有用(比如"开关")我们定义一个bool变量的方法和其他变量一样,赋值也一样,例如:dima,ba=trueb=false注意,true和"true"是不一样的,"true"是字符串,true是布尔值,千万不能混淆回到if语句上来,我们先来看看简化版的if语句:if判断式then语句体我们来看一个例子:dima,ba=b=ifb>athenmsgbox("B大于A")我们只看最后一行,a>b这个式子(表达式)有一个返回值,是bool型的因为这个式子只有两种可能:b大于a,b不大于a,所以这个式子也只有两种可能性,即真或者假if语句判断这个表达式的返回值是真还是假,如果是真(true)则执行then后面的语句,如果是假,则不执行,你把a的值改成看看还会不会弹出对话框当我们要在判断之后执行多行语句怎么办呢,我们需要用语句块来解决,在这里可以叫块ifdima,ba=b=ifa<bthenmsgbox("A小于B")msgbox("B大于A")endif两个msgbox函数夹在if和endif之间,这个部分就是语句块,块里的每一条语句之前请空出(一个<Tab>键)个格,这不是必需的,但是是一个好习惯,以便看清楚程序的结构这样我们就能运行多于一个的语句,请注意ifthenendif这三个关键部分不要掉了OK,我出一个题,输入一个数,如果小于就输出"错误",如果大于就输出"正确",我这里有两个程序版本:dimaa=inputbox("请输入一个大于的数")a=int(a)’inputbox返回的是字符串,我们把他变成整数:)ifa>thenmsgbox("正确")ifa<thenmsgbox("错误")还有一个更简单的dimaa=inputbox("请输入一个大于的数")a=int(a)’inputbox返回的是字符串,我们把他变成整数ifa>thenmsgbox("正确")elsemsgbox("错误")endif看到多了一个else了吧,else的作用就是当要判断的表达式为false时执行的这样程序就可以处理两种不同的情况了不要忘了用endif结尾嘿嘿,我是变态者,现在我要你处理三种情况,<,=,>,还要写在一个if结构里,你怎么办,我给你答案:dimaa=inputbox("请输入一个大于的数")a=int(a)’inputbox返回的是字符串,我们把他变成整数ifa>thenmsgbox("正确")elseifa=thenmsgbox("老大,你耍我")elsemsgbox("错误")endif这次输入看看,是什么elseif语句可以在if结构中多次出现,以灵活判断不同的情况(如果你要判断得太多,就请使用"选择结构",过会儿就讲),当所有elseif都处理完了,而没有符合情况的时候再执行else中的语句另一个例子:Dima,b,c,da=inputbox("a是:","输入半径")b=Inputbox("b是:","输入半径")d=Inputbox("答案:","输入答案")c=a*b*’这里没有问题,会自动转换ifd=cthenMsgbox("你好聪明")作者:*:回复此发言VBS编程教程elseMsgbox("你好猪头自己的题还不会!")endif再看看这个,无论你回答得多么正确你都是猪头,哈哈,不是我耍你,还是文章开始时候的inputbox的返回类型在耍你,d是inputbox的返回值,他是一个字符串,而c是一次整数计算的结果,他是一个整数一个字符串无论如何也不等于一个整数,尽管他们字面上是一样的:""<>(不等于号)所以if的判断式的值永远是false,总是执行else部分的语句我们可以这么修改Dima,b,c,da=inputbox("a是:","输入半径")b=Inputbox("b是:","输入半径")d=Inputbox("答案:","输入答案")d=int(d)’在这里我们取出了d的值,变成整数,在放回"d"这个盒子里c=a*b*ifd=cthenMsgbox("你好聪明")elseMsgbox("你好猪头自己的题还不会!")endif这样就成功了这也是Inputbox函数的一个讨厌的地方,没办法,vbs没有其他好的输入方式了说到if,我们不得不说一说逻辑运算符,今天介绍两种,"and"和"or"学会了if语句之后,我举一个例子,你一看就明白了dima,ba=inputbox("输入一个数>")b=inputbox("输入另一个数>")a=int(a)b=int(b)ifa>andb>thenmsgbox("正确")elsemsgbox("错误")endif这段程序让你输入两个值,必须都大于,只要有一个不大于,就输出错误dima,ba=inputbox("输入一个数>")b=inputbox("输入另一个数>")a=int(a)b=int(b)ifa>orb>thenmsgbox("正确")elsemsgbox("错误")endif这段程序让你输入两个值,只要有一个大于,就返回成功其实and和or很好理解,我读"ifa>orb>then"这一句,用华语是这样:"如果a大于或者b大于,那么"这样是不是就很好理解了呢OK,我们再来看一种新结构,今天的课就结束,已经午夜了,我都累死了当你的程序要处理很多种不同的判断情况的时候elseifthen会让程序看起来很杂乱,所以就有了一种selectcase结构专门对付这种情况,selectcase的语法结构很简单:selectcase变量名case值语句case值语句caseelse语句endselect我们举个例子就能很简单的说明:dimaa=inputbox("输入一个的值")a=int(a)’处理inputbox返回字符串的问题selectcaseacasemsgbox("壹")casemsgbox("贰")casemsgbox("叁")caseelsemsgbox("输入错误")endselect这个例子把,,这三个阿拉伯数字转化成中国大写数字,这个程序写成ifelseif的形式如下dimaa=inputbox("请输入的值")a=int(a)ifa=thenmsgbox("壹")elseifa=thenmsgbox("贰")elseifa=thenmsgbox("叁")elsemsgbox("输入错误")endif怎么样,麻烦吧,还是select好吧OK,今天到此结束,总结一下:要点:)inputbox返回的是一个字符串,而不是一个数,必须用a=int(a)这种形式转化成数)bool变量的值只有两种:true,false)and两边的表达式都是true,则返回trueor两边的表达式有一个是true,就返回true)if语句的格式)selectcase的格式作业:)使用个bool值,储存你的兄弟姐妹是否是男性(提示:sistermale=false))给定一个个数,大于而且小于输出"正确",否则输出"错误")输入,或者,输出"正确",否则输出"错误")把以内的正整数都转换成中国大些数字)自己随便设计一个程序,应用今天的知识

用户评价(0)

关闭

新课改视野下建构高中语文教学实验成果报告(32KB)

抱歉,积分不足下载失败,请稍后再试!

提示

试读已结束,如需要继续阅读或者下载,敬请购买!

文档小程序码

使用微信“扫一扫”扫码寻找文档

1

打开微信

2

扫描小程序码

3

发布寻找信息

4

等待寻找结果

我知道了
评分:

/19

VBS编程教程

VIP

在线
客服

免费
邮箱

爱问共享资料服务号

扫描关注领取更多福利