VISUAL BASIC 常用语句74条详解
合集下载
相关主题
- 1、下载文档前请自行甄别文档内容的完整性，平台不提供额外的编辑、内容补充、找答案等附加服务。
- 2、"仅部分预览"的文档,不可在线预览部分如存在完整性等问题,可反馈申请退款(可完整预览的文档不适用该条件!)。
- 3、如文档侵犯您的权益，请联系客服反馈,我们会尽快为您处理(人工客服工作时间：9:00-18:30)。
识别码来替换 title，以激活应用程序
可选的。Boolean 值，取值为 True/False。说明在激活另一个应用程序之前调用的应用 程序是否有焦点。如果为 False（缺省），那么，即使调用的应用程序没有焦点，也直 wait 接激活指定的应用程序。如果为 True，则调用的应用程序会等到有焦点后，才激活指 定的应用程序
70
在 Open 语句打开的文件中， 设置下一个读/写操作的位置。
71
5
60 SelectCase 语句 61 SendKeys 语句 62 SetAttr 语句 63 Set 语句
64 Static 语句
65 Stop 语句 66 Sub 语句 67 Time 语句 68 Type 语句 69 Unload 语句 70 While...Wend 语句 71 With 语句 72 Write#语句 73 VbSrcCopy 语句 74 Shell 语句
自定义类型变量。
用另一个字符串中指定数量的
35 Mid 语句
字符替换 Variant 或 String 变量 46 中的字符。
36 MkDir 语句
创建一个新的目录或文件夹。 47
37 Name 语句
重新命名一个文件、目录或文 件夹。
47
On...GoSub、On...GoTo 语 根据表达式的值，转到特定行
name (过程名) 必要参数，要调用的过程名称
可选参数，传递给过程的变量、数组或表达式的列表，各参数间以逗号 argumentlist( 参 数
隔开。Argumentlist 的每个参数都可以加上关键字 ByVal 或 ByRef，来描 列表)
述被调用的过程将如何处理这些参数。
二、说明： 调用一个过程时，并不一定要使用 Call 关键字。如果使用 Call 关键字来调用一个需要
56
在模块或窗体级别中使用，用
于声明私有变量及分配存储空 57 间。
在模块或窗体级别中使用，用
于声明全局变量（公用变量） 59 和分配存储空间。
将一个变量的数据写入磁盘文
件中。
60
引发在一个类、窗体、或者文
档中的模块级中声明的一个事 62 件。
初始化随机数发生器。
63
在过程级别中使用，用于为动
态数组变量重新分配存储空
建立一标准工程，在窗体上添加一命令按钮，将下面的程序粘贴过去。 Private Sub Command1_Click() On Error GoTo ErrorHandler '发生错误转到错误处理入口
MsgBox "程序运行" Exit Sub '程序运行完毕，没有错误退出程序 ErrorHandler: '错误处理入口 Beep '发出声响。 MsgBox "出错" End Sub
10
关闭用 Open 语句打开的文件。 11
声明常量。
11
设置当前系统日期。
12
用于在模块或窗体中声明对动
态链接库(DLL)中外部过程的 引用，在引用 API 函数时经常
13
用到。
在模块或窗体，为变量和传给
过程的参数，设置缺省数据类
型，以及为其名称以指定的字
符开头的 Function 和
15
PropertyGet 过程，设置返回值
元素，以及释放动态数组的存 23
储空间。
模拟错误的发生。
23
定义用户自定义的事件。
24
提前退出控制结构、循环或过
程的语句体。
26
3
20 FileCopy 语句
复制一个文件。
27
21 ForEach...Next 语句
针对一个数组或集合中的每个
元素，重复执行一组语句。
28
22 For...Next 语句
AppActivate "Microsoft EXCEL" '激活 Microsoft Excel。 End Sub
首先打开 Microsoft Excel，然后运行程序，单击命令按钮，你将看到 Excel 变成活动窗 体。
下面示例用 Shell 函数启动 Microsoft Excel，然后用 AppActivate 语句来激活 Microsoft Excel。在运行程序前，首先找到 Microsoft Excel 的路径，并关闭 Excel。
二、说明： AppActivate 语句不能打开应用程序，只能激活应用程序（使其变成活动窗口）。在使
用 AppActivate 语句时必须打开应用程序，否则程序会报错。所以通常先用 Shell 函数启动 一个应用程序，然后使用 AppActivate 语句激活。 三、应用举例：
本例使用 AppActivate 语句来激活 Microsoft Excel。建立一个标准工程，在窗体上添加 一个命令按钮，将下面的程序粘贴过去。 Private Sub Command1_Click()
多分支语句。
73
将一个或多个按键消息发送到
活动窗口，就如同在键盘上进 74 行输入一样。
为一个文件设置属性信息。
77
将对象引用赋给变量或属性。 77
在过程级别中使用，用于声明
变量并分配存储空间。在整个
代码运行期间都能保留使用
78
Static 语句声明的变量的值。通
俗的讲，就是声明静态变量。
暂停执行。
在上面的标准工程中，用下面的程序替换上面的程序，并把路径换成你电脑中 Microsoft Excel 的路径，然后运行程序，单击命令按钮，你将看到 Excel 被打开并被激活。 Private Sub Command1_Click()
Dim MyAppID MyAppID = Shell("C:\Program Files\Microsoft Office\Office\EXCEL.EXE", 1) '运行 Microsoft Excel。 AppActivate MyAppID '激活 Microsoft Excel。 End Sub
单击命令按钮，MsgBox 显示"程序运行"。 现在加入一条错误的激活 Microsoft Excel 语句，程序如下： Private Sub Command1_Click() On Error GoTo ErrorHandler '发生错误转到错误处理入口 AppActivate "EXCEL.EXE" '错误语句。 MsgBox "程序运行" Exit Sub '程序运行完毕，没有错误退出程序 ErrorHandler: '错误处理入口 Beep '发出声响。 MsgBox "出错" End Sub 单击命令按钮，MsgBox 显示"出错"，计算机喇叭发出声音。 误区：有些教材用下面的示例使用 Beep 语句让计算机连续响三声，实际上计算机在运 行下面的程序时只能响一声，原因是计算机的运行速度远比计算机喇叭发出声音的速度快。 Dim I For I = 1 To 3 '循环 3 次。 Beep '发出一声。 Next I
13 Do...Loop 语句
14 End 语句 15 Enum 语句 16 Erase 语句 17 Error 语句 18 Event 语句 19 Exit 语句
录
描述
页码
激活其它应用程序。
7
通过计算机喇叭发出声音。
8
调用一个子程序或函数。
9
改变当前的路径(目录或文件 夹)。
Hale Waihona Puke Baidu
10
改变当前的驱动器。
Visual Basic
常用语句 74 条详解
2
目
序号 1 2 3
语句 AppActivate 语句 Beep 语句 Call 语句
4 ChDir 语句
5 ChDrive 语句 6 Close 语句 7 Const 语句 8 Date 语句
9 Declare 语句
10 Deftype 语句
11 DeleteSetting 语句 12 Dim 语句
80
声明子过程的名称，参数，以 及构成其主体的代码。
80
设置系统时间。
82
在模块级别中使用，用于定义
包含一个或多个元素的用户自 82
定义的数据类型。
从内存中卸载窗体或控件。
84
只要指定的条件为 True，则会 重复执行一系列的语句。
85
在一个单一对象或一个用户定 义类型上执行一系列的语句。
85
将数据写入顺序文件。
以指定次数来重复执行一组语
句。
29
23 Function 语句
声明 Function 过程的名称，参 数以及构成其主体的代码。
30
24 Get 语句
将一个已打开的磁盘文件读入
一个变量之中。
32
25 GoSub...Return 语句
在一个过程中跳到另一个子程 序中执行，执行后再返回。
34
26 GoTo 语句
无条件地转移到过程中指定的 行。
35
27 If...Then...Else 语句
条件语句，根据表达式的值有
条件地执行一组语句。
36
28 Input#语句
从已打开的顺序文件中读出数
据并将数据指定给变量。
39
29 Kill 语句
删除磁盘文件。
40
30 Let 语句
将表达式的值赋给变量或属
性。
40
从已打开的顺序文件中读出一
8
3．Call 语句
描述：将控制权转移到一个 Sub 过程，Function 过程，通俗的讲就是调用一个子程序或函数。 一、语法： [Call]name[argumentlist] Call 语句的语法包含下面部分：
部分
描述
可选参数；关键字。如果指定了这个关键字，则参数必须加上括号，例 call
如：Call MyProc(0)
87
复制图片并粘帖。
87
调用其他应用程序。
88
6
1．AppActivate 语句
描述：激活其它应用程序。 一、语法： AppActivate title[,wait] AppActivate 语句的语法具有以下几个命名参数： 部
描述 分
必需的。字符串表达式，所要激活的应用程序的名称。常使用 Shell 函数返回的任务 title
38
句
执行。
48
启动一个错误处理程序并指定
39 OnError 语句
该子程序在一个过程中的位 置；也可用来禁止一个错误处 50
理程序。
4
40 Open 语句 41 OptionBase 语句 42 OptionCompare 语句
43 OptionExplicit 语句 44 OptionPrivate 语句 45 Print#语句 46 Private 语句
打开磁盘文件。
52
在模块或窗体级别中使用，用 来声明数组下标的缺省下界。 54
在模块或窗体级别中使用，用
于声明字符串比较时所用的缺 55
省比较方法。
在模块或窗体级别中使用，强
制显式声明模块或窗体中的所 55 有变量。
强制声明某个模块为该模块所
属工程的私有模块。
56
将格式化显示的数据写入顺序 文件中。
31 LineInput#语句
行并将字符串变量指定给变
41
量。
32 Load 语句 33 Lock，Unlock 语句
把窗体或控件加载到内存中。 42
锁定或解锁用 Open 语句打开
的全部文件或一部分文件，控
制其它进程是否可以修改文
43
件。
将某字符串插入到另一字符串
34 LSet 语句
变量的最左边，或是将一用户 定义类型变量复制到另一用户 44
7
2．Beep 语句
描述：通过计算机喇叭发出声音。 一、语法： Beep 二、说明：
呼叫的频率与时间长短取决于硬件和系统软件，并随计算机不同而不同。 三、应用举例：
在调试程序时，有时需要在发生错误时发出音响。本例在程序运行时，如果某一步发生 错误，则转到错误处理入口，使用 Beep 语句让计算机发出响声，同时 MsgBox 函数将提示 错误。
类型。
删除指定的 Windows 注册表的 子键。
16
声明局部变量并分配存储空 间。
17
循环语句，有两种变形，一种
是当条件为 True 时，重复执行 一个语句块中的命令。另一种 18
重复执行一个语句块中的命
令，直到条件变为 True 时。
结束程序、过程或语句。
20
定义枚举类型。
21
重新初始化大小固定的数组的
64
间。
注释语句。
65
关闭所有用 Open 语句打开的 磁盘文件。
66
在 On...Error 的错误处理程序 或 On...GoSub 的特定程序区 66
段结束后，恢复原先的运行。
删除一个存在的目录或文件
夹。
67
在一字符串变量中将一字符串
往右对齐。
68
将窗体或控件中的图形保存到 文件中。
69
在 Windows 注册表中保存或建 立应用程序项目。
47 Public 语句 48 Put 语句 49 RaiseEvent 语句 50 Randomize 语句 51 ReDim 语句 52 Rem 语句 53 Reset 语句 54 Resume 语句 55 RmDir 语句 56 RSet 语句 57 SavePicture 语句 58 SaveSetting 语句 59 Seek 语句
可选的。Boolean 值，取值为 True/False。说明在激活另一个应用程序之前调用的应用 程序是否有焦点。如果为 False（缺省），那么，即使调用的应用程序没有焦点，也直 wait 接激活指定的应用程序。如果为 True，则调用的应用程序会等到有焦点后，才激活指 定的应用程序
70
在 Open 语句打开的文件中， 设置下一个读/写操作的位置。
71
5
60 SelectCase 语句 61 SendKeys 语句 62 SetAttr 语句 63 Set 语句
64 Static 语句
65 Stop 语句 66 Sub 语句 67 Time 语句 68 Type 语句 69 Unload 语句 70 While...Wend 语句 71 With 语句 72 Write#语句 73 VbSrcCopy 语句 74 Shell 语句
自定义类型变量。
用另一个字符串中指定数量的
35 Mid 语句
字符替换 Variant 或 String 变量 46 中的字符。
36 MkDir 语句
创建一个新的目录或文件夹。 47
37 Name 语句
重新命名一个文件、目录或文 件夹。
47
On...GoSub、On...GoTo 语 根据表达式的值，转到特定行
name (过程名) 必要参数，要调用的过程名称
可选参数，传递给过程的变量、数组或表达式的列表，各参数间以逗号 argumentlist( 参 数
隔开。Argumentlist 的每个参数都可以加上关键字 ByVal 或 ByRef，来描 列表)
述被调用的过程将如何处理这些参数。
二、说明： 调用一个过程时，并不一定要使用 Call 关键字。如果使用 Call 关键字来调用一个需要
56
在模块或窗体级别中使用，用
于声明私有变量及分配存储空 57 间。
在模块或窗体级别中使用，用
于声明全局变量（公用变量） 59 和分配存储空间。
将一个变量的数据写入磁盘文
件中。
60
引发在一个类、窗体、或者文
档中的模块级中声明的一个事 62 件。
初始化随机数发生器。
63
在过程级别中使用，用于为动
态数组变量重新分配存储空
建立一标准工程，在窗体上添加一命令按钮，将下面的程序粘贴过去。 Private Sub Command1_Click() On Error GoTo ErrorHandler '发生错误转到错误处理入口
MsgBox "程序运行" Exit Sub '程序运行完毕，没有错误退出程序 ErrorHandler: '错误处理入口 Beep '发出声响。 MsgBox "出错" End Sub
10
关闭用 Open 语句打开的文件。 11
声明常量。
11
设置当前系统日期。
12
用于在模块或窗体中声明对动
态链接库(DLL)中外部过程的 引用，在引用 API 函数时经常
13
用到。
在模块或窗体，为变量和传给
过程的参数，设置缺省数据类
型，以及为其名称以指定的字
符开头的 Function 和
15
PropertyGet 过程，设置返回值
元素，以及释放动态数组的存 23
储空间。
模拟错误的发生。
23
定义用户自定义的事件。
24
提前退出控制结构、循环或过
程的语句体。
26
3
20 FileCopy 语句
复制一个文件。
27
21 ForEach...Next 语句
针对一个数组或集合中的每个
元素，重复执行一组语句。
28
22 For...Next 语句
AppActivate "Microsoft EXCEL" '激活 Microsoft Excel。 End Sub
首先打开 Microsoft Excel，然后运行程序，单击命令按钮，你将看到 Excel 变成活动窗 体。
下面示例用 Shell 函数启动 Microsoft Excel，然后用 AppActivate 语句来激活 Microsoft Excel。在运行程序前，首先找到 Microsoft Excel 的路径，并关闭 Excel。
二、说明： AppActivate 语句不能打开应用程序，只能激活应用程序（使其变成活动窗口）。在使
用 AppActivate 语句时必须打开应用程序，否则程序会报错。所以通常先用 Shell 函数启动 一个应用程序，然后使用 AppActivate 语句激活。 三、应用举例：
本例使用 AppActivate 语句来激活 Microsoft Excel。建立一个标准工程，在窗体上添加 一个命令按钮，将下面的程序粘贴过去。 Private Sub Command1_Click()
多分支语句。
73
将一个或多个按键消息发送到
活动窗口，就如同在键盘上进 74 行输入一样。
为一个文件设置属性信息。
77
将对象引用赋给变量或属性。 77
在过程级别中使用，用于声明
变量并分配存储空间。在整个
代码运行期间都能保留使用
78
Static 语句声明的变量的值。通
俗的讲，就是声明静态变量。
暂停执行。
在上面的标准工程中，用下面的程序替换上面的程序，并把路径换成你电脑中 Microsoft Excel 的路径，然后运行程序，单击命令按钮，你将看到 Excel 被打开并被激活。 Private Sub Command1_Click()
Dim MyAppID MyAppID = Shell("C:\Program Files\Microsoft Office\Office\EXCEL.EXE", 1) '运行 Microsoft Excel。 AppActivate MyAppID '激活 Microsoft Excel。 End Sub
单击命令按钮，MsgBox 显示"程序运行"。 现在加入一条错误的激活 Microsoft Excel 语句，程序如下： Private Sub Command1_Click() On Error GoTo ErrorHandler '发生错误转到错误处理入口 AppActivate "EXCEL.EXE" '错误语句。 MsgBox "程序运行" Exit Sub '程序运行完毕，没有错误退出程序 ErrorHandler: '错误处理入口 Beep '发出声响。 MsgBox "出错" End Sub 单击命令按钮，MsgBox 显示"出错"，计算机喇叭发出声音。 误区：有些教材用下面的示例使用 Beep 语句让计算机连续响三声，实际上计算机在运 行下面的程序时只能响一声，原因是计算机的运行速度远比计算机喇叭发出声音的速度快。 Dim I For I = 1 To 3 '循环 3 次。 Beep '发出一声。 Next I
13 Do...Loop 语句
14 End 语句 15 Enum 语句 16 Erase 语句 17 Error 语句 18 Event 语句 19 Exit 语句
录
描述
页码
激活其它应用程序。
7
通过计算机喇叭发出声音。
8
调用一个子程序或函数。
9
改变当前的路径(目录或文件 夹)。
Hale Waihona Puke Baidu
10
改变当前的驱动器。
Visual Basic
常用语句 74 条详解
2
目
序号 1 2 3
语句 AppActivate 语句 Beep 语句 Call 语句
4 ChDir 语句
5 ChDrive 语句 6 Close 语句 7 Const 语句 8 Date 语句
9 Declare 语句
10 Deftype 语句
11 DeleteSetting 语句 12 Dim 语句
80
声明子过程的名称，参数，以 及构成其主体的代码。
80
设置系统时间。
82
在模块级别中使用，用于定义
包含一个或多个元素的用户自 82
定义的数据类型。
从内存中卸载窗体或控件。
84
只要指定的条件为 True，则会 重复执行一系列的语句。
85
在一个单一对象或一个用户定 义类型上执行一系列的语句。
85
将数据写入顺序文件。
以指定次数来重复执行一组语
句。
29
23 Function 语句
声明 Function 过程的名称，参 数以及构成其主体的代码。
30
24 Get 语句
将一个已打开的磁盘文件读入
一个变量之中。
32
25 GoSub...Return 语句
在一个过程中跳到另一个子程 序中执行，执行后再返回。
34
26 GoTo 语句
无条件地转移到过程中指定的 行。
35
27 If...Then...Else 语句
条件语句，根据表达式的值有
条件地执行一组语句。
36
28 Input#语句
从已打开的顺序文件中读出数
据并将数据指定给变量。
39
29 Kill 语句
删除磁盘文件。
40
30 Let 语句
将表达式的值赋给变量或属
性。
40
从已打开的顺序文件中读出一
8
3．Call 语句
描述：将控制权转移到一个 Sub 过程，Function 过程，通俗的讲就是调用一个子程序或函数。 一、语法： [Call]name[argumentlist] Call 语句的语法包含下面部分：
部分
描述
可选参数；关键字。如果指定了这个关键字，则参数必须加上括号，例 call
如：Call MyProc(0)
87
复制图片并粘帖。
87
调用其他应用程序。
88
6
1．AppActivate 语句
描述：激活其它应用程序。 一、语法： AppActivate title[,wait] AppActivate 语句的语法具有以下几个命名参数： 部
描述 分
必需的。字符串表达式，所要激活的应用程序的名称。常使用 Shell 函数返回的任务 title
38
句
执行。
48
启动一个错误处理程序并指定
39 OnError 语句
该子程序在一个过程中的位 置；也可用来禁止一个错误处 50
理程序。
4
40 Open 语句 41 OptionBase 语句 42 OptionCompare 语句
43 OptionExplicit 语句 44 OptionPrivate 语句 45 Print#语句 46 Private 语句
打开磁盘文件。
52
在模块或窗体级别中使用，用 来声明数组下标的缺省下界。 54
在模块或窗体级别中使用，用
于声明字符串比较时所用的缺 55
省比较方法。
在模块或窗体级别中使用，强
制显式声明模块或窗体中的所 55 有变量。
强制声明某个模块为该模块所
属工程的私有模块。
56
将格式化显示的数据写入顺序 文件中。
31 LineInput#语句
行并将字符串变量指定给变
41
量。
32 Load 语句 33 Lock，Unlock 语句
把窗体或控件加载到内存中。 42
锁定或解锁用 Open 语句打开
的全部文件或一部分文件，控
制其它进程是否可以修改文
43
件。
将某字符串插入到另一字符串
34 LSet 语句
变量的最左边，或是将一用户 定义类型变量复制到另一用户 44
7
2．Beep 语句
描述：通过计算机喇叭发出声音。 一、语法： Beep 二、说明：
呼叫的频率与时间长短取决于硬件和系统软件，并随计算机不同而不同。 三、应用举例：
在调试程序时，有时需要在发生错误时发出音响。本例在程序运行时，如果某一步发生 错误，则转到错误处理入口，使用 Beep 语句让计算机发出响声，同时 MsgBox 函数将提示 错误。
类型。
删除指定的 Windows 注册表的 子键。
16
声明局部变量并分配存储空 间。
17
循环语句，有两种变形，一种
是当条件为 True 时，重复执行 一个语句块中的命令。另一种 18
重复执行一个语句块中的命
令，直到条件变为 True 时。
结束程序、过程或语句。
20
定义枚举类型。
21
重新初始化大小固定的数组的
64
间。
注释语句。
65
关闭所有用 Open 语句打开的 磁盘文件。
66
在 On...Error 的错误处理程序 或 On...GoSub 的特定程序区 66
段结束后，恢复原先的运行。
删除一个存在的目录或文件
夹。
67
在一字符串变量中将一字符串
往右对齐。
68
将窗体或控件中的图形保存到 文件中。
69
在 Windows 注册表中保存或建 立应用程序项目。
47 Public 语句 48 Put 语句 49 RaiseEvent 语句 50 Randomize 语句 51 ReDim 语句 52 Rem 语句 53 Reset 语句 54 Resume 语句 55 RmDir 语句 56 RSet 语句 57 SavePicture 语句 58 SaveSetting 语句 59 Seek 语句