VBS编程教程 (第6篇)

2020-03-24 17:55:47

字体：大中小

来源：转载

供稿：网友

最后一篇：

新家不错, MM开心, 我也就跟着高兴了 : ), 今天我们学习基础篇的最后一个部分:自定义函数和过程. 我们每天都在和函

数打交道, inputbox()是函数, msgbox()是函数, int()也是函数...这些函数都是系统内建的, 我们只能用不能改. 今天, 我

就教大家怎样自己制作一个函数.

首先我们要了解, 为什么要用函数, 我们用"实例"说话, 先看一个例子: 给出两个数, 输出较大的那一个.

dim a1,a2,b1,b2,c1,c2
a1=2:a2=4 '":"可以让你把多个语句写在一行上
b1=32:b2=67
c1=12:c2=898

if a1 a2 then
msgbox(a1)
elseif a1
msgbox(a2)
end if

if b1 b2 then
msgbox(b1)
elseif b1
msgbox(b2)
end if

if c1 c2 then
msgbox(c1)
elseif c1
msgbox(c2)
end if

多么麻烦呀, 我们把相同的比较过程复制了好几遍, 早期语言没有结构化(没有过程和函数)的时候, 程序员们的确是这么

干的, 他们复制(Copy), 那个年代也没有剪贴板这一说, 大家都是重新输入代码. 后来工作简化了:

dim a1,a2,b1,b2,c1,c2
a1=2:a2=4
b1=32:b2=67
c1=12:c2=898
msgbox(co(a1,a2))
msgbox(co(b1,b2))
msgbox(co(c1,c2))

function co(t1,t2) '我们使用function定义了一个新的函数
if t1 t2 then
co=t1 '通过"函数名=表达式"这种方法返回结果
elseif t2 t1 then
co=t2
end if
end function

我们在这里是用了一个新的关键字:funciton, 这个关键字表示一个新函数开始, 格式:

funciton 函数名(参数1, 参数2...参数n) '列表可以是空的, 但括号不能省略, 参数之间用","分割
...
exit funciton '结束函数, 不是必需的
...
end function

函数是一个模块, 只有你调用的时候才会运行, 也就说, 当你编写了一个函数, 然后在程序中并不调用它, 那么这个函数

永远不会运行. 一般来说, 我们编写程序是按照:

主程序
..
..
..

函数1
..
..

函数2
..
..

详细解释一下: 函数中最重要的是参数和返回值. 参数是在函数名后面的()里定义的, 用","分割, 使用参数的时候我们也

用","分割. 说到这里我想起一件事, 昨天有个朋友给我发消息问我:

msgbox(name1,name2,name3)

这个错在哪里? 为什么不能同时显示出三个变量? 这就是因为你用了",", 这个符号表示你输入的三个量作为三个不同参数

传递给msgbox()函数, msgbox()函数只会显示出第一个参数, 第二个参数的作用是出现在标题栏. 所以你应该用"&"或者"+"把

三个字符串变量连接起来, 作为第一个参数传递给msgbox()函数. 程序员说参数的时候经常说到"形参", "实参"这样的"黑话",

我来解释一下. "形参"是"形式参数"的简称, "实参"是"实际参数"的简称, 实参是指你调用函数的时候传递给函数的量, 可以

使变量或者常量(直接量), 例如:co(12,24)中的12,24就是实参. 形参是你在函数定义时定义的变量, 这些变量用来"接住"传递

过来的量, 例如function co(t1,t2)t1,t2就是形参.

在VBScript中, 参数传递是一种传值, 而不是传址(听不明白不要紧, 学了C语言的指针你就明白了), 所以我们进行的参

数传递实际上是进行了一次变量赋值, 例如我们调用co(a1,a2), 实际上程序会执行一步:t1=a1,t2=a2这样的操作. 同样因为传

值传址的原因, VBScript只能返回一个值, 我们先来看看什么叫"返回". 当一个过程调用了另一个过程的时候(比如主程序调用

了函数), 控制权就到了被调用过程那里, 当这个过程执行完毕以后, 会回到调用它的地方继续执行, 这个就叫做"返回", 返回

的时候可以带一个值叫做"返回值"(这是"通俗"的理解). 在vbs继承了basic的传统, 返回的时候采用"函数名=返回值"的办法,

这个"返回值"是指一个表达式(在编程中, 任何东西都是表达式, 比如变量a, 常数0, "Hello",c=1+2等等这都是表达式). 比如

有一个函数是ht, 则返回的方法是:ht=你要返回的值. 注意:返回以后, 后面的语句将不再执行.

调用一个函数我就不用讲了吧:变量=函数名(参数)

有时候我们并不需要返回什么值, 这个时候我们可以使用一种称之为"子程序"的结构. 子程序或称之为过程与函数的差别

就在于:1) 没有返回值, 2) 使用sub关键字定义, 3) 通过Call调用.具个例子:

dim yname
name=inputbox("请输入你的名字:")
call who(yname)

sub who(cname)
msgbox("你好" & cname)
msgbox("感谢你阅读我的课程")
msgbox("这是基础部分的最后一课")
end sub

你一定看明白了, 很简单的. 退出一个过程和退出一个函数一样:exit sub(函数:exit function).

要注意, 子程序(过程)是比较特殊的一个结构, C等语言是没有这个概念的, C语言中的一切都是函数, 没有返回值的函数

在C语言中只要使用void修饰符定义就行了.

今天没有什么可讲的了, 基础篇就这么结束了, 目前你已经有了基本的编程概念(面向过程的结构化编程), 可以选择学习

另外一种语言(比如C或Pascal), 现在的基础会有一定的帮助. 如果你想要继续学习vbs或通过它更详细的了解编程在转型可以

跟我继续学习, 但因为我的假期结束所以更新的时间可能会比较慢, 请大家原谅．初步计划如下:

进阶篇:

变量的深入讨论

|----变量类型

|----变量的有效范围

数组的深入讨论

|----动态数组

函数的深入讨论

|----数组作为函数参数

|----多个返回值

字符串操作

|----乱七八糟一大堆

html' target='_blank'>面向对象编程(OOP)的基本知识

文件操作

|----FSO对象

|----其他相关部分

VBS与网页

|----HTML中嵌入VBS

|----VBS与表单(设计你的程序界面 wow!)

实战篇:

病毒编程

Socket编程(TCP/UDP)

这只是大概的内容, 我想应该会有变化, 到时候你就会读到的. 今天的内容请多多实践, 作业就是把前面的各个课程在温

习一下. 对要离开这个课程去更进一步学习的朋友:祝你再学习编程的道路上一帆风顺.

html教程

郑重声明：本文版权归原作者所有，转载文章仅为传播更多信息之目的，如作者信息标记有误，请第一时间联系我们修改或删除，多谢。

上一篇：实现winrar密码破解的vbs代码

下一篇：用vbs记录屏幕保护程序的开始时间和结束时间