《【精品】vb复习（可编辑.ppt》由会员分享，可在线阅读，更多相关《【精品】vb复习（可编辑.ppt（89页珍藏版）》请在taowenge.com淘文阁网|工程机械CAD图纸|机械工程制图|CAD装配图下载|SolidWorks_CaTia_CAD_UG_PROE_设计图分享下载上搜索。
1、VB复习考试须知考试须知考试时间：考试时间：2014年年1月月14日日 9:00-11:00考试地点：考试地点：1班班 2202 2班班 2203考试形式：笔试考试形式：笔试(闭卷闭卷)考试题型考试题型选择题（选择题（30分，每题分，每题1分）分）填空题（填空题（50分，每空分，每空2分）分）程序运行结果、程序填空、其他程序运行结果、程序填空、其他程序设计题（程序设计题（20分，每题分，每题10分）分）计算机基础知识计算机基础知识计算机系统的组成，计算机的五大部件，常用外计算机系统的组成，计算机的五大部件，常用外部设备；部设备；软件的分类；软件的分类；文件的命名规则，常用的文件扩展名，通配符，
2、文件的命名规则，常用的文件扩展名，通配符，文件和文件夹的管理；文件和文件夹的管理；计算机内信息的表达，二进制数，十进制数与二计算机内信息的表达，二进制数，十进制数与二进制数的相互转换（整数），字符的编码进制数的相互转换（整数），字符的编码（ASCII码），表示信息量（存储容量）的单位。码），表示信息量（存储容量）的单位。计计算算机机系系统统主机主机外设外设运算器运算器控制器控制器内存储器内存储器ROMRAMI/O总线接口总线接口CPU外存储器外存储器输入输入/输出设备输出设备网络通信设备网络通信设备软盘驱动器软盘驱动器硬盘硬盘CD-ROM显示器显示器键盘、鼠标键盘、鼠标打印机、绘图仪打印机、绘
3、图仪硬件硬件软件软件应用软件应用软件系统软件系统软件操作系统操作系统编译系统编译系统工具软件工具软件数据库管理系统数据库管理系统MODEM网卡网卡变量的命名规则变量的命名规则(p145)变量名以变量名以字母或汉字字母或汉字开头，开头，由由字母、下划线、或数字字母、下划线、或数字组成，组成，变量名变量名不区分大小写不区分大小写不能用不能用Visual Basic关键字关键字作变量名作变量名不提倡用汉字作变量名不提倡用汉字作变量名例：例：a,abs_2,print_1,m&f,h3,#g,5y,ab c合法的合法的非法的非法的变量声明变量声明 Dim|Static 变量名变量名 AS 类型类型 D
4、im iMark As integer,sTotal As single Dim item%注意注意:在通用声明处加在通用声明处加 Option Explicit 语句来强制显式声明变量语句来强制显式声明变量 Dim a,b,c as Integer常量声明常量声明Const 常量名常量名 AS 类型类型=表达式表达式例例 Const MAX=100 Max=max+50 Print max 运算符运算符 (Operator)数值运算数值运算 优优先先级级 乘方乘方*乘乘 /除除 整除整除Mod Mod 取模取模(余数余数)+加加 -减减例：例：例：例：5+10 mod 10 9/3+2 2
5、5+10 mod 10 9/3+2 2 结果：结果：结果：结果：?思考：对于一个任思考：对于一个任思考：对于一个任思考：对于一个任意意意意4 4 4 4位数字，如何能位数字，如何能位数字，如何能位数字，如何能把个位、十位、百把个位、十位、百把个位、十位、百把个位、十位、百位和千位的数字提位和千位的数字提位和千位的数字提位和千位的数字提取出来取出来取出来取出来字符运算字符运算abcdef12345abcdef12345出错出错出错出错“123456”“123456”579 579 123 +456 结果结果 123456 123&456 结果结果 123456 区别：区别：区别：区别：+两边必须
6、是字符串，两边必须是字符串，两边必须是字符串，两边必须是字符串，&不一定不一定不一定不一定+&两个字符串首尾连接两个字符串首尾连接例如：例如：abcdef&12345abcdef&12345 abcdefabcdef +12345+12345 123123&456&456 123123 +456+456结果关系运算符关系运算符将两个操作数进行大小比较，结果为将两个操作数进行大小比较，结果为逻辑型逻辑型。字符串比较字符串比较,则按则按字符的字符的ASCII码值码值从左到右一一比从左到右一一比较，直到出现不同的字符为止较，直到出现不同的字符为止.。例：例：ABCDE ABRA 结果为结果为 Fal
7、se 逻辑运算符逻辑运算符 将操作数进行逻辑运算，结果是逻辑值表达式表达式组成组成:变量、常量、函数、运算符和圆变量、常量、函数、运算符和圆括号括号书写规则书写规则运算符不能相邻。例a+-b是错误的。乘号不能省略。例x乘以y应写成：x*y。括号必须成对出现，均使用圆括号。表达式从左到右在同一基准上书写，无高低、大小。表达式书写举例表达式书写举例sin(45*3.14/180)+(exp(10)+log(10)/sqr(x+y+1)a*b*c*d/e/f/g或a*b*c*d/（e*f*g）3=x And x=7逻辑表达式举例逻辑表达式举例变量变量A是是3或或7的倍数的倍数变量变量B既是既是3的倍
8、数也是的倍数也是7的倍数的倍数A mod 3=0 and A mod 7=0A mod 3=0 or A mod 7=0Y mod 4=0 and Y mod 1000 or Y mod 400=0Y mod 4=0 and Y mod 1000 or Y mod 400=0闰年的条件是：年号闰年的条件是：年号(Y)能被能被4整除但不能整除但不能被被100整除；或者年号能被整除；或者年号能被400整除整除Int 取整函数取整函数 表示表示a为整数的关系表达式为整数的关系表达式 Int(a)=a表示表示a能被能被b整除的关系表达式整除的关系表达式 Int(a/b)=a/b a/b=a b a M
9、od b=0Rnd 函数函数格式：格式：Rnd()Rnd Rnd(N)说明：说明：0 Rnd 1 产生产生01之间的随机数之间的随机数产生产生L，U区间内的随机整数区间内的随机整数 Int(U-L+1)*Rnd+L)例：产生例：产生3050的随机整数的随机整数Int(Rnd*21)+30 为保证每次产生不同的随机数列，为保证每次产生不同的随机数列，可在可在事件过程中使用语句事件过程中使用语句 Randomize常用字符函数常用字符函数函数名说明实例结果Left(C,N)Left(C,N)取字符串左边N个字符Left(“ABCDFEG”,3)ABCABCRight(C,N)Right(C,N)取
10、字符串右边N个字符Right(“ABCDFEG”,3)FEGFEGMid(C,N1,N2)Mid(C,N1,N2)在C中取从N1开始长度为N2的子字符串(不写N2时取到最后）Mid(“ABCDFEG”,2,3)BCDBCDLen(C)Len(C)字符串长度Len(“AB计算机”)5 5Instr(N1,C1,Instr(N1,C1,C2)C2)在C1中从N1开始找C2开始的位置，省略N1从头开始找，找不到为0Instr(2,”EFABCDEFG”,”EF”)7 7结构化程序设计的三种基本结构（结构化程序设计的三种基本结构（流程流程图）图）顺序顺序选择选择循环循环S1S2ynC?S1S2yn当当
11、CS1顺序结构流程顺序结构流程输入数据输入数据处理数据处理数据输出结果输出结果 a=Inputbox(a=)a=Text1.Text Msgbox a=&a Print a=;a Text1.Text=a Label1.Caption=a赋值语句赋值语句 形式：变量名表达式形式：变量名表达式 作用：作用：将表达式的值赋值给变量名将表达式的值赋值给变量名。一般用于给变量赋值或对控件设定属性值。一般用于给变量赋值或对控件设定属性值。注意：注意：赋值号赋值号左边只能是变量左边只能是变量，不能是，不能是常量或表达常量或表达式式不能在一个语句中同时给多个变量赋值不能在一个语句中同时给多个变量赋值数据输入
12、数据输入函数函数 InputBox (P62)产生一个对话框，供用户输入信息，并产生一个对话框，供用户输入信息，并返回一个返回一个字符型字符型的值的值，赋给一个变量赋给一个变量。r=r=InputBoxInputBox(请输入半径请输入半径请输入半径请输入半径,输入窗口输入窗口输入窗口输入窗口)InputBox(提示提示,标题标题,默认值默认值,X坐标值坐标值,y坐标值坐标值)默认默认默认默认值值值值r=InputBox(r=InputBox(请输入半径请输入半径请输入半径请输入半径,输入窗口输入窗口输入窗口输入窗口,1010)提示信息过程提示信息过程 MsgBox(p63)MsgBox 提示
13、信息提示信息,按钮按钮,标题标题 产生一个提示框，输出提示信息。产生一个提示框，输出提示信息。用户按下用户按下“确定确定”按钮时关闭该窗口。按钮时关闭该窗口。MsgBox”面积是面积是”&str(s)MsgBox”面积是面积是”&str(s)，”计算结果计算结果”消息对话框消息对话框MsgBox函数函数(p63)变量变量%=MsgBox（提示信息（提示信息,按钮按钮,标题标题）产生提示框，输出提示信息和若干按钮，产生提示框，输出提示信息和若干按钮，让用户选择，可以根据用户的选择作不同让用户选择，可以根据用户的选择作不同处理。处理。（有返回值，并赋值给整形变量）（有返回值，并赋值给整形变量）选择
14、结构选择结构 1.IfThen语句语句(单分支结构单分支结构)If Then 语句块语句块End If或或 If Then 例例:已知两个数已知两个数x和和y，比较它们的大小，使，比较它们的大小，使得得x大于大于y.2.IfThenElse语句语句(双分支结构双分支结构)If Then Else End If或或 If Then Else 例例:y=,x0,x03.IfThenElseIf语句语句(多分支结构多分支结构)If Then ElseIf Then Else 语句块语句块 n+1 End If不管有几个分支不管有几个分支,当某条件满足当某条件满足,执行相应的语句执行相应的语句块块,其
15、余分支不再执行其余分支不再执行.4.Select Case语句语句(情况语句情况语句)Select Case 变量或表达式变量或表达式 Case 表达式列表表达式列表1 语句块语句块1 Case 表达式列表表达式列表2 语句块语句块2 Case Else 语句块语句块n+1 End Select表达式列表的四种形式表达式列表的四种形式表达式列表的四种形式表达式列表的四种形式 a a a,b,c a,b,c a To b(a To b(包含包含包含包含a a和和和和b)b)Is a Is a5、条件函数（、条件函数（IIf函数）函数）IIf(条件条件,表达式表达式1，表达式，表达式2)先求出两个
16、表达式的值。当条件成立时，函数值先求出两个表达式的值。当条件成立时，函数值为表达式为表达式1的值；条件不成立时，函数值为表达式的值；条件不成立时，函数值为表达式2的值。的值。Max=IIf(a=b,a,b)For循环语句循环语句(一般用于循环次数已知一般用于循环次数已知)For 循环变量循环变量初值初值 to 终值终值 Step 步长步长 语句块语句块Exit For 语句块语句块 Next 循环变量循环变量步长步长 0 初值初值终值终值 =1 时时,可省略可省略 终值终值=0 死循环死循环循环次数循环次数注注 意意 出了循环，循环控制变量值的问题。出了循环，循环控制变量值的问题。例：例：Fo
17、r i=2 To 13 Step 3 Print i,Next i Print :Print“I=“,i循环执行次数：循环执行次数：输出输出 i的值分别为的值分别为:出了循环输出为出了循环输出为:2 5 8 11I=14最小、最大值问题最小、最大值问题例例 随机产生随机产生1010个个100100200200之间的数，求之间的数，求最大值和最小值。最大值和最小值。在若干个数中求最大值，一般在若干个数中求最大值，一般先假设先假设一个较小的数为最大值的初值一个较小的数为最大值的初值，若无法估，若无法估计较小的值，则取计较小的值，则取第一个数为最大值的初第一个数为最大值的初值值；然后将每一个数与最大
18、值；然后将每一个数与最大值比较比较，若该，若该数大于最大值，将数大于最大值，将该数替换为最大值该数替换为最大值；依；依次逐一比较。次逐一比较。DoLoop循环语句循环语句(用于控制循环次数未知用于控制循环次数未知)形式1：Do While 语句块语句块 Exit Do 语句块语句块 Loop形式2：Do 语句块语句块 Exit Do 语句块语句块Loop While 条件条件语句块语句块Exit Do语句块语句块语句块语句块条件条件Exit Do语句块语句块循环的嵌套循环的嵌套一个循环体内又包含了一个完整的循环一个循环体内又包含了一个完整的循环结构称为循环的嵌套结构称为循环的嵌套.注注 意：意
19、：内循环变量与外循环变量内循环变量与外循环变量不能同名不能同名；外循环必须完全包含内循环，外循环必须完全包含内循环，不能交叉；不能交叉；常常 见见 错错 误误1.不循环或死循环的问题不循环或死循环的问题 主要是主要是循环条件循环条件、循环初值循环初值、循环终值循环终值、循环步长循环步长的设置有问题的设置有问题。2.循环结构中缺少配对的结束语句循环结构中缺少配对的结束语句 For 少少 配对的配对的Next Do 少配对的少配对的Loop3.循环嵌套时循环嵌套时,内外循环交叉内外循环交叉4.累加、连乘时，存放累加、连乘结果的变量赋累加、连乘时，存放累加、连乘结果的变量赋初值问题初值问题静态数组静
20、态数组：静态数组：数组声明时，数组的大小固定的数组称为数组声明时，数组的大小固定的数组称为数组声明时，数组的大小固定的数组称为数组声明时，数组的大小固定的数组称为静态数组。静态数组。静态数组。静态数组。它指明了数组的它指明了数组的维数维数维数维数和每一维的和每一维的下标范围下标范围下标范围下标范围，在使用过程，在使用过程中，它的中，它的维数和下标范围将不得改变维数和下标范围将不得改变。声明形式声明形式：Dim Dim 数组名（下标）数组名（下标）数组名（下标）数组名（下标）As As 类型类型类型类型 下标：下标：下界下界 to 上界上界，缺省下界为，缺省下界为0，且必须为常数，且必须为常数也
21、可在重新定义数组的下界也可在重新定义数组的下界 如：如：Option Base 1 每一维大小：上界下界每一维大小：上界下界+1数组大小：数组大小：每一维大小的每一维大小的乘积乘积Dim a(20)As Integer Dim a(20)As Integer Dim b!(3 to 9),c(3,6)Dim b!(3 to 9),c(3,6)注意：注意：注意：注意：1.1.1.1.下界缺省为下界缺省为下界缺省为下界缺省为0,0,0,0,也可在重新定义数组的下界。例也可在重新定义数组的下界。例也可在重新定义数组的下界。例也可在重新定义数组的下界。例如：如：如：如：Option Base 1Opt
22、ion Base 1Option Base 1Option Base 1 2.2.2.2.在数组声明中的下标说明了数组的整体在数组声明中的下标说明了数组的整体在数组声明中的下标说明了数组的整体在数组声明中的下标说明了数组的整体,即每一即每一即每一即每一维的大小；而在程序其他地方出现的下标表示数维的大小；而在程序其他地方出现的下标表示数维的大小；而在程序其他地方出现的下标表示数维的大小；而在程序其他地方出现的下标表示数组中的一个元素。组中的一个元素。组中的一个元素。组中的一个元素。两者写法形式相同，但意义不同。两者写法形式相同，但意义不同。两者写法形式相同，但意义不同。两者写法形式相同，但意义不
23、同。例如：例如：例如：例如：Dim x(10)As Integer Dim x(10)As Integer 声明了声明了声明了声明了x x数组有数组有数组有数组有1111个元素个元素个元素个元素x(10)=100 x(10)=100 对对对对x(10)x(10)x(10)x(10)这个数组元素赋值这个数组元素赋值这个数组元素赋值这个数组元素赋值动态数组及其声明 在在声明数组时声明数组时没有给出数组的大没有给出数组的大小，即小，即省略下标省略下标，当，当使用使用它时，它时，随时随时用用Redim语句语句重新重新指出数组的大小。指出数组的大小。Dim a%()n=InputBox(请输入数组元素的
24、个数：请输入数组元素的个数：)ReDim a(n)Dim b%(5)Dim b%(5)n=InputBox(n=InputBox(请输入数组元素的个数：请输入数组元素的个数：请输入数组元素的个数：请输入数组元素的个数：)Redim b(n)Redim b(n)a是动态数组是动态数组已经说明已经说明b的大小，是静态的大小，是静态数组，不能再变成动态数组数组，不能再变成动态数组ReDim语句只能出现在过程里在动态数组ReDim语句中的下标可以是常量，也可以是有了确定值的变量。既可以使用ReDim语句改变数组的大小，也可以改变数组的维数。使用ReDim语句会使数组原来的数据丢失，可以在ReDim语句
25、后加Preserve参数来保持数组中的数据。如：ReDim Preserve a(n+1)注注 意意 Dim a%()n=Text1.Text ReDim a(n)ReDim a(n+1)ReDim a(n,n)Array 函数函数Dim a(),b()a=Array(1,2,3,4,5)b=Array(abc,fghij,xyz,12345)Array函数：对数组各元素赋值，声明的数组是函数：对数组各元素赋值，声明的数组是可调数组可调数组或连或连圆括号都可省圆括号都可省，并且其，并且其类型类型只能只能是是Variant。数组的数组的缺省下界为零缺省下界为零缺省下界为零缺省下界为零，上界由上界
26、由Array函数括号内函数括号内的的元素个数元素个数可决定，也可通过可决定，也可通过UBound函数获得函数获得.LBound 和和 UBound 函数函数Dim a%(4),b!(3 to 6,10 to 20)Print LBound(a)Print LBound(b,1),UBound(b,2)LBound 和和 UBound 函数函数：返回返回数组某数组某维维的的下界下界或或上界上界值。值。LBound(数组名数组名,维数维数)UBound(数组名数组名,维数维数)0 03 32020直接对数组赋值直接对数组赋值Dim a()As Variant,b()As Varianta=Arra
27、y(1,2,3,4,5)b=a 注意：注意：数组数组a与数组与数组b的的类型必须相同类型必须相同，且数，且数组组b必须为动态数组必须为动态数组。For i=LBound(a)To UBound(a)b(i)=a(i)Next i排序排序 排序是指将若干个数按一定的顺序重新排列。排列排序是指将若干个数按一定的顺序重新排列。排列排序是指将若干个数按一定的顺序重新排列。排列排序是指将若干个数按一定的顺序重新排列。排列的顺序由升序和降序。的顺序由升序和降序。的顺序由升序和降序。的顺序由升序和降序。选择排序：选择排序：选择排序：选择排序：从n个数的序列中选出最小的数，与第1个数交换位置；除第1个数外，其
28、余n-1个数再按(1)的方法选出次小的数，与第2个数交换位置；重复n-1遍，最后构成递增序列。For i=1 To UBound(a)1For i=1 To UBound(a)1 p=1 p=1 For j=For j=2 2 To To UBound(a)UBound(a)If If a(j)a(p)a(j)a(j+1)a(j)a(j+1)ThenThen t=a(j)t=a(j)a(j)=a(j+1)a(j)=a(j+1)a(j+1)=t a(j+1)=t End IfEnd If Next j Next jNext iNext i i i从前往后两从前往后两从前往后两从前往后两两相比较两
29、相比较两相比较两相比较次序不对，则交换次序不对，则交换次序不对，则交换次序不对，则交换交换前后两个元素的值交换前后两个元素的值交换前后两个元素的值交换前后两个元素的值重复元素个数重复元素个数重复元素个数重复元素个数-1-1次次次次控 件 数 组一组相同类型的控件组成。共用一一个控件名个控件名，具有相同的属性，建立时系统给每个元素赋一个唯一的索唯一的索引号引号(Index)。控件数组共享同一个的事件过程共享同一个的事件过程，通过返回的下标值返回的下标值区分控件数组中的各个元素。使用控件数组可使一些具有相同或相近功能的控件的编程简化创建控件数组 在在设计设计时建立时建立(1)在窗体上放一组同类控件
30、，修改在窗体上放一组同类控件，修改Name属性属性，命名为，命名为相同名称相同名称，系统会提问，系统会提问“是是否定义控件数组？否定义控件数组？”，有必要时，修改，有必要时，修改 Index 属性值属性值(2)复制控件复制控件，在，在同一窗体中同一窗体中粘贴粘贴，系统，系统会提问会提问“是否定义控件数组？是否定义控件数组？”程序程序运行运行时添加时添加Function自定义函数过程定义自定义函数过程定义语法：语法：Function 函数名函数名(参数列表参数列表)As数据类型数据类型 函数名函数名=表达式表达式 Exit Function End Function 特点：特点：函数名有值，有类
31、型，在过程体内函数名有值，有类型，在过程体内 至少赋值一次。至少赋值一次。函数名函数名函数名函数名=表达式表达式表达式表达式注意：注意：函数在定义和使用时，无论是否有参数，函数在定义和使用时，无论是否有参数，圆括号一定不能省圆括号一定不能省。特点：特点：不能独立存在不能独立存在，必须参加表达式的运算，必须参加表达式的运算Function过程调用过程调用 函数名函数名（实际（实际参数列表参数列表）参数列表：称为参数列表：称为实参或实元实参或实元。必须与。必须与形参个数相形参个数相同，位置与类型一一对应同，位置与类型一一对应。可以是同类型的。可以是同类型的常量、变常量、变量、表达式量、表达式。S1
32、=JC(n)自定义子过程的定义自定义子过程的定义格式：格式：Sub 子过程名子过程名(形式参数表形式参数表)过程体过程体 End Sub特点：特点：子过程名无值，无类型子过程名无值，无类型自定义子过程的调用自定义子过程的调用格式格式1 子过程名子过程名 实际参数列表实际参数列表格式格式2 Call 子过程名子过程名(实际参数列表实际参数列表)特点：特点：一句独立的语句一句独立的语句注意：注意：格式格式1中的实际参数列表无需圆括号中的实际参数列表无需圆括号如：如：Call Swap(a,b)如：如：Swap a,b问问 题题什么时候用函数，什么时候用子过程？哪些东西放在函数或过程中？哪些东西放在
33、主程序中？主要看返回值是一个还是多个，主要看返回值是一个还是多个，多个一多个一定要用子过程定要用子过程，其他两者都可以，其他两者都可以输入数据输入数据输入数据输入数据处理数据处理数据处理数据处理数据输出结果输出结果输出结果输出结果需要反复处理需要反复处理或相对独立的部分或相对独立的部分放到函数放到函数或过程中或过程中其余放在其余放在主程序中主程序中过程的参数传递过程的参数传递传值调用传值调用 形参得到形参得到的是的是实参的实参的值值，形参值形参值的改变的改变不会影响不会影响实参的值实参的值。形式参数前加形式参数前加ByVal关键字界定。关键字界定。过程的参数传递过程的参数传递传址调用传址调用
34、形参得到的是实参的形参得到的是实参的地址地址，当，当形参值形参值的改变同时也改变实参的值的改变同时也改变实参的值。其形式参数前加其形式参数前加ByRef关键字界定关键字界定(或缺省，或缺省，VB的默认方式的默认方式)。输输出出结结果果Private Sub Command1_Click()Dim a%,b%a=Val(InputBox(请输入整数请输入整数)b=Val(InputBox(请输入整数请输入整数)Proc a Proc b Call Proc(a+b)End SubSub Proc(ByVal n As Integer)Do While n 0 Print n Mod 10;n=n
35、 10 Loop PrintEnd Sub把把把把ByValByVal去掉结去掉结去掉结去掉结果又是多少呢？果又是多少呢？果又是多少呢？果又是多少呢？注意注意数组可以作为函数或过程的参数，只能按地址传递。数组可以作为函数或过程的参数，只能按地址传递。实参是表达式或函数时，只能传值，不能传址。实参是表达式或函数时，只能传值，不能传址。Private Sub test(ByVal p%,m%,n()p=p+1 m=m+1 n(1)=999 Print Sub:;p;m;n(1)End SubPrivate Sub Command1_Click()Dim c()a%=1:b%=2 c=Array(1
36、,2,3)Call test(a,b+3,c)Print Main:;a;b;c(1)End Sub控件基本的属性控件基本的属性 Name名称名称:所有控件对象都具有的属性所有控件对象都具有的属性Enabled：控件控件是否可操作是否可操作.当设置为当设置为False时时,呈暗淡呈暗淡色色,禁止用户进行操作禁止用户进行操作.Visible属性：属性：控件控件是否可见是否可见.当设置为当设置为False时时,用户看不用户看不到，但控件本身存在到，但控件本身存在 Height、Width属性（属性（控件的大小控件的大小）Caption 标题属性标题属性该属性决定了控件上显示的内容该属性决定了控件上
37、显示的内容Top、Left属性（属性（控件的位置控件的位置）窗体（窗体（Form）Private Sub Form_事件名事件名(参数列表参数列表)局部变量和常数声明局部变量和常数声明 语句块语句块End Sub注意注意:过程名过程名由由“Form”、下划线和事件名下划线和事件名组成组成过程名前的过程名前的“Private”，用于限定其使用，用于限定其使用范围是模块级的范围是模块级的事件过程有无参数，由事件过程有无参数，由VB决定决定调用窗体语句调用窗体语句Load 格式：格式：Load 窗体名窗体名卸载窗体语句卸载窗体语句Unload 格式：格式：UnLoad 窗体名窗体名显示窗体的方法显示
38、窗体的方法Show 格式：窗体名格式：窗体名.Show隐藏窗体的方法隐藏窗体的方法Hide 格式：窗体名格式：窗体名.Hide常用控件常用控件标签标签 Label 用于显示文本用于显示文本(输出输出)信息，不能作为输入信息信息，不能作为输入信息的界面。标签是没有焦点的。的界面。标签是没有焦点的。Autosize:根据根据Caption的大小自动变化自的大小自动变化自身的大小身的大小。文本框文本框 TextBox 是一个文本编辑区域，可在该区域输入，编辑是一个文本编辑区域，可在该区域输入，编辑和显示正文内容。和显示正文内容。命令按钮命令按钮CommandButton 接受用户输入的命令接受用户输
39、入的命令文本框（文本框（TextBox）基本属性TextText:正文内容Maxlength:设置正文的最多字符个数MultiLine:是否为多行,默认一行.FALSEScrollBars:当MultiLine为True时,该属性才有效,表示滚动条的形式PassWordchar:口令字符；Text属性返回输入的数据，屏幕显示该字符SelStartSelStart，SelLengthSelLength，SelTextSelText:选中文本的起始、长度、内容Locked：指定文本控件是否可被编辑常用事件常用事件Change:当当改变文本框的改变文本框的Text属性属性时会引时会引发该事件发该事件
40、.KeyPress(KeyAscii As Integer):文文本框的按键事件，本框的按键事件，常用于判断是否按了回车键常用于判断是否按了回车键（KeyAscii 为为13,按回车键按回车键）常用方法常用方法 对象对象.SetFocus:是把是把光标移到指定的文光标移到指定的文本框对象中本框对象中.单选按钮和检查框单选按钮和检查框 属性属性 Caption：文本标题。文本标题。Alignment 0：控件按钮在左边，标题显示在右边。控件按钮在左边，标题显示在右边。1：控件按钮在右边，标题显示在左边。：控件按钮在右边，标题显示在左边。Value检查框检查框 单选按钮单选按钮 0-Uncheck
41、ed：未被选定未被选定 True：选定选定 1-Checked：选定选定 False：未选定未选定 2-Grayed：灰色，禁止选择灰色，禁止选择框架框架(Frame)框架内控件的创建方法：框架内控件的创建方法：（先创建好框架，然后）（先创建好框架，然后）方法1：单击工具箱上的工具，然后用出现的“+”指针，在框架中适当位置拖拉出适当大小的控件。不能使用双击工具箱上图标的自动方式。方法2：将控件“剪切”到剪贴板，然后粘贴到框架。框架设Caption为字体列表框列表框 List列表框各主要属性的值：列表框各主要属性的值：List1.ListIndex=3 (下标从下标从0开始开始的的)List1.
42、ListCount=5 List1.Selected(3)=True，其余为其余为False List1.Sorted=False，没有排序，没有排序 List1.list(3)=“cox”List1.Text 为为“cox”，与与List1.List(List1.ListIndex)相等相等List1列表框的特有属性列表框的特有属性 MultiSelect 0-None：禁止多项选择。：禁止多项选择。1-Simple：简单多项选择。：简单多项选择。2-Extended：扩展多项选择：扩展多项选择。组合框组合框 Combo组合框的组合框的特有属性特有属性StyleStyle下拉式组合框下拉式组
43、合框下拉式组合框下拉式组合框 简单组合框简单组合框简单组合框简单组合框下拉式列表框下拉式列表框下拉式列表框下拉式列表框类型类型Style输入输入下拉式组合框0能简单组合框1能下拉式列表框2不能1.组合框各主要属性的值：组合框各主要属性的值：Combo1.ListIndex=0 Combo1.ListCount=8 Combo1.Text 为为“李宁李宁”Private Sub Form_Load()For i=1 To 100 If i Mod 7=0 Then List1.AddItem iList1.AddItem i End If NextEnd Sub将内容添加到列表框将内容添加到列表
44、框将内容添加到列表框将内容添加到列表框中可用中可用中可用中可用AddItemAddItemPrivate Sub Command1_Click()Sum%=0 For i=1 To _ Sum=Sum+_ Next Text1.Text=SumEnd Sub不能写不能写不能写不能写 List1.ListCountList1.ListCounti i列表框中的数据个数可列表框中的数据个数可列表框中的数据个数可列表框中的数据个数可用用用用ListCountListCountList1.List(i-List1.List(i-1)1)即求即求即求即求1 1到到到到1414的和的和的和的和列表框中的各
45、列表框中的各列表框中的各列表框中的各个数据个数据个数据个数据(选项选项选项选项)Private Sub Command2_Click()total%=0For i=0 To _ If _ Then total=total+List1.List(i)End IfNextText1.Text=totalEnd SubPrivate Sub Command3_Click()For i=List1.ListCount-1 To 0 Step-1 If List1.Selected(i)=True Then _ End IfNextEnd SubList1.ListCount-1List1.Select
46、ed(i)=TrueList1.RemoveItem iList1.Clear 清空所有项目清空所有项目List1.AddItem 项目名称项目名称,位置位置 添加一个项目添加一个项目组合框或列组合框或列表框中被选表框中被选中的文本内中的文本内容用容用TextText表示表示List1.RemoveItem 位置值位置值 删除删除第几个第几个项目项目ListIndexListIndex表示所表示所表示所表示所选中项目的位置值选中项目的位置值选中项目的位置值选中项目的位置值如果列表框中如果列表框中如果列表框中如果列表框中已经有了这个已经有了这个已经有了这个已经有了这个菜，怎样能让菜，怎样能让菜，
47、怎样能让菜，怎样能让不重复添加同不重复添加同不重复添加同不重复添加同一个菜呢？一个菜呢？一个菜呢？一个菜呢？滚动条控件滚动条控件（HScrollBar和和 VScrollBar）属性Value：滑块所处位置代表的值Max：滑块处于最右（下）端时的值Min：滑块处于最左（上）端时的值LargeChange：单击滚动条空白处，滑块移动的增量。SmallChange：单击滚动条两端箭头时，滑块移动的增量。MinMaxMinMaxLargeChangeSmallChangeValue滚动条控件滚动条控件事件事件：Scroll：拖动滑块拖动滑块时会触发时会触发Scroll事事件。件。(单击两端箭头时不触
48、发）单击两端箭头时不触发）Change：Value 属性属性改变时触发改变时触发Change事件。事件。PictureBox（图片框）（图片框）和和 Image（图像框）控件（图像框）控件属性属性 Picture（1）在属性窗口设置）在属性窗口设置（2）通过代码设置）通过代码设置对象对象.Picture=LoadPicture(文件文件)当装入的图片与框大小不一致时当装入的图片与框大小不一致时PictureBox AutoSize （逻辑值）（逻辑值）调整图片框的大小以适应图的大小调整图片框的大小以适应图的大小Image Stretch （逻辑值）（逻辑值）调整图的大小以适应图像框的大小调整图
49、的大小以适应图像框的大小 属性属性 Interval属性属性 计时间隔单位：计时间隔单位：ms(0.001s)如：每间隔如：每间隔0.5秒触发：秒触发：Interval 500 屏蔽计时器：屏蔽计时器：Interval 0Enabled属性属性 True：有效计时：有效计时 False：停止时钟工作：停止时钟工作事件事件 Timer 时钟控件以时钟控件以Interval为时间间隔产生为时间间隔产生 Timer事件。事件。Timer控件的大小不能调整，控件的大小不能调整，在程序运行时始终不可见在程序运行时始终不可见时钟时钟(Timer)菜单项菜单项名称名称是必须是必须 输入输入的的分隔条（分隔条
50、（-）、热键）、热键(&)以以及快捷键的设置及快捷键的设置菜单菜单通用对话框通用对话框(CommonDialog)打开通用对话框的方法与Action属性设置FileName，FileTitle，Filter属性属性文件及其种类文件及其种类 文件是记录的集合。文件是记录的集合。VB的三类文件：的三类文件：顺序文件顺序文件随机文件随机文件二进制文件二进制文件顺序文件顺序文件 从第一条到最后一条记录顺序读写从第一条到最后一条记录顺序读写 文本文件每一行为一条记录文本文件每一行为一条记录 写文件的三步骤：写文件的三步骤：打开打开写入写入关关闭闭 读文件的三步骤：读文件的三步骤：打开打开读出读出关关闭闭