1、第四章 VB环境下的应用 程序开发,4.1 VB介绍Visual BASIC(以下简称VB)是微软(Microsoft)公司推出的 Windows环境 下基于对象的可视化的程序设计语言.可以用来开发indows环境下的各种应 用软件,也可用来开发多媒体应用,Visual Basic 利用面向对象的概念巧妙地屏蔽了Windows环境下的程序设计的复杂性Visual Basic基于结构化的BASIC语言和一系列的可视化的窗口设计工具,提供了窗口、菜单、按钮、对话框、消息框、滚动条等Windows程序的标准界面对象,以及一整套可视化设计工具,4.1.1 Visual Basic概述,Visual B
2、asic是首批采用事件驱动的程序设计机制的程序语言之一从微软公司于1991年推出Visual Basic1.0版到目前为止,已推出6个版本,获得极大成功,4.1.2 VB程序设计的特点,1. 可视化的界面设计设计者仅需用现有工具在屏幕上进行布局设计,设置对象属性即可,Visual Basic自动产生界面设计代码,2. 基于对象的程序设计思想 VB已经把程序和数据封装起来成为一个对象,并为每个对象赋予各种属性,程序设计人员在设计时无需编写对象的创建和描述程序代码,便可直接使用3. 事件驱动的编程机制 每个事件都能驱动一段程序运行,完成相应的工作4. 方便、易用:结构化的程序结构、更接近于人类的语
3、言和逻辑思维方式、语句简单易懂等,5.基于构件的程序开发 可以使用Visual C+,BC+,Delphi等开发用于VB的专用构件,以扩展VB的应用开发能力,VB构件可以直接加入到VB工具箱中供开发人员使用。6.对象的链接与嵌入(OLE) 利用OLE技术,在VB程序中,可以将其他应用软件作为一个对象嵌入到VB应用程序中,并可以对它赋予各种属性和进行程序。还可把符合OLE标准的Windows应用程序嵌入到VB程序中,实现声音、视像、影像、动画、三维立体、变换几何形状、绘制各种图形图像等多媒体功能,7.数据库访问功能 Visual Basic系统本身提供了非常好的数据库管理功能,利用数据库管理窗口
4、,用户可直接创建Access数据库,还可直接编辑和访问其他外部数据库,如FoxPro、dBASE、FoxBase 等。可以通过ODBC等建立连接的方式来使用和操纵外部数据库8.功能强大的辅助开发工具 Visual Basic中的Setup Wizard可为用户制作生成规范的带安装的用户盘,使程序设计人员采用VB开发工具设计的应用程序在编译生成.EXE可执行文件,4.1.3 消息和事件驱动,所有的Windows应用程序都是基于消息的传递和处理的,每一个Windows程序都要求一个消息循环,应用程序中的每一个窗口都要求有一个消息处理器,用户移动鼠标,Windows系统就产生一条消息告诉相应的应用程
5、序:鼠标已经移动了,移动到了什么地方Windows系统是多任务系统,如果一个程序有消息要处理,它就占用CPU处理消息,如果一个程序不再有要处理的消息,系统就询问其他正在运行的程序是否有消息要处理,并把控制权交给要处理消息的应用程序,消息机制,就是所谓的事件驱动,4.1.4 VB开发环境,主窗口,立即窗口,1. 主(Main)窗口,主窗口:控制VB环境下各种工作模式及操作命令,工具条:,返回,2. 窗体(Form)窗口,3. 工具箱窗口,返回,4. 项目(Project)窗口,标题条:显示项目(应用程序)名称,控制盒及极小化按钮;View Form按钮:查看窗体显示界面;View Code按钮:
6、查看代码程序;文件列表:该项目中包含的所有文件清单,返回,5.属性窗口,属性(Properies)窗口见图2.3,所有窗体或控件的属性如颜色、字体,大小等,可以通过属性窗口来修改。属性窗口由以下部分组成:,返回,6. 程序调试窗口(Debug Window),返回,7. 代码(Code)窗口,对象框:存储并显示当前被选中窗体及其中所有控制的名称。其中general表示与特定对象无关的通用代码过程框: 下拉列表框,存储并显示各种事件名称或用户自定义过程及函数名称。源程序代码框: 以Sub过程名开始,End Sub结束。,返回,8菜单设计窗口(Menu Design Window),4.1.5 V
7、B项目和可执行文件,项目,应用程序,4.1.6 创建VB应用程序的步骤,1.创建用户界面:使用 “New Project”项,创 建一个新工程文件,之后再通过在窗体上画构件和对象来创建一界面2.设置界面对象的属性:既可以在设计时用属性窗口设置初始值,也可以在运行时用代码修改属性3.编写事件代码:在为窗体和对各对象设置初始属性之后,应增加响应事件时所要执行的代码4.保存项目5.测试和调试应用程序,6.创建可执行文件:File-Make EXE File 创建7.创建安装应用程序:应用Setup Wizard创建安装程序,例1:本例演示VB6.0开发环境,介绍可视化地创建用户界面的方法,掌握VB的
8、基本概念和基本操作,并建立一个基本的窗体。,操作步骤如下:1.启动Microsoft Visual Basic 6.0中文版。2.在“新建工程”窗口中选择“标准EXE”选项,单击“打开”按钮。3.进入VB6.0开发环境。,4.单击工具栏上的“保存”按钮,弹出“文件另存 为”对话框,文件按默认值Form1.frm保存。5.在弹出的“工程另存为”对话框中,工程按默认值example1.vbp保存。6.创建工程后,VB会在工程中创建一个默认的窗体。7.在工程窗体的右上方有一个列表窗体,该窗体列出了整个工程的结构。8.在工程窗体的左方有一个可以移动的工具箱,其中包含VB的标准控件。9.在工程窗体的右方
9、有一个属性窗口,可以设置对象的属性。,10.单击“运行”按钮,出现运行结果。11.要改变窗体的背景颜色,可设置窗体对象的属性。在设计窗体上按F4键,切换属性窗口;双击属性窗口的BackColor属性,选择兰色。12.双击工具箱中的Lable控件,在当前窗体的中央出现一个Lable控件。13.在Lable控件上按F4,可以看见属性窗口中的名称为默认的Lable。双击Font属性,可以改变文字的大小和字体等。双击ForeColor属性,可以改变文字颜色。,说明:对象是数据和代码的组合,在VB中,窗体和控件就是对象,因此在控件中已经包含了程序代码,使用控件将简化应用程序的开发过程,并且提高应用程序的
10、开发效率。在VB中,可以通过对象的属性、方法和事件三个基本要素来控制和操作对象。属性是对象的特征和数据,它定义了对象的基本形状和行为,如控件的名称、标题、字体和可见性等。,例2:本例演示如何控制窗体的关闭。运行程序,单击窗体中的“打开另一个窗体”按钮,将弹出另外一个窗体,只有单击此窗体中央的“关闭”按钮,才能关闭窗体。注意右上角的“关闭”按钮是无效的。,具体操作步骤如下:1.创建一个新工程,并命名为example2.vbp,该工程中包含一个默认的窗体Form1.frm.2.添加命令按钮控件CommandButton,设置按钮Caption属性为“打开另一个窗体”。,3.单击“工程”菜单中“添加
11、窗体”选项,在弹出的窗口中选择“窗体”,工程将加入一个新的窗体。4.单击“保存”按钮,将新窗体存为Form2.frm.5.同样在Form2窗体中加入一个命令按钮控件,将其caption属性设置为“关闭窗体”。6.为命令按钮添加事件。双击Form1窗体中的“命令”按钮,将弹出code窗口。7.单击code窗口右上方的下拉列表框,选择控件的事件。(如选择Click事件)。,8.在Command1_Click事件中加入以下代码:Private Sub Command1_Click() Form2.show 显示Form2窗体End Sub9.在Form2窗口的Form_QueryUnload处理程序
12、中加入以下代码: Private Sub Form_QueryUnload(Cancel As Integer,UnloadMode As Integer) if UnloadMode1 Then Cancel=True Cancel 为True 时,窗体才可以关闭。 End If End Sub,10.在Form2窗口的Command1_Click处理程序中添加以下代码:Private Sub Command1_Click() Unload Me 关闭窗体End Sub,说明:VB编程是以事件驱动,事件是对象的某种特定动 作,如单击鼠标(Click)、双击鼠标(DbClick)、属性改变(C
13、hange)等。当事件被触发时,对象就会对该事件作出相应的响应。用户可通过事件过程(EventProcedure)来控制程序的执行。事件过程的格式如下: Sub 对象名称事件名称(参数) 事件执行的程序代码 End Sub, VB对用户程序代码中关键字的首字母总被转换成大写字母,其余字母一律转换为小写字母。提高了程序的可读性。 VB将关键字中每个单词的首字母自动转换成大写字母。 对于用户自定义的变量名、过程名、函数名,VB以第一次定义的为准,以后输入的自动转换成首次的形式。,4.2 VB语言程序设计基础,4.2.1编码规则,1、在VB代码中,字母不区分大小写, VB 在同一行上可以书写一条语句
14、或多条语句。如果多条语句写在一行上,语句间用冒号“:”隔开。 例如:Form1.width=300: Form1.caption= 您好:Temp= Form1.width 为了方便阅读,最好一行写一条语句。,2、语句书写自由, 一条语句如果在一行内写不下,VB允许将单行语句分若干行书写,在行后加入续行符(一个空格后面跟一个下划线“ _”。)将长语句分成多行。 Addresses = “天津市河北工业大学” & _ “现代化教学中心” & _ “计算机技术基础教研室” 原则上,续行符应加在运算符的前后,续行符不应将变量名和属性名分隔在两行上。,注释可以和语句在同一行,并写在语句的后面,也可占据
15、一整行。例如: 这是从屏幕左边 开始的注释。Text1.Text = “Hi!” 在文本框中放欢迎词。,注释有三种情况: 用Rem开头引导注释行。 用撇号“”开始引导语句后的注释。 使用“设置/取消注释块”命令将若干语句行或文字设置/取消为注释块。注意:在同一行内,续行符之后不能加注释。,3、在VB中可以使用注释,功能:用来标记变量名、函数名和类型名构成元素:AZ、az、09或下划线_。形式:以字母或下划线开始,后跟字母、数字 或下划线组成的字符串。注意:标识符不能分行书写。,例如:以下是Visual Basic 6.0中合法的标识符Dim MyString As String Const P
16、i=3.1415926535897932 Public Function getValue () As Integer,4、VB中的标识符,Visual Basic提供了许多基本数据类型,如:Integer(整型), String(字符型), Boolean(逻辑型), Currency(货币型)等,每种数据类型占用一定的内存,允许存储一定范围的值。,4.2.2 数据类型, 数值(Numerice)数据类型 有整型(Interger)(%) 长整型(Long)(&) 单精度型(Single)(!) 双精度型(Double)(#) 货币型(Currency)() 字节型(Byte)($) 1)整
17、型(Interger)和长整型(Long)用于保存整数 可以是正整数、负整数或者0。 整型数用两个字节存储,表示数的范围为: -32768+32767 长整型数用4个字节存储,表示数的范围为: -2147483648+2147483647,标准数据类型,2)单精度型(Single) 用来表示带有小数部分的实数,4个字节存储。单精度浮点数最多有7位有效数字,单精度浮点数有多种表示形式: 123.45、0.12345E+3、123.45!都是同值的单精度数。 如果某个数的有效数字位数超过7位,把它赋给一个单精度变量,超出的部分会自动四舍五入。 例如:把213456.2567赋给单精度变量aa,aa
18、的值为213456.3。,3)双精度型(Double):用8个字节存储。 科学记数法格式 :aDc或adc 例如 314.159265358979D-2表示3.14159265358979。 双精度浮点数最多可有15位有效数字。 4)字节型(Byte)用来存储二进制数。 如果变量包含二进制数,则将它声明为 Byte 数据类型。Byte 是从 0-255 的无符号类型,不能表示负数。,(2) 字符(String)数据类型 是一组由计算机字符组成的序列,每个字符都以ASCII编码表示。用一个字节表示。在VB中,字符串要用双引号括起来。例如:“Visual Basic”、“中国天津”、“123.45
19、6” 有两种字符串:变长字符串和定长字符串。变长字符串的最大长度为231-1个字符;定长字符串的最大长度为65535个字符 。,形式:Type 自定义类型名 元素名(下标) As 类型名 元素名(下标) As 类型名 End Type其中:元素名 表示自定义类型中的一个成员 下 标 表示该成员是一个数组 类型名 该成员的标准数据类型,自定义类型,例如: 定义班级中学生的基本情况的数据类型如下:Type Students 声名Students是自定义类型名 Name As String * 8 Name是Students类型中的成员之一 Age As Integer Age是Students类型
20、中的成员之一 Address As String * 20 Address是Students类型中的成员之一 End Type,声明变量:Dim Student1 As Students要表示Student1变量中的某个元素,可使用下列方式:变量名.元素名例如:Student1.Name=李萍Student1.Age=19,使用自定义类型应注意的问题: 自定义类型必须在标准模块(.Bas)中定义,默认是Public。, 自定义类型中的元素类型是字符串型时,该字符串必须是定长字符串。 要分清自定义类型名和具有该类型的变量名。前者表示的是一种数据类型,如同Integer、Single等一样;后者是
21、一个具有某种类型的变量,VB根据变量的类型分配必要的存储空间。,4.3常量和变量,4.3.1 常量,1、普通常量: 数值常量:例如: 50、480085、-123、3.12436、123.123、-0.456等。 字符串常量: 是用双引号括起来的一串字符,每个字符占用一个字节,如果是汉字,占用两个字节,但在VB中汉字被认为是一个字符。 “abcd” 长度为4的字符串 “VB5.0中文版” 长度为8的字符串, 逻辑常量: 逻辑真 True、 逻辑假 False2符号常量(用户声明常量) 用户声明常量是用一个符号名来代替数值或字符串,称为符号常量。命名规则:符号名必须是以字母开头,由字母、数字、下
22、划线组成的长度不大于40的字符串。格式:const 符号常量名 As 类型=表达式 ,符号常量名=表达式,功能:设置符号常量为表达式的值。举例:下面的语句分别定义了四个符号常量Const NAME As String =“LiLin“ 定义NAME是符号常量,其值是 字符串“LiLin“ Const NUM As Integer= 4450 定义NUM是符号常量,其值是 整型数4450 Const Pi=3.14159 定义PI是符号常量,其值是单精度 数3.14159,1 变量和变量名,变量是指在程序运行期间其值可以变化的量。命名规则: 变量名必须以字母AZ(或a z)开头。 构成变量名的字
23、符串由英文字母、数字、 下划线符号组成。,4.3.2 变量, 变量名中间不允许有空格。 Visual Basic的保留字不能作为变量名。 在Visual Basic语言中,变量名不区分大小写。如ABC、abc、aBc都认为是一个相同的变量名。为了便于区分,一般变量名首字母用大写字母,其余用小写字母表示,而符号常量全部用大写字母表示。,2 变量的声明及类型, 用Dim关键字声明变量例子: Dim Age As Integer 定义Age为整型变量 Dim StrTemp As String 定义StrTemp为不定长字符型变量 Dim StrName As String * 10 定义StrNa
24、me 为定长字符变量 Dim Number As Single, Count As Single 定义Number和Count都是单精度变量 Dim Number , Count As Single 定义Number为变体变量,Count为单精度变量 从上面的例子可知: 字符串变量有定长和不定长两种形式; 在一个Dim语句中定义多个变量时类型声明不能共用。, Public关键字声明变量用途:在全局模块中使用,定义的变量是全局变量,作用域为整个应用程序。声明的方式:单击“工程”菜单上的“添加模块”选项,添加一个新模块文件或打开现有的模块文件。用Public 语句定义变量,格式为: Public
25、变量名 As 类型名例子:Public PI As Single Public AA As Integer, 用Static 关键字声明变量 格式:Static 变量名 As 类型名 用途:在过程中定义静态变量和静态数组。 说明:该变量的值在函数或过程执行结束后能保存下来 所以,下一次执行时,该值不再初始化。 例子:Private Sub form_Click() Dim A1 As Integer Static A2 As Integer A1=A1+1 A2=A2+1 End Sub,该过程中A1和A2定义为不同类型的整型变量。A1的值每调用一次过程就自动加1,过程调用一结束,其值就变为0
26、。A2的值每调用一次过程也自动加1,过程调用结束时,A2的值等于调用该过程的次数。, 用类型说明符直接声明变量格式:变量名+类型说明符类型说明符放有:% 表示整型 & 表示长整型! 表示单精度型 # 表示双精度型 表示货币型 表示字符型例如:Name 定义字符型变量 Price! 定义单精度型变量 Age% 定义整型变量,3 变量的作用域,局部变量 用Dim语句定义,只能在本过程中使用,其他过程不可访问。随过程的调用分配存储单元,进行变量的初始化,一旦过程结束,变量的内容自动消失,并释放所占用的存储单元。不同的过程中可使用相同的变量名。窗体/模块级变量用Dim语句或Private语句,在“通用
27、声明”段中定义。放在一个窗体/模块的任何过程外,可被本窗体/模块的任何过程访问。,全局变量用Public语句声明,在“通用声明”段中定义,放在标准模块的任何过程或函数外,可被应用程序的任何过程或函数访问。其值在整个应用程序中始终不会消失和重新初始化,只有在整个程序结束时,才会释放。静态变量 用Static语句定义的局部变量,在程序运行过程中该类变量的值可保留。每次调用过程时,用Static定义的静态变量保持原来的值,而用Dim定义的变量要重新初始化。,声明变量时作用域的规则:在窗体、模块中声明的变量是模块级的,对整个模块都有效。在过程内用Dim语句声明的变量只在过程内有效。用Public语句声
28、明的变量是程序级的,在整个程序中起作用。用Static语句声明的变量是静态变量,即使在过程结束后也一直保存着,VB在任何时候都不会去初始化静态变量。, 算术运算符,4.4运算符和表达式,功能:对两个操作数进行大小比较,若关系成立,返回True,否则返回False., 关系运算符,Not 逻辑非,当操作数为假时,结果为真。 And 逻辑与,两个操作数都为真时结果为真 Or 逻辑或,两个操作数只要有一个为真, 结果就为真。 Not 逻辑非,返回操作数的相反逻辑值 Xor 逻辑异或,两个操作数不同时,结果为真,否则为假。 Eqv 逻辑等,两个操作数相同时,结果为真。 Imp 蕴含,第一个操作数为真,
29、第二个操作数为假时,结果为假,其余真。, 逻辑运算符,字符串运算符,运算符:& 或 + “12000”+“12345” 结果为“1200012345” 两个字符串连接 “12000”&”12345” 结果为“1200012345”,约定: N 数值表达式 C 字符表达式 D 日期表达式 $ 函数名后有该字符,表示返回值为字符串,4.5常用内部函数,1 数学函数,说明:在三角函数中,以弧度表示;sqr的自变量不能是负数Log 和Exp是一对互为反函数,即 Log(Exp(N),Exp(Log(N)结果还是原来各自变量的值。, Mid( ) 函数格式:Mid(String,n,m)功能:从Stri
30、ng字符串中从第n 个字符开始连续取m个字符。例子:Mid(“VisualBasic6.0”,7,5) 函数返回值是“Basic,2 字符串函数,” Len( )函数格式:Len(String)功能:计算字符串的长度。例子:Len(“VisualBasic”) 函数返回值为11 InStr( )函数格式: InStr(n, string1, string2)功能: 在string1 中从n开始查找 string2,如果 存在,函数值为string2在string1中的位置值;找不到时函数的值为0。n是可选参数。为数值表达式,设置每次搜索的起点。如果省略,将从第一个字符的位置开始。例子:InSt
31、r(2,” efabcdefg”,”ef”) 函数返回值为7,(1).Asc() 格式:Asc(String) 功能:将字符串转换成ASCII值。 示例:a=Asc(“C”) a的值为67。(2).Chr() 格式:Chr(x) 功能:将ASCII码值转换成字符串。 示例:a=Chr(66) a的值为字符“B”。,3 转换函数,(3).Val() 格式:Val(String) 功能:将字符串量转换成数值量。 示例:a=Val(“-13.456”) a的值为-13.456 b=Val(“13-456”) 出错(4).Str( ) 格式:Str(Number) 功能:将数值型量转换成字符型量。 说
32、明:Number为一个数值型量,返回一个字符 型量。 示例:a=Str(12345) a的值为字符“12345”。,Chr和Asc函数是一对互为反函数,即Chr(Asc(n)、Asc(Chr(c) 的结果为原来各自自变量的值, 如Chr(Asc(122)的结果还是122。Str函数将非负数值转换成字符类型后,会在转换后的字符串左边增加空格,即数值的符号位。 如Str(123)的结果为“ 123”,而不是“123”。Val将数字字符串转换为数值,当字符串中出现非数值字符时,停止转换,函数返回的是停止转换前的结果。 如Val(“ 123.45ty”)结果为-123.45。,程序中的语句依照其在程序
33、中的位置依次顺序地执行,叫做语句的顺序执行。,1. 数据输入 VB可以通过赋值语句、InputBox函数、MsgBox函数、MsgBox过程给程序提供初值。,4.6程序设计,4.6.1 顺序结构程序设计, 赋值语句格式:Let 变量名/对象属性名 = 表达式功能:将赋值号右边表达式的值赋给赋值号左边的变量或对象属性。举例: Form1.width = 300 Form1.caption = 输入框 Temp = 20, InputBox()函数 格式:InputBox$(prompt,title,default,xpos,ypos) InputBox$(提示,标题,默认,x坐标位置,y坐标位置
34、) 功能:打开一个对话框,等待用户键入内容。当用户单击“确定”按钮或按回车键时,函数返回输入的值,其值的类型为字符串。,说明: “$”:可选项。有此项时,返回的数据类型是字符 串型;省略此项,返回的数据类型是变体型。 “prompt(提示)”:字符串表达式,必选项.在对话框中作为提示信息,可以是字符或汉字,最大长度大约为1024个字符,由所用字符的宽度决定。如果提示信息包含多行,则必须在每行末用回车符(Chr(13)、换行符(Chr(10)或回车换行符的组合(Chr(13)&Chr(10))来分隔。 “title(标题)”:可选项。显示在对话框标题栏中的字符串表达式.如果省略title,则把应
35、用程序名放在标题栏中。, “default(缺省)”:可选项,显示文本框中的字符串表达式。当在输入对话框中无输入内容时,该缺省值作为输入的内容。如果省略default,则文本框为空。 “xpos,ypos(X坐标位置,Y坐标位置)”:可选项,整型表达式,成对出现。xpos用来指定对话框的左边与屏幕左边的水平距离,ypos用来指定对话框的上边与屏幕上边的垂直距离。如果省略该项,则对话框在水平方向居中,在垂直方向距下边大约三分之一的位置。,注意:函数中的各项参数次序必须一一对应,除了“prompt”一项不能省略外,其余各项均为可选项,如果要省略某些参数,则必须加入相应的逗号分割符。例li3-2:
36、在InputBox函数的输入框中输入学校名称,按“确定”按钮,窗体显示输入值,按“取消”按钮,返回空字符。, MsgBox函数和MsgBox过程 MsgBox函数格式: 变量% = MsgBox (提示 ,按钮 ,标题) MsgBox过程格式: MsgBox (提示 ,按钮 ,标题),功能: 打开一个消息框,等待用户选择一个按钮。MsgBox函数返回所选按钮对应的整数值,其数值的意义见下表。若不需要返回值,则可作为MsgBox过程使用。,MsgBox函数返回所选按钮整数值的意义,说明: “提示”和“标题”的含义与InputBox()函数中对应的参数相同。 “按钮”:可选项,为整型表达式。用来设
37、定要显示的按钮的数目、类型和出现在消息框中的图标类型。其设置见下表: “变量%”: 返回值。当用户按下消息框按钮时,系统将返回按键相对应的数值,利用这个返回信息,用户可以在以后的程序中作出不同的响应。,例如在打印文件时,如果选择“确定”按钮,那么程序就应该打印文件;如果选择“取消”按钮,程序就不再打印文件;如果选择“重试”,那么程序就应该能重新开始打印文件。,例li3-3 利用InputBox和MsgBox函数设计一个文件名输入对话框和提示对话框,“按钮”设置值及意义,(3)格式输出函数格式:Format$(表达式 ,格式字符串 )功能:将数值型量转换为字符型量,并根据格式字符串中的结构将其格
38、式化。说明:“表达式”是要格式化的数值、日期和字符串类型表达式。“格式字符串”有三类:数值格式、日期格式和字符串格式。格式字符串一定要用引号括起来。下面分别说明三种格式字符串的形式及使用方法。,数值格式化 数值格式化是将数值表达式的值按“格式字符串”指定的格式输出。日期和时间格式化 将日期或数值表达式的值按“格式字符串”指定的格式转换。字符串格式化 将字符串按指定的格式进行转换。, Print方法Print方法的作用是在对象上输出信息。形式:对象.PrintSpc(n)/Tab(n)表达式表其中:对象可以是窗体(Form)、图形框(PictureBox)或打印机(Printer)。如果省略了对
39、象,则在窗体上输出。, 数据输出 标准显示输出语句格式:Print 表达式 ,|;,Spc(n)函数: 用于在输出时插入n个空格。Tab(n)函数:用于在输出表达式列表前向右移 动n列。表达式表:要输出的数值或字符串表达式,其开始打印的位置是由对象CurrentX和CurrentY属性决定的,缺省时打印在对象的左上角0,0处。,3Rem、Stop、End语句 Rem语句格式:Rem 注释内容 或 注释内容, Stop语句格式:Stop功能:暂时停止语句执行。 Stop语句可以放在程序的任何地方,它的作用相当于在程序代码中设置的断点。 Stop语句只是暂停程序的执行,不会关闭任何文件或清除变量。
40、但当VB程序以编译后的可执行文件(.ExE)运行时,该功能失去。 执行Stop语句,程序暂停执行,若要继续运行,则可用鼠标单击运行按钮。, End语句格式:End功能:在过程中关闭代码执行、关闭以Open语句打开的文件并清除变量,停止执行,Visual Basic 选择结构的实现: IfThen 语句(单分支结构) If.ThenElse 语句(双分支结构) Select Case 语句(多分支结构),4.6.2 选择结构程序设计,格式1:If 表达式Then 语句 格式2:If 表达式Then 语句块 End If,功能:当条件表达式的值为“真”时,则执行Then后面的语句或语句块;否则不执
41、行任何操作。,1. IfThen语句(单分支结构),格式1: If Then Else End If格式2:If Then Else ,2.IfThenElse语句结构(双分支结构),语句格式:If 表达式1 Then 语句块1 ElseIf 表达式2Then 语句块2 Else 语句块 n+1 End If,IfThen Else If 语句 (多分支结构)结构,说明: 不管有几个分支,程序执行了一个分支后,其余分支不再执行。 ElseIf子句的数量没有限制,可以根据需要使用任意多个ElseIf子句。 语句中的ElseIf子句和Else子句都是可选项,如果省略这些子句,则成为单分支结构。If
42、.Then.ElseIf只是 If.Then.Else 的一个特例。,If 语句的嵌套是指if或else语句后面的语句块中又包含if语句。语句形式为:,If then if then endif endif,4.If语句的嵌套,例如:已知X、Y、Z三个数,比较他们的大小并 排序,使得XYZ。,If xyEndifIf yz if x=80,当有多个Case子句的取值范围和测试表达式的值域相符时,只执行符合要求的第一个Case子句后的语句块。Select Case语句只对单个表达式求值,并根据求值结果执行不同的语句块;而If Then Else语句可以对不同的表达式求值,然后执行不同的操作。这是两者的主要区别。,循环是在指定的条件下多次重复执行一组语句,这可通过循环结构来实现。VB中提供了两种类型的循环语句:一种是计数循环语句;另一种是条件循环语句。Visual Basic 支持的循环结构有: DoLoop For.Next WhileWend For Each.Next 这里只介绍前两种,4.6.3 循环结构程序设计,1. Do.Loop循环,DoLoop循环用于事先不知道循环次数的循环结构。此种语句有四种语法格式: Do While Loop 语句 Do Loop While 语句 Do Until Loop 语句 Do Loop Until 语句,
Copyright © 2018-2021 Wenke99.com All rights reserved
工信部备案号:浙ICP备20026746号-2
公安局备案号:浙公网安备33038302330469号
本站为C2C交文档易平台,即用户上传的文档直接卖给下载用户,本站只是网络服务中间平台,所有原创文档下载所得归上传人所有,若您发现上传作品侵犯了您的权利,请立刻联系网站客服并提供证据,平台将在3个工作日内予以改正。