2022年VB语言基础 .pdf

《2022年VB语言基础 .pdf》由会员分享，可在线阅读，更多相关《2022年VB语言基础 .pdf（30页珍藏版）》请在淘文阁 - 分享文档赚钱的网站上搜索。

1、VB语言基础一、数据类型1、数值型：取值范围：Byte( 字节型 )占1字节； 0255无符号Integer(整型 ) 占 2字节； -3276832767 long( 长整型) 占 4字节； -21474836482147483647 single(单精度浮点 ) 占4字节；略Double( 双精度浮点 ) 占4字节；略Currency( 货币型 ) 占 8字节小数点左 15位，右4位（精确定点数据类型）2、逻辑型：Boolean( 布尔型 )占2字节； true或false 3 、字符串型：String?a?a 定长型占字符串长度，变长型再加10 4 、日期型：Date( 日期型) 占 8

2、字节 100-1-19999-12-31 5、对象型：Object 占 4字节；任何 Object 引用 6 、变体型：Variant 变体型数字占 16字节，变体型字符占 22字节字符串长注：此类型还包含三种特定值：名师资料总结 - - -精品资料欢迎下载 - - - - - - - - - - - - - - - - - - 名师精心整理 - - - - - - - 第 1 页，共 30 页 - - - - - - - - - Empty；Null ；Error ；? 7、用户定义的数据类型：? 用户可以利用 Type 语句定义自己的数据类型。格式如下?Type 数据类型名?数据类型元素名

3、As 类型名?End Type ? 用Type 可定义类似于 C语言中的结构体类型。例如：?Type Date_Rec ?RYear As Integer ?RMonth As String*3 ?RDay As Integer ?End Type ? 注：记录类型中的元素可以是字符串，但必须是定长字符串，其长度由类型名加上一个星号和常数指明。? 数据类型转换函数：?函数名及书写格式转换结果?CBool （表达式）布尔型?CCur （表达式）货币型?CByte （表达式）字节型?CDate （表达式）日期型?CDbl （表达式）双精度名师资料总结 - - -精品资料欢迎下载 - - - - -

4、 - - - - - - - - - - - - - 名师精心整理 - - - - - - - 第 2 页，共 30 页 - - - - - - - - - ?CSng （表达式）单精度?CInt （表达式）整型?CLng （表达式）长整型?CStr （表达式）字符串?Cvar （表达式）变体型? 二变量? 1 变量名V中变量的命名遵从标识符命名原则:必须以字母开头；变量中间不能有空格；不能使用VB关键字；? 2变量的声明VB允许使用不声明的变量，即一个变量未经声明就可以在程序中使用。这种变量使用方式称为隐含变量声明。 (使用隐含变量时，VB 会自动创建变量，并赋予它变体类型。在为其指定值之前

5、，其值为Empty ，当为它赋值后，会采用所赋值的类型作为自己的类型。) ? 显式声明：? 用类型说明符：将类型说明符加在变量名的尾部；? 定义变量时指定其类型：? 格式：Declare 变量名 As 类型名? 其中的Declare 可以是 Dim ,Static, Redim, Public中之一? 用Def type 语句：Def type 字母范围? 这里的Type 是类型标志， Def 是系统保留字，它们之间没有空格。例如：DefInt D-J ? 该定义声明了 D、E、F、G、H、I、J都是整型变量，而且以这些字母开头的变量名也都是整型变量。名师资料总结 - - -精品资料欢迎下载

6、- - - - - - - - - - - - - - - - - - 名师精心整理 - - - - - - - 第 3 页，共 30 页 - - - - - - - - - ? 类型说明符：?：整型；?& ：长整型；?！：单精度浮点型；?# ：双精度浮点型；? ：货币型；?$ ：字符串型；? 字节、布尔、日期、对象及变体型没有类型说明符。? 注意：? Dim a ，b，c As Integer是错误的。只有c被声明成Integer，而 a，b 缺省为 Variant类型。? 如果使用 Dim x As Integer语句声明了变量 x为Integer，而在后面又使用带有类型说明符的该变量，如

7、x$ ，x! ，x 和x# ，程序运行时就会产生“ duplicate definition”错误。? 使用不带 As 的Dim 语句，会被声明成变体类型的变量。? 通过不带长度说明的字符串声明语句可以声明变长字符串。? 对于声明布尔型的变量，其缺省值为False ；名师资料总结 - - -精品资料欢迎下载 - - - - - - - - - - - - - - - - - - 名师精心整理 - - - - - - - 第 4 页，共 30 页 - - - - - - - - - ?为声明为 Date 类型的变量赋值时， 日期值应放在一对#之间，且多种日期和时间格式在VB 中都是有效的。?3变

8、量的作用域和生存期：?变量的作用域 指变量的有效作用范围，也就是变量可以被访问的范围。按以下三种方式来定义变量的作用范围：?范围说明?过程在过程内使用 Dim 或Static ?私有在模块开头加上Dim 或Private ?公共在模块开头加上 Public ?变量的生存期 指VB保存该变量值的时间，是变量在整个程序运行过程中的有效生存时间1） 过程层变量 过程层变量是指在过程或函数内部定义的变量，这种变量无论是用Dim 还是 Static 声明，其作用域都只是该过程或函数体，在过程或函数外不能引用；2） 窗体层变量 窗体层变量是指在窗体的通用部分声明的变量，即不是在任何一个窗体内的过程或函数中

9、声明的变量。它的作用范围至少是窗体的存在范围，也就是说在窗体内的每个过程或函数中都可以使用窗体层变量。? 窗体层变量的声明有三种方式：? 用Dim 语句声明。名师资料总结 - - -精品资料欢迎下载 - - - - - - - - - - - - - - - - - - 名师精心整理 - - - - - - - 第 5 页，共 30 页 - - - - - - - - - ? 用Private语句声明。? 用Public 语句声明。? 对于用 Dim 和Private声明的窗体层变量， 其作用范围都是在所声明的窗体范围内。用Public 声明的窗体层变量作为窗体公用数据成员，可以在其他窗体或模

10、块中以“ 窗体名 .变量 ” 方式引用。其作用可以大于当前窗体范围。窗体层变量在本窗体所有过程中都是可见的。? 3）模块层变量 模块 (Module)是构成 VB 工程 (Project)的一部分，是包含数据和过程的集合。定义模块层变量只需在模块的通用部分加入Dim ，Private，Global 或Public 等声明语句即可。 用Dim 和Private声明的模块层变量作用域为所在模块范围， 而用 Public 和Global 定义的模块层变量则可以全局使用。? 注：全局变量必须用Public 或Global 声明，不能用 Dim ? 三常量? 常量是一个有意义的名字，用来表示程序运行时不

11、变的数值和字符串。? Visual Basic中的常量分为文字常量和符号常量两种，文字常量又可分为数字常量和字符串常量。? 符号常量 (自定义常量 )：在程序中程序员用Const 声明的常量。名师资料总结 - - -精品资料欢迎下载 - - - - - - - - - - - - - - - - - - 名师精心整理 - - - - - - - 第 6 页，共 30 页 - - - - - - - - - ? 使用常量时应注意：? （1） 用Const 声明的常量在程序运行过程中是不能被重新赋值的。? （2）在常量声明的同时赋值。? （3）可以为声明的常量指定数据类型，如Const conVa

12、l As Currency=3.78，缺省时为所赋值的类型。? （4）在用常量为常量初始化时注意，不可有循环引用。 例如：? 模块 1中：? Public const con1=con2+8 ? 模块 2中：?Public Const con2= con1*3? 四数组? 1数组的定义：? 必须用 Global 或Dim 语句定义。 Dim 语句的语法格式如下：? Dim 数组名 (lower To upper，lower To upper)As type ? 在这里，每对 lower 和upper 为数组的一维， lower 是该维下标的下限， upper 是该维下标的上限，如不标明lowe

13、r ，其默认值为0。Upper 不可省略。名师资料总结 - - -精品资料欢迎下载 - - - - - - - - - - - - - - - - - - 名师精心整理 - - - - - - - 第 7 页，共 30 页 - - - - - - - - - ? 例如：? （1）一维数组的定义：? Dim Record (5) As Integer ? 定义了一个有六个数据元素的整型数组? （2）二维数组的定义? Dim Matrix(2,3) As Integer ? 该数组定义了一个二维数组，可以存储12 个整型数，三行四列下标： 00 ，01 ，02 ，03 ，10 ， 23? 2动态数

14、组? 带有空 ()的Dim 可以声明一个动态数组，如：? Dim dynArray( ) ? 然后，可用 ReDim 语句在一个过程或函数中定义动态数组的维数和元素个数。申请或重申请存储空间的一般格式为：? ReDim Preserve 数组名(lower TO upper ，lower To upper) As Type ? 其中， Preserve为可选项，表示是否保护己有数据。缺省时为不保护。? 例如：ReDim dynArray(10) / 为动态数组申请 10 个单元? ReDim Preserve myArray (Ubound(myArray)+10) 名师资料总结 - - -精

15、品资料欢迎下载 - - - - - - - - - - - - - - - - - - 名师精心整理 - - - - - - - 第 8 页，共 30 页 - - - - - - - - - ? 其中， Ubound函数返回数组的指定维的上限。? 这是一个保留原数据的增量分配数组? 五、枚举类型：? 当一个变量只有几种可能的值时，可将这个变量定义为枚举类型。? 枚举类型的声明放在窗体模块、标准模块或公用类模块中的声明部分，用 Enum 语句来定义，格式如下：? Public|Private Enum 类型名称?成员名 常数表达式 ?成员名 常数表达式 ?-?-? End Enum ? 默认情况

16、下， 枚举类型中的第一个常数被初始化为0，其后的常数逐项递增 1。? 例如：Enum Days ?Saturday ?Sunday ?Monday ?Tuesday ?Wednesday ?Thursday 名师资料总结 - - -精品资料欢迎下载 - - - - - - - - - - - - - - - - - - 名师精心整理 - - - - - - - 第 9 页，共 30 页 - - - - - - - - - ?Friday ?End Enum ? 例如在如上定义的Days 枚举类型的基础上， 有如下单击某按钮的过程：? Private Sub Command1_Click() ?

17、Dim MyDay As Days ?MyDay = Saturday ?If MyDay Monday then ?MsgBox “ It s the weekend !”?End If ? End Sub ? MyDay是一个枚举变量，Saturday的值为 0，而 Monday的数值为 2，If 中的条件成立? 六、运算符与表达式? 1赋值运算符： Visual Basic中的赋值运算符是 “ = ” 。? 2数学运算符：? 优先级运算符说明? 高指数运算，如 238 ?负号运算符?* / 乘除运算，其中除法（ /）的所得结果?为实数? 整除。所得结果为实际结果?的整数部分?Mod 取模

18、运算符，两数相除取余数名师资料总结 - - -精品资料欢迎下载 - - - - - - - - - - - - - - - - - - 名师精心整理 - - - - - - - 第 10 页，共 30 页 - - - - - - - - - ?+ - 加、减运算? 低& 连接字符串。? 3关系运算符：（等于）； 或 （不等）；? （大于）； = （大于等于）； like（比较样式）； Is（比较对象变量）? 4逻辑运算符：? 逻辑运算用于判断操作数之间的逻辑关系。VB提供了非 (Not) 、与(And) 、或 (Or) 、异或(Xor) 、相等(Eqv) 和隐含(Imp) 逻辑运算。逻辑运算符

19、的优先级低于数学运算符和关系运算符。逻辑运算符本身也有优先级，其顺序为 Not ，And ，Or ，Xor, Eqv ，Imp 。? 5、表达式的执行顺序：? 1）函数运算；? 2）算术运算；? 3）关系运算；（优先级：， ， ，= ）? 4）逻辑运算；? 注：乘除法同时出现时，遵循从左到右顺序；括号的运算总是优先；字符串连接（& ）不是算术运算符，但其优先顺序在所以算术运算符之后，又优先于其他运算符? 七、输入与输出：? InputBox函数 ：InputBox函数可以产生一个对话框，用于将用户从键盘输入的数据作为函数的返回值返回到当前程名师资料总结 - - -精品资料欢迎下载 - - -

20、- - - - - - - - - - - - - - - 名师精心整理 - - - - - - - 第 11 页，共 30 页 - - - - - - - - - 序中。? 返回数值型数据。格式如下：?InputBox(prompt ,title,defualt,xpos,ypos,helpfile,context) ? 返回字符串型数据。格式如下：? InputBox$(prompt ,title,defualt,xpos,ypos,helpfile,context) ? 其中的参数含义为：? prompt：一个字符串，显示出现在对话框中的用来提示用户的信息，最大长度为1024 个字符。?

21、 Title ：一个字符串，显示出现在对话框的顶部的标题信息。? default：一个字符串， 用于显示输入缓冲区的默认信息，即用户在执行了 InputBox函数后如果没有输入任何信息，则可用此字符串作为默认的输入值。? xpos ：整数值，用于表示对话框与屏幕左边界的距离。? ypos ：整数值，用于表示对话框与屏幕上边界的距离。? Helpfile：字符串型变量或字符串表达式，用于表示要用的帮助文件的名字。? context：整数型变量或表达式，用于表示相关帮助主题的目录号。名师资料总结 - - -精品资料欢迎下载 - - - - - - - - - - - - - - - - - - 名

22、师精心整理 - - - - - - - 第 12 页，共 30 页 - - - - - - - - - ? Print 方法 用于输出显示。它既可以用于窗体，也可以用于其他控件上；它可以在窗体上显示文本字符串和表达式的值，也可以在其他图形对象或打印机上输出信息。格式：? 对象名称。 Print表达式表 , | ；? 对象名称是一个可选项，可以是窗体、图片框或打印机，如果省略，则在当前窗体上直接输出；? 表达式表是一个或多个字符串或数值表达式， 用以原样输出字符串或表达式的值。也是可选项。如果省略，则输出一个空行；? 当需要输出多个字符串或表达式值时，各表达式间用逗号、分号或空格分隔，其中逗号分

23、隔为标准输出格式，14 个字符位为一个输出区段单位，逗号后面的表达式在下一区段输出，分号和空格分隔，则是按照紧凑格式输出；? Print 方法兼有输出和计算双重作用，即可以先计算表达式的值后输出；? 每执行一次 Print 方法将自动换行，要显示在同一行上，可以在前一 Print 方法行的末尾加上一个逗号或分号。? 与Print 方法相关的还有一些函数和方法：? （1）Tab 函数：可以把光标移动到由参数n指定的位置，并从这个位置开始输出信息。格式为：?Tab （n）名师资料总结 - - -精品资料欢迎下载 - - - - - - - - - - - - - - - - - - 名师精心整理

24、- - - - - - - 第 13 页，共 30 页 - - - - - - - - - ?其中 n为一个整数值， 指出下一个输出位置的列号，如果当前位置已经超出n， 则自动下移一行， 默认最左边的列号为1；? 当n大于行宽时，显示位置为n Mod行宽；? 当一个 Print 方法对应 n个Tab 函数时，每个 Tab 函数对应一个输出项，各输出项之间用逗号分隔。? （2）空格函数：用空格函数可以返回n个空格，格式为：?Space $ (n) ? （3）Spc 函数：在用 Print 输出时可以用 Spc 函数跳过 n个空格，格式为：?Spc （n）? （4）Cls 方法：使用 Cls方法可

25、以清除 Print 方法显示在对象上的内容，并将光标移动到对象的左上角（0，0）位置。格式为：?对象。 Cls ?其中， “ 对象 ” 为可选项，如果省略，则清除当前窗体内的内容。? 例1：设计一个程序， 输入一组学生信息：学号、姓名、性别、年龄和入学成绩。用窗体单击事件激发。?解： Private Sub Form_Click( ) ?num$ = “ 请输入学号： ”名师资料总结 - - -精品资料欢迎下载 - - - - - - - - - - - - - - - - - - 名师精心整理 - - - - - - - 第 14 页，共 30 页 - - - - - - - - - ?ms

26、gtitle$ = “ 学生登记表信息”?nname$ = “ 请输入姓名： ”?sex$ = “ 请输入性别： ”?age$ = “ 请输入年龄： ”?sco$ = “ 请输入入学成绩：”? Studentnum$ = InputBox$(num$,Msgtitle$) ? Studentname$ = InputBox$(nname$,Msgtitle$) ?Studentsex$ = InputBox$(sex$,Msgtitle$) ?Studentage% = InputBox(age$,Msgtitle$) ?Studentsco% = InputBox$(sco$,Msgtitl

27、e$) ?Cls ?Print Studentnum$；“ ，” ；Studentname$；“ ，” Studentsex$；“ ，现年 ”?Print Studentage%；“ 岁” ;“ ,入学成绩 ” ; Studentsco%；“ 分”?Ebd Sub ? （5）MsgBox函数 ： Visual Basic中除了可以用 Print 方法在窗体或控件上输出程序执行结果等信息外，还提供了一种在适当的时候可在屏幕上显示一个对话框，让用户进行选择，并根据选择确定后续操作的功能。? 格式：? MsgBox（ prompt ,buttons ,title ,helpfile,context）

28、名师资料总结 - - -精品资料欢迎下载 - - - - - - - - - - - - - - - - - - 名师精心整理 - - - - - - - 第 15 页，共 30 页 - - - - - - - - - ? 各参数含义为：? prompt：一个字符串，最大长度 1024 字符，输出的提示信息，当一行显示不下时，自动换行；? buttons: 整数值或符号常量，指示显示按钮的数目及形式，使用的图标样式，默认按钮是什么以及消息框的强制回应等等。如果省略，其缺省值为 0；? title ：显示在对话框标题栏中的信息，缺省值为该应用程序名；? helpfile：字符串表达式，识别用来向

29、对话框提供上下文相关帮助的帮助文件，如果有这个选项，则必须有context选项；? context：数值表达式，由帮助文件的作者指定给适当帮助主题的帮助上下文编号，同理，如果有这一选项，则必须有helpfile选项。?表中的数值分为四类： 05为对话框中命令按钮的类型和数量，每个数值表示一种组合方式；16 、32、48 、64 为指定对话框所显示的图标；0、256 、512 、768 指定默认的活动按钮； 0、4096 用于应用程序和系统强制返回。 Buttons的参数值由这四类数值组成，其组成原则是从每一类中选择一个值，把这几个值加起来就获得了Buttons参数的值，在大多数应用中，只使用前

30、三类，不同的组合会得到不同的结果。例如：?19316 0：显示 “ 是” 、“ 否” 和“ 取消” 按钮和 “ 暂停” 图标；?34232 0：显示“ 终止” 、“ 重试” 和“ 忽略” 按钮和“ 疑问” 图标；MsgBox的返回值如下表：? 例2 ：设计一个窗体单击事件过程，要求程序执行时出现提示信息： “ 请确认操作正确否？” ，并在消息框的标题上显示名师资料总结 - - -精品资料欢迎下载 - - - - - - - - - - - - - - - - - - 名师精心整理 - - - - - - - 第 16 页，共 30 页 - - - - - - - - - “ 操作确认 ” 标题

31、，如果回答“ 是” ，则将返回值 6赋予变量 a，并在窗体上显示返回值的平方，否则，如果选择“ 否” ，则返回值为 7，在窗体上显示“ 重新操作并确认！”? 该程序产生的对话框中有三个按钮即“ 是” 、“ 否” 、“ 取消 ”? 程序代码如下：?Private Sub Form_Click() ?Dim Msg As String, title As String ?Dim a As Integer ?Msg = 请确认操作正确否？ ?title = 操作确认 ?a = MsgBox(Msg, 19, title) ?If a = 6 Then ?Print a 2 ?ElseIf a = 7

32、 Then ?Print 请重新操作并确认！ ?End If ? End Sub ? 八、语句与控制流? 1、注释语句：? 注释用来说明程序中某些语句的功能和作用。在 VB 中用 “”和Rem 来标识一条注释语句。VB 程序在解释运行或编译过程中，不会处理Rem 后面那一行注释语句。? 2、赋值语句 : 名师资料总结 - - -精品资料欢迎下载 - - - - - - - - - - - - - - - - - - 名师精心整理 - - - - - - - 第 17 页，共 30 页 - - - - - - - - - ?目标操作符源操作符?/ 操作符两边的数据类型必需一致！? 3、暂停语句：

33、? 格式：Stop ?/ 当程序执行到 Stop 时，自动打开立即窗口? 4、结束语句：格式： End / 常用于结束程序? 5、条件分支结构? (1) If 语句的三种格式：? 第一种是单分支格式：? If 条件Then ?语句 ? End If / 其中加 “ ” 部分为可选择部分。第二种是双分支格式：? If 条件Then ? 语句块 1 ? Else ?语句块 2 ? End If 这里是双分支，即如果条件满足，执行语句块1，否则，执行语句块 2。注意：语句块中的语句不能与其前面的Then 在同一行上！名师资料总结 - - -精品资料欢迎下载 - - - - - - - - - - -

34、 - - - - - - - 名师精心整理 - - - - - - - 第 18 页，共 30 页 - - - - - - - - - 第三种格式：? If 条件 1 Then ?语句块 1 ? Else If 条件2 Then ?语句块 2 ? ? Else if 条件n Then ? 语句块n ? Else ?语句块 ? End If? （2）IIf 函数?VB 提供了一种用来执行简单条件判断的函数IIf ，它是“ If Then Else ” 结构的简单版本，格式如下：?Result = IIf（条件，为 “ True ” 的执行语句，为“ False ”的执行语句）?这里的 Resul

35、t 是函数的返回值，括号中的三项均不能省略，执行的操作为首先判断条件，当“ 条件” 为真的时候，执行“ 为“ True ” 的执行语句 ” ，否则执行 “ 为“ False ” 的执行语句”。? 例如有如下判断条件：?If a 8 Then ?x = 3 名师资料总结 - - -精品资料欢迎下载 - - - - - - - - - - - - - - - - - - 名师精心整理 - - - - - - - 第 19 页，共 30 页 - - - - - - - - - ?Else ?x = 0 ?End If ? 用IIf 函数替代，则可简化为：?x = IIf (a 8，3，0) ? 类似

36、于C语言中的条件表达式：? 表达式1？表达式 2：表达式 3 ? 例: Max=(ab)? a : b; ? 2Select Case 语句? Select Case 语句很适合多重条件判断。它的书写格式为：? Select case 测试表达式? Case 表达式结果 1 ? 语句块 1 ? Caset 表达式结果 2 ? 语句块2? ? Caset else ? 语句块n? End Select ? 测试表达式既可以是数值表达式，也可以是字符串表达式，通常为变量或常量；每个语句块由一行或多行合法的Visual Basic语句构成；表达式结果 1、表达式结果 2 被称为域值，它可以是：表达式

37、，表达式 、 表达式 To 表达式或者 Is关系运算表达式（运算符可以是： ， ，= ， ，）之一。例如：? Case 1,3,5,7 名师资料总结 - - -精品资料欢迎下载 - - - - - - - - - - - - - - - - - - 名师精心整理 - - - - - - - 第 20 页，共 30 页 - - - - - - - - - ? Case 1 To 6 ? Case Is = a b ? 这三种表现形式均合法，但应该注意表达式结果中的表达式必须与测试表达式的类型一致。? 例：从键盘上输入学生考试成绩的等级，然后按照考试成绩的等级显式出百分制的分数段，可以用Selec

38、t Case 语句来实现：? Sub Form_click() ? Dim grade As String，Msg ? Msg= ” 请输入学生的成绩等级：”? grade InputBox$(Msg) ? If Not IsNull（grade ）Then ? Select Case grade ? Case “ A”? Msg= ” 85100 ”? Case “ B”? Msg = “ 7084 ”? Case “ C”? Msg = “ 6069 ”? Case “ D”? Msg = “ 0 Then ?Print Numx；?Sumx=Sumx+Numx ?Else ?Sumy=S

39、umy+Numx ?End If ?Next i ?Print ?Print “ 已输入的正数累加和为： ” ；Sumx ?Print “ 已输入的负数累加和为： ” ；Sumy 名师资料总结 - - -精品资料欢迎下载 - - - - - - - - - - - - - - - - - - 名师精心整理 - - - - - - - 第 23 页，共 30 页 - - - - - - - - - ?End Sub ? 2For Each Next 语句? 对集合中的每个元素进行一次循环，直到集合中无更多元素时，执行 Next 下面的语句。一般格式为: ? For Each 集合中元素in 集合

40、? 语句 ? Exit For ? 语句 ? Next 元素 ? 3 Do Loop 语句? (1) 当型循环格式：? 格式 1：Do ?语句块 ?Exit Do ?Loop While 循环条件 ? 格式 2：Do While 循环条件 ?语句块 ?Exit Do ?Loop? 这种结构的功能是当“ 循环条件 ” 为“ 真” 时，执行循环体语句块，否则，跳出循环体，执行Loop 后面的语句。第一种格式名师资料总结 - - -精品资料欢迎下载 - - - - - - - - - - - - - - - - - - 名师精心整理 - - - - - - - 第 24 页，共 30 页 - - -

41、 - - - - - - 的执行顺序是：先执行循环体语句块，然后判断 “ 循环条件 ” ，如果为 “ 真” ，则继续执行循环体语句块，否则，跳出循环，执行 Loop 后面的语句；第二种格式的执行顺序：先判断“ 循环条件 ” ，如果为 “ 真” ，则执行循环体语句块，否则跳出循环，执行 Loop 后面的语句；? （2）直到型循环格式：? 格式1：? Do Until 循环条件 ? 语句块? Eixt Do 用于在特定条件下退出循环? Loop ? 格式2：? Do ? 语句块? Eixt Do 用于在特定条件下退出循环? Loop Until 循环条件 ? 这种结构的功能是直到“ 循环条件 ”

42、为“ 真” 时，跳出循环体，执行 Loop 后面的语句， 否则， 就一直执行循环体语句块。第一种格式的执行顺序是：判断“ 循环条件 ” ，如果为 “ 假” ，执行循环体语句块， 否则，跳出循环体， 执行 Loop 后面的语句；第二种格式的执行顺序是：先执行循环体语句块，然后判断“ 循环条件 ” ，如果为 “ 假” 则继续执行循环体语句块，否则，跳出循环体，执行Loop 后面的语句。名师资料总结 - - -精品资料欢迎下载 - - - - - - - - - - - - - - - - - - 名师精心整理 - - - - - - - 第 25 页，共 30 页 - - - - - - - -

43、- ? 注意： “ While 循环条件 ” 或“ Until 循环条件 ” 为可选项，如果缺省，则该循环将成为无限循环。? 4While Wend 语句? 这种语句是从传统BASIC 语言中继承下来的，用Do While Loop 语句功能一样，其语句格式为：? While 条件? 语句块 ? Wend ? 5、在 Visual Basic中有以下几种跳出语句：? Exit For ：用于中途跳出For 循环。? Exit Do ：用于中途跳出Do 循环。? Exit Sub：用于中途跳出Sub 过程。? Exit Function：用于中途跳出Function过程。? 以上几种中途跳出语句

44、都既可以直接使用，也可以用条件判断语句加以限制。 且在循环中或过程中出现的次数没有限制。使用它们，可以为某些循环体或过程在需要的时候设置明显的出口。? 九、过程：? 1.Sub 过程（子程序）? 一般格式：名师资料总结 - - -精品资料欢迎下载 - - - - - - - - - - - - - - - - - - 名师精心整理 - - - - - - - 第 26 页，共 30 页 - - - - - - - - - ? StaticPrivatePublic Sub 过程名 ( 参数列表 ) ?语句块 ?Exit Sub ?End Sub ? 参数表列中含有该过程被调用时由主调方传送过来

45、的变量名或数组名，各名字之间用逗号分隔，它们指明了调用时需传送给该过程的参数类型和个数，每个参数的格式为：? ByVal变量名 ( )As 数据类型 ? ByVal 是可选项，如果有这个选项，则表明该参数是“ 传值 ”参数。? 在Visual Basic中应区分通用过程和事件过程这两类子过程。? 通用过程：告诉应用程序如何完成一项指定的任务。通常，在应用程序中经常会发生几个不同的事件过程也许要执行同样的动作的情况，这就要求系统提供能够将公共语句放入一个分离开的过程（通用）中 。? 事件过程：当用户对 Visual Basic中的对象施以动作并得到系统确认时，便自动用相应事件的名称调用该事件过程

46、。事件名称相当于对象和代码之间的桥梁，事件过程则是附加在窗体或控件上的一段程序代码。? 所有的事件过程使用相同的语法。其格式如下：? Private Sub 控件名 _事件名（参数表列） 名师资料总结 - - -精品资料欢迎下载 - - - - - - - - - - - - - - - - - - 名师精心整理 - - - - - - - 第 27 页，共 30 页 - - - - - - - - - ? 语句块 ? Exit Sub ? End Sub ? 窗体的事件过程也使用相同的语法。其格式如下：? Private Sub Form或MDIForm_事件名（参数表列） ? 语句 ? E

47、xit Sub ? End Sub ? 2、Function 函数? 函数实际是实现一种映射，它通过一定的映射规则，完成运算并返回结果。函数的定义方式与Sub 过程的定义很相似，可以说只不过是用Function关键字取代 Sub ，同时加入返回值类型说明。? 格式：StaticPrivatePublicFunction 过程名( 参数列表)As 类型 ?语句块?过程名 = 表达式 ?Exit Function ?语句块 ?End Function 名师资料总结 - - -精品资料欢迎下载 - - - - - - - - - - - - - - - - - - 名师精心整理 - - - - -

48、- - 第 28 页，共 30 页 - - - - - - - - - ?注意： Function过程与 Sub 过程的最大区别在于Sub 过程无返回值，而 Function过程有至少一个返回值；过程不能嵌套，因此，不能在事件过程中定义通用过程（包括Sub 过程和Function过程），只能在事件过程内调用通用过程。? 3、调用过程? 如果要使得程序执行某过程，则必须调用该过程。过程的调用方式有两种：? 第一种方式：?过程名 (参数1 ，参数2， ) ? 第二种方式用 Call 调用：?Call 过程名 (参数1，参数2， ) ? 每次调用过程都会执行 Sub （或Function） 和End

49、 Sub（或Function）之间的语句。 可以将子过程放入标准模块、 类模块和窗体模块中。调用Sub 过程相当于执行一个语句，不考虑返回值，而调用Function过程则需考虑返回值。? 在工程中的任何地方都可以调用其它模块中的公用过程。大致分为几种调用方式? （1）调用窗体模块中的过程。所有窗体模块中的外部调用必须指向包含该过程的窗体模块。? 例如，如果窗体模块 Form1 中包含 SomeSub 过程，则可以以下语句调用：? Call Form1.SomeSub(参数表) ? 调用标准模块中的过程。如果过程名是惟一的，则不必在调用时加模块名，无论是在模块内还是在模块外调用，结果总会这个惟一

50、的过程。名师资料总结 - - -精品资料欢迎下载 - - - - - - - - - - - - - - - - - - 名师精心整理 - - - - - - - 第 29 页，共 30 页 - - - - - - - - - 如果两个以上的模块都包含同名的过程，那就有必要用模块名来限定了。? 十、常用标准函数：? CurDir 函数返回一个用来代表当前路径的字符串变量；格式：CurDir （drive ） ?方括号为可选项，默认为当前驱动器的路径。? CVErr 函数返回一个包含指定错误号的变体型? 格式：CVErr （errornumber）? Date 函数返回一个包含系统日期的Vari