VBS编程教程 (第2篇)

2019-01-16 08:36:27王旭


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("请输入矩形的宽:")