VBS编程教程 (第2篇)_vbs

第二篇: 

       我真没想到, 第一次的作业竟然有人不会. 

  看来要讲的非常非常细致才行, 嗯, 今天讲各种"量"和基本运算 

  先说常量, 这个比较简单. 

  什么是常量呢, 常量就是其值不可变化的量. 

  常量分为两种:第一种, 自然常量. 这叫是因为它们本身就是常量, 你怎么更改21的值呢? 他永远都是21, 不可能变成46 

    如果你在程序中使用"21=46", 这样的语句将会引发一个错误. 同样的, 字符串也是常量 (还记得字符串吗? 就是包裹在""之间的一串字符), "Hello World"就是一个例子, 如果你使用"Hello World"="Bye"这样的语句同样会引发一个错误. 你能举出自然常量的更多例子吗? 

  第二种, 是我们自己定义的常量,这种量也使用代号, 他们也被赋值, 但和变量的不同点在于, 他们在定义的时候被赋值,以后就不能改变了,如果企图改变将会引发一个错误. 定义一个变量,我们使用"const"这个关键字(关键字的意思是系统定义了有特殊功能的字, 不能作为变量名或常量名使用),格式是:const 常量名=常量值. 

    例如: 

const PI=3.1415926 

const NAME="记忆碎片" 

  这样我们就定义了两个常量, PI和NAME, 一般说来, 常量名全部使用大写, 但也可以不用, 随你喜好. 将一些在程序中不需要改变的值定义为常量是个好习惯, 这样能防止不必要的意外. 另外, 使用自定义常量也可以减少你的工作量. 比如: 

msgbox("Hello World") 
msgbox("Hello World") 
msgbox("Hello World") 
msgbox("Hello World") 
msgbox("Hello World") 

  这个程序输出五次Hello World, 如果你想要改变输出为Bye-Bye, 就必须修改全部程序, 当然你可以手动修改5次, 但如果你要输出1000次呢? 常量就可以替我们解决这个问题: 

const hw="Hello World" 
msgbox(hw) 
msgbox(hw) 
msgbox(hw) 
msgbox(hw) 
msgbox(hw) 

  这样当你要修改输出的时候只要修改hw的值就行了. 

  好了, 现在我们来看看编程的第一块重要"基石":变量. 解释变量最好的办法我觉得是"盒子", 一个变量好像一个盒子, 里面只能装一个东西, 当你要装进去别的东西的时候必须把原有的东西拿出来. 这个"盒子"是有名称的, 当你在程序中使用变量的时候, 系统会打开盒子取出里面的东西, 让这些东西参与处理, 而不是盒子. 有些语言是很依赖"盒子"里面装些什么东西, 这样才能找到合适的"盒子"(比如C语言), 但VBS给我提供的是能够自动伸缩的"魔术盒", 我们不用关心装进去的是什么东西, 

VBS会自动调整盒子的大小. 例如: 

Dim a1,a2,a3 
a1=14 
a2=12.23 
a3="Hello" 

而不用像C语言那样麻烦:            或者是VB的正规声明(VB可以声明也可以不用)那样: 

int a1;                           Dim a1 as integer 
float a2;                         Dim a2 as Double 
char* a3;                         Dim a3 as strnig 
a1=14;                            a1=14 
a2=12.23;                         a2=12.23 
a3="Hello";                       a3="Hello" 

嗯……扯远了…… 

  变量有什么用呢? 哇, 那用处可大了. 最简单, 你并不能确定程序运行时变量的值, 比如前一节课我们编的输入姓名的程序, 你不能确定InputBox返回的是什么(还记得Inputbox的返回值吗? 就是你输入的内容), 所以你就没有办法应对各种情况, 但我们用name这个"盒子"把用户的名字装起来, 到用的时候我们只要知道name这个盒子的名字就行了, 系统会自己打开他并把里面的内容拿出来用. 再举个例子, 我们编写一个程序计算一个矩形的面积, 比如这个程序要发给小学生使用: 

dim a,b,s 
a=15 
b=12 
s=a*b 
msgbox(s) 

  这样就可以求出长为15,宽为12的矩形的面积了, 是不是很简单? 当然, 这个程序也可以这样写: 

dim s 
s=15*12 
msgbox(s) 

  这样看起来程序短了许多, 也节约内存, 但并不是鼓励的做法, 为什么? 请看下面. 

  现在, 我们的程序要变得像点样子才行, 谁的程序写出来还要别人修改源代码才能用啊? 

  所以, 我们要接受用户的输入, 还记得吗? InputBox函数. 

  修改后程序如下: 

dim a,b,s 
a=inputbox("请输入矩形的长:") 
b=inputbox("请输入矩形的宽:") 
s=a*b 
msgbox(s) 

  ok, 这么一修改, 无论用户输入怎样的数据, 我们都能计算出矩形的面积了. 如果你用s=15*12能改嘛? 当然不行. 

  我想你已经发现了, vbs中的数学计算和真正的算术没有什么不同, +,-,*,/,(),[],{}都是一样的用法, 比如: 

dim ans 
ans=12+32/4+[(23-10)*2] 
msgbox(ans) 

  四则运算的法则在编程中同样生效, 你可以在编程中重新获得小学时候的乐趣(你恨数学?那就别学电脑了). 

  在编程中有一个有趣的运算符是"mod", 这个运算符叫做"取余运算符", 就是取得一次除法的余数, 例如 

dim a 
a=16 mod 5 

  你知道a等于几吗? Bingo! 没错, 就是1. 因为16 / 5 =3....1, 所以mod计算的结果就是1. 

  还有一个运算符是"^"(就是键盘"6"上面的小箭头), 他表示"乘幂"(或者是"方") 比如: 

dim a,b,c 
a=2 
b=a^2 
c=a^3 
msgbox(a) 
msgbox(c) 

  则b=a*a=4, c=a*a*a=8 

  我们一次不要讲太多, 这次就讲到这里, 现在总结一下. 

要点: 

1) 常量分为自然常量和自定义常量, 常量的值不可修改 

2) 变量就像盒子, 我们不在乎盒子里装的是什么, 但一定要知道盒子的名字 

3) 四则运算在编程中没有任何不同 

4) MOD是取余运算 

作业: 

1) 编一个程序, 计算圆形的面积, 半径由用户给出 (使用Inputbox) PI取值3.14159 

2) 编一个程序取得20 / 3 的余数 

时间: 2024-10-02 06:28:05

VBS编程教程 (第2篇)_vbs的相关文章

VBS编程教程 (第6篇)_vbs

最后一篇:  新家不错, MM开心, 我也就跟着高兴了 : ), 今天我们学习基础篇的最后一个部分:自定义函数和过程. 我们每天都在和函  数打交道, inputbox()是函数, msgbox()是函数, int()也是函数...这些函数都是系统内建的, 我们只能用不能改. 今天, 我  就教大家怎样自己制作一个函数.  首先我们要了解, 为什么要用函数, 我们用"实例"说话, 先看一个例子: 给出两个数, 输出较大的那一个.  dim a1,a2,b1,b2,c1,c2  a1=2

VBS编程教程 (第4篇)_vbs

四篇(共六篇):  大家好, 昨天我休息了一天, 所以今天写第4章:循环结构  我们先来看一道题:商场进行每日结算, 要求累加出今天的营业额, 每次输入一个数, 这道题其实很简单, 但就我们现在学  过的知识要完成这道题相当麻烦, 我们来分析一下. 首先, 我们需要知道买卖的次数, 这样才能控制输入的次数,但是, 这种设  计是非常低效的, 每天都要重新设计程序. 假定今天进行了5次交易, 以下是源程序:  dim sum  sum=0 '初始化变量  sum=sum + int(inputbo

VBS编程教程 (第3篇)_vbs

第三篇(共六篇): 首先, 我来解决一下上次课程的几个疑问  第一, 那个余数问题, 16 / 5 = 3...1, 是因为我改过前面的部分, 后面的忘了改了, 不好意思.  第二, 请看一下程序清单:  1)  Dim a,b,c  a=inputbox("a是:","输入半径")  b=Inputbox("b是:","输入半径")  c=a*2+b*2  Msgbox(c)  这个 输入1.2时是6  2)  Dim a,

VBS编程教程 (第5篇)_vbs

第五篇(共六篇):         请允许我县描述一下我现在的环境:气温高达37摄氏度, 而我忘记了图书馆开门的时间, 还要在这里站上一个小时, 在热带植物的包裹下, 各种奇怪的小飞虫围着我转来转去. 不过令我欣慰的是, 终于写到五了, 还有两课我们的"基础篇"就要结束了.         今天我们来了解语言本身的最后一个论题:数组.  要理解"数组", 这个概念我觉得另一种翻译对学习来说更加容易:"阵列", 没错, 数组就是一个阵列, 一个数据

VBS基础编程教程 (第1篇)_vbs

, 如果你想接触以下VBScript也可以, 但既然有编程基础推荐直接去找一些参考书来读, 会比较快.  什么是VBScript呢? VBScript的全称是:Microsoft Visual Basic Script Editon.(微软公司可视化BASIC脚本版). 正如其字面所透露的信息, VBS(VBScript的进一步简写)是基于Visual Basic的脚本语言.  我进一步解释一下, Microsoft Visual Basic是微软公司出品的一套可视化编程工具, 语法基于Basi

VBS基础编程教程 (第6篇)_vbs

最后一篇:  新家不错, MM开心, 我也就跟着高兴了 : ), 今天我们学习基础篇的最后一个部分:自定义函数和过程. 我们每天都在和函  数打交道, inputbox()是函数, msgbox()是函数, int()也是函数...这些函数都是系统内建的, 我们只能用不能改. 今天, 我  就教大家怎样自己制作一个函数.  首先我们要了解, 为什么要用函数, 我们用"实例"说话, 先看一个例子: 给出两个数, 输出较大的那一个.  dim a1,a2,b1,b2,c1,c2  a1=2

VBS基础编程教程 (第4篇)_vbs

四篇(共六篇):  大家好, 昨天我休息了一天, 所以今天写第4章:循环结构  我们先来看一道题:商场进行每日结算, 要求累加出今天的营业额, 每次输入一个数, 这道题其实很简单, 但就我们现在学  过的知识要完成这道题相当麻烦, 我们来分析一下. 首先, 我们需要知道买卖的次数, 这样才能控制输入的次数,但是, 这种设  计是非常低效的, 每天都要重新设计程序. 假定今天进行了5次交易, 以下是源程序:  dim sum  sum=0 '初始化变量  sum=sum + int(inputbo

VBS基础编程教程 (第3篇)_vbs

第三篇(共六篇):  首先, 我来解决一下上次课程的几个疑问  第一, 那个余数问题, 16 / 5 = 3...1, 是因为我改过前面的部分, 后面的忘了改了, 不好意思.  第二, 请看一下程序清单:  1)  Dim a,b,c  a=inputbox("a是:","输入半径")  b=Inputbox("b是:","输入半径")  c=a*2+b*2  Msgbox(c)  这个 输入1.2时是6  2)  Dim a

VBS基础编程教程 (第5篇)_vbs

第五篇(共六篇):         请允许我县描述一下我现在的环境:气温高达37摄氏度, 而我忘记了图书馆开门的时间, 还要在这里站上一个小时, 在热带植物的包裹下, 各种奇怪的小飞虫围着我转来转去. 不过令我欣慰的是, 终于写到五了, 还有两课我们的"基础篇"就要结束了.         今天我们来了解语言本身的最后一个论题:数组.  要理解"数组", 这个概念我觉得另一种翻译对学习来说更加容易:"阵列", 没错, 数组就是一个阵列, 一个数据