VB-知识点总结.docx

VB概述§1 VB的特点1．可视化的设计平台2．面向对象的设计方法对象具有自己的属性（对象的性质）、方法（对象的动作）和事件（对象的响应），它构成对象的三个要素3．事件驱动的编程机制4．集成化的开发环境5．结构化的设计语言§4 VB程序设计VB应用程序的开发有三个步骤：（1）设计应用程序界面2）设置对象的属性（3）编写事件驱动代码保存工程简便方法：执行“文件/保存工程”命令（第一次保存文件）系统先打开“文件另存为”对话框，保存窗体文件（或标准模块文件），然后再打开“工程另存为”对话框，保存工程文件保存修改后的工程文件选择“文件/保存工程”命令保存所做的修改，（保存与工程有关的修改过的窗体文件或标准模块文件）VB基础知识常量（1）字符串常量用双引号括起来的字符序列（除双引号和回车符）例如："China"“I am a student.”"95.3%""计算机软件"（2）数值常量整型 1234（十进制）长整型 12345678（十进制）单精度数：有三种形式，12.34，123！，123.45E-5双精度数：有两种形式，12.34#，123.45D-5在常数后面加上类型说明符：% 整型 & 长整型 ! 单精度# 双精度 $ 字符串型。

2. 符号常量格式：Const常量名 = 表达式功能：定义一个符号常量来表示表达式的值说明：“常量名”可加以类型说明符符号常量的类型由类型说明符或表达式的类型决定Const PI = 3.141593变量1. 变量的命名变量名以字母开头，后跟字母、数字和下划线组成说明：（1）变量名不能是保留字（2）VB变量名不区分字母大小写2. 变量的类型（1）用类型说明符在变量的尾部加上类型说明符：% 整型 & 长整型 ! 单精度# 双精度 $ 字符串型例如：Num%，Str1$均是合法的变量名在引用时，可以省略类型说明符2）定义变量时声明其类型格式：Dim 变量名 As 类型“类型”可为基本数据类型或用户自定义的类型Boolean（布尔型） Long（长整型）Single（单精度型） Double（双精度型）String（字符串型） Variant（变体型）用户自定义类型例如：Dim str1 As String , country As String*20Dim i As Integer , sum As Single定义变量后，数值型变量的初值为0字符型变量的初值为空字符串其中：变长字符串的初值是长度为0定长字符串的初值的长度等于定义值。

3. 变体类型变量如未定义类型的变量例如：Dim sum As VariantDim sum运算符与表达式1. 算术运算符（8种）优先级（从高到低）：指数（∧）取负（-）乘法、浮点除法（* , /）整数除法（\）取模（Mod）加法、减法（+ , -）整除：被除数和除数为整数，结果为整数31.7 \ 5.8832\6 结果为：5取模（求余）运算：结果为整数除法的余数31.77 Mod 5.88 （四舍五入）32 Mod 6， 余数为23 Mod 6 余数为3字符串表达式字符串运算符： & 或 ＋ 功能：把字符串连接成一个字符串说明：(1) 符号“&”与字符串变量之间应间隔一个空格，例如：str1 & str2(2)“&”能强制把其它类型的数据转换为字符串，而“＋”不能例如：2008 & "奥运会" 2008奥运会"2008" + "奥运会" 2008奥运会 注意：Print "123" + 567 结果：690Print "abc" + 567 出错：类型不匹配常用内部函数数学函数函 数 功 能 Abs(x) 返回x的绝对值 Int(x) 求不大于x的最大整数 Int(7.8)结果为7， Int(-7.8)结果为-8 Cint(x) 把x小数四舍五入，转换为整数， Exp(x) 计算ex，e是自然数2.718281 Log(x) 求x的自然对数 Sqr(x) 求x的平方根 Rnd 返回0～1之间的随机数： 字符串函数Len（str） 返回字符串长度 Left$(str，n) 取字符串左边n个字符 Right$(str，n) 取字符串右边n个字符 Mid$(str，p[，n]) 从位置p开始，取n个字符，如n省略，取到最后 Str$(num) 数值转字符串 Val(str) 字符串转数值 Asc（str） 返回字符串首字母ASCII码 Chr$(n) ASCII码转字符 说明:（l）三角函数Sin、Cos和Tan自变量的单位是弧度反正切函数Atn(x)的返回值单位为弧度。

度转换为弧度：1° = 3.14159/180 *x（2）用函数Rnd可以产生不同的随机数产生指定范围的随机数：l 产生0～n之间的随机数（不含0和n）Rnd*nl 产生0～n之间的随机整数（含0，不含n）Int（Rnd*n）l 产生a～b之间的随机整数（含a，不含b）Int（（b-a）*Rnd+a）l 产生a～b之间的随机整数（含a和b）Int（（b-a+1）*Rnd+a）顺序结构结构化程序三种基本结构：顺序结构、选择结构和循环结构1 赋值语句变量 = 表达式属性名 = 属性值注意：当变量类型与表达式的类型不同时，VB自动将表达式的类型强制转换为变量类型例如：Dim Num As IntegerNum=8.89 (将9赋给Num，四舍五人)3 数据输入方法1：用文本框例：Dim m As Integerm=Val (Text1.Text)方法2：用Inputbox（）函数例：m =Val(InputBox("enter m:"))方法3：从文件输入Input#2，m4 输出数据方法1：用文本框例：Text1.Text=n或 Text1=n方法2：用标签例：Label1.Caption = n方法3：用Print方法例：Print n方法4：输出到列表框例：List1.AddItem n方法5：输出到文件例：Open "abc.dat" For Output As #1Write#1, n【例】交换变量a、b的值。

用中间变量t作暂存单元，必须与交换的变量同类型t = a ： a =b ： b = t3.2 窗 体窗体常用的方法Print，窗体事件1. Click事件2. Load事件Load是把窗体装入工作区事件，Form_Load()事件是执行程序时自动触发的，因此常用来在启动程序时对属性和变量进行初始化3. UnLoad事件关闭窗体触发该事件选择结构满足条件为“真”，用“True”表示；不满足条件为“假”，用“False”表示关系表达式1. 关系运算符（6种）= 、<>、<、>、<=、 >= 优先级相同，运算从左到右2. 关系表达式例如：“apply” > “apple”按ASCII码逐字符进行比较空格<“0”…“9”<“A”…“Z”<“a”…“z”“apply” > “apple” 结果为 True逻辑表达式逻辑运算符： Not、 And、 Or 优先级：逻辑非（Not）、逻辑与（And）、逻辑或（Or）注意：表示：a≤x≤ba <= x And x <= b选择结构1．单行If语句If 条件 Then 语句组1 [Else 语句组2]语句组：各语句间需用“：”分隔2．块结构If语句If 条件 Then语句块1Else语句块2End If例：计算分段函数1+x (x≥0)y=1-2x (x<0)If x>=0 Then y=1+xElsey=1-2*xEnd If用单行If语句：If x>=0 Then y=1+x Else y=1-2*x或：If x>=0 Then y=1+xIf x<0 Then y=1-2*x 3.多分支选择结构If 条件1 Then语句块1ElseIf 条件2 Then语句块2ElseIf 条件3 Then语句块3……Else语句块n+1End If从多个条件中，选择执行一个语句块“纵然分支众多，仅选其一”说明：当有多个条件为真时，只能执行最前面的一个语句块。

注意：ElseIf之间不能有空格【例】学生成绩判定Private Sub Command1_Click()x =Val（InputBox("输入学生成绩：")）If x >=90 ThenPrint “优”ElseIf x >=80 ThenPrint “良”ElseIf x >=70 ThenPrint “中”ElseIf x >60 ThenPrint “及格”ElsePrint “不及格”End IfEnd Sub4.2.4 IIf函数IIf是单行If语句的简单版本变量 = IIf（条件，True部分，False部分）注意：IIf函数中的三个参数都不能省略例：计算分段函数1+x (x≥0)y=1-2x (x<0)Private Sub Command1_Click()Dim x As Single,y As Singlex= Val(Text1.Text)y=IIf(x>=0,1+x,1-2*x)Text2.Text = yEnd Sub【例】判闰年闰年的条件：（1）被4整除，但不能被100整除；（2）能被400整除最好：If x Mod 400 = 0 Theny$ = "是闰年"ElseIf x Mod 4 = 0 And x Mod 100 <> 0 Theny$ = "是闰年"Elsey$ = "不是闰年"End If也可x = Val(InputBox("输入年份"))If x Mod 4 = 0 and x Mod 100 <> 0 or x Mod 400 = 0 Theny$ = "是闰年"Elsey$ = "不是闰年"End If4.Select Case语句用于实现多分支结构。

Select Case 测试表达式Case 条件1语句块1Case 条件2语句块2……Case Else语句块n+1End Select功能：从多个条件中选择执行第一个符合条件的语句，都不符合，则执行Case Else后的语句块注意条件：常量表： 1，3，5测试范围：10 to 20,“a” to “z”比较范围：Is < 10(不能为逻辑表达式)【例】学生成绩评定Private Sub Command1_Click()x = Val(InputBox("输入考试成绩"))Select Case xCase 90 To 100y$ = "优。