vb程序设计教程
VB有点儿难，但不要怕
Visual Basic（简称VB）是Microsoft公司开发的一种通用的基于对象的程序设计语言，为结构化的、模块化的、面向对象的、包含协助开发环境的事件驱动为机制的可视化程序设计语言。是一种可用于微软自家产品开发的语言。
“Visual” 指的是开发图形用户界面 (GUI) 的方法——不需编写大量代码去描述界面元素的外观和位置，而只要把预先建立的对象add到屏幕上的一点即可。 “Basic”指的是 BASIC (Beginners All-Purpose Symbolic Instruction Code) 语言，是一种在计算技术发展历史上应用得最为广泛的语言。
Visual Basic源自于BASIC编程语言。VB拥有图形用户界面（GUI）和快速应用程序开发（RAD）系统，可以轻易的使用DAO、RDO、ADO连接数据库，或者轻松的创建Active X控件，用于高效生成类型安全和面向对象的应用程序。程序员可以轻松的使用VB提供的组件快速建立一个应用程序。
VB基础知识点
第1章 Visual Basic概述 一、VB对象与事件驱动的编程机制
1．VB对象
在Visual Basic应用程序设计中，构成图形用户界面的（GUI）的每一个可视的部件，均可视为对象。Visual Basic中的对象分为窗体和控件两大类。窗体就是窗口本身，是屏幕上的一个矩形区域；控件则是窗体上构成图形用户界面的一些基本组成部件。
Visual Basic的对象是具有特殊属性和行为方法的一个可视化实体，每一个对象均有自己的特殊属性、事件和方法。
属性是一个对象的特性。属性的设置方法：（1）设计阶段修改对象属性值；（2）程序运行阶段修改对象属性值，其语法格式为：对象名.属性名=属性值。例如：Command1.Caption=”确定”。
事件在发生对象身上，且能被对象识别的动作。当事件在对象身上发生后，应用程序就要处理这个事件，处理事件的步骤就是事件过程。事件过程的一般格式为： Private Sub 对象名_事件( [参数列表])
… ‘事件过程代码
End Sub 例如：
Private Sub Command1_Click()
End ‘结束程序
End Sub
方法是对象本身所包含的一些特殊函数或过程。方法的调用格式：[对象名.]方法名[参数名表]。若省略了对象名，表示为当前对象，一般指窗体。例如：Form1.print “VB is fun!” 2．事件驱动的编程机制
应用程序先等待某个事件的发生，然后再去执行处理此事件的事件过程。发生事件的顺序决定了代码执行的顺序，若没有事件发生，整个程序处于停滞等待状态。 二、窗体对象
属性：Namek, Caption, Height, Width, Left, Top, MaxButton, MinButton
事件：Click, DblClick, Load
方法：Print, Cls, Move 三、基本控件 1．标签
属性：Caption, Alignment, Autosize, BorderStyle 2．文本框
属性：Text, PasswordChar, SelStart, SelLength, SelText
事件：Change, GotFocus, LostFocus, KeyPress
方法：SetFocus 3．命令按钮
属性：Caption, Cancel, Default
事件：Click 四、创建VB应用程序的基本步骤 （1）在窗体上建立对象；（2）设置对象的属性；（3）编写对象事件过程；（4）保存和运行程序。 第2章 Visual Basic语言基础 一、数据类型 数据类型规定了数据的操作方式和取值范围，不同数据类型所占存储空间的大小也不同。
二、常量与变量 1．常量与变量的命名规则 （1）须以字母或汉字开头，后跟字母、汉字、数字或下划线组成的序列，长度不超过255个字符。 （2）不能使用Visual Basic中的关键字命名常量和变量。 （3）Visual Basic不区分常量或变量名中的大小写字母。 2．常量
定义常量的一般格式：Const 常量名[As 类型] = 表达式。例如：
Const PI as single = 3.14159 或 Const PI! = 3.14159 3．变量
在Visual Basic中，可以显式或隐式声明变量及其类型。
用Dim语句声明变量的一般格式：Dim 变量名[As 类型]。例如：
Dim m as Integer 或 Dim m%
Dim n as Integer, sum as Singe
在Visual Basic中，如果一个变量未经过Dim语句声明便直接使用，即隐式声明。使用时，系统会以该名字自动创建一个变量，并默认为变体类型。 三、运算符与表达式 1．算术运算符：^（乘方）, -（负号）, *（乘）, /（除）, （整除）, Mod（取模）, +（加）, -（减）。例如：
3/2 ‘结果等于1.5
202.6 ‘结果等于6
10 Mod 4 ‘结果等于2 2．字符串运算符：&, +。例如：
“xyz” & 123 ‘结果为”xyz123”
“xyz” + ”123” ‘结果为”xyz123”
“xyz” + 123 ‘出错
123 + 123 ‘结果为246
“123” + 123 ‘结果为246 3．关系运算符：=, >, >=, <, <=, <>, Like, Is 4．逻辑运算符：Not, And, Or 5．表达式运算顺序
运算符种类
优先级
运算符（按优先级排列）
算术运算
1
^, -, *, /, , Mod, +, –
字符串运算
2
+, &
关系运算
3
=, >, >=, <, <=, <>, Like, Is
逻辑运算
4
Not, And, Or 四、常用内部函数 1．转换函数
Str(), Val(), Chr(), Asc(), Int(), Lcase(), Ucase()
2．数学函数
Sqr(), Abs(), Sgn()
3．字符串函数
Len(),Left(), Mid(), Right(), Trim()
4．随机函数
Rnd() 例如：产生0~100之间的随机整数公式为“Int(101*Rnd)”
第3章 数据输入输出
1．Print方法
Print方法可以在窗体上显示文本字符串和表达式的值，并可在其他对象或打印机上输出。其一般格式如下：
[对象名称.]Print[表达式列表][,|;]
说明：
（1）当输出多个表达式时，各表达式用逗号或分号隔开。如果输出项之间用逗号分隔，则按标准格式（分区输出）显示数据。在这种情况下，以14个字符位置为单位（区段），逗号后的表达式在下一个区段输出。如果各输出项之间用分号分隔，则按紧凑格式输出数据。
（2）在表达式末尾可以用逗号或分号作为结尾符号。如果没有用逗号或分号结尾，则后面的Print方法在新一行显示信息；如果用逗号结尾，则后面的Print方法在下一个区段输出信息；如果用分号结尾，则后面的Print方法在按紧凑格式输出信息。
与Print方法有关的函数：
（1）Tab函数
（2）Spc函数
（3）Format函数
2．InputBox函数
InputBox函数产生一个对话框，这个对话框作为输入数据的界面，等待用户输入数据或按下按钮，并返回所输入的内容。
函数返回值是String类型。
其一般格式如下：
InputBox(<提示>[,<标题>][,<默认值>])
例如：name=InputBox(“请输入姓名”,”输入”,”小白”)
Score=val(InputBox (“请输入第1个学生分数”))
3．MsgBox函数
MsgBox函数可以向用户传送信息，并可通过用户在对话框上的选择，接受用户所作的响应，返回一个整型值，以决定其后的操作。函数返回值是Integer类型。
其一般格式如下：
MsgBox(<提示>[,<按钮类型>][,<标题>])
例如：r=MsgBox(“平均分为78.80”, “0”, “输出”) 或 r=MsgBox(“平均分为78.80”, , “输出”)
MsgBox函数也可写成语句形式，即MsgBox过程。
MsgBox <提示>[,<按钮类型>][,<标题>]
MsgBox过程与MsgBox函数实现的功能相同，主要区别是MsgBox过程没有返回值，通常用于输出较简单的信息。
例如：MsgBox “平均分为78.80”, “0”, “输出” 或 MsgBox “平均分为78.80”, , “输出”
第4章 控制结构
一、选择结构
1．If条件语句
例如：
If x>0 Then
Print “x是正数”
End If
（1）If … Then 语句格式一（单行结构）
If <表达式> Then <语句块>
格式二（块结构）
If <表达式> Then
<语句块>
End If
例如：
If x>0 Then
Print “x是正数”
Else
Print “x等于0或为负数”
End If
（2）If … Then … Else语句
格式一（单行结构）
If <表达式> Then <语句块1> [Else <语句块2>]
格式二（块结构）
If <表达式> Then
<语句块1>
[Else
<语句块2>]
End If
例如：
If x>0 Then
print “x是正数”
Elseif x<0 Then
Print “x为负数”
Elseif
Print “x等于0”
End If
（3）If … Then … ElseIf语句
If <表达式1> Then
<语句块1> [ElseIf <表达式2> Then
<语句块2>
[ElseIf <表达式3> Then
<语句块3>
[Else
<语句块n+1>]
End If
（4）If语句的嵌套
If语句嵌套是指在if结构语句中的语句序列部分仍然可以包括另外的If语句，并可以层层包含下去。
例如：
Select Case x
Case Is>0
Print “x是正数”
Case Is<0
Print “x是负数”
Case Else
Print “x等于0”
End Select
2．Select Case语句
Select Case <测试表达式>
Case <表达式列表1>
<语句块1>
[Case <表达式列表2>
<语句块2>]
…
[Case Else
语句块n]
End Select
表达式列表可以使下列形式之一：
（1）<表达式1>[,<表达式2>] … 例如：Case 2, 4, 6, 8, 10
（2）<表达式1> To <表达式2> 例如：Case 2 To 10
（3）Is <关系表达式>
例如：Case Is >100
3．IIf函数
IIf（条件表达式，表达式1，表达式2）
例如：
Sum =0
For i=1 to 100
Sum=Sum+i
Next i
二、循环结构
1．For … Next循环
For <循环变量>=<初值> To <终值> [Step <步长>]
[<循环体>]
[Exit For]
Next [<循环变量>]
2．While … Wend循环
例如：
i=1 : Sum =0
While i<=100
Sum=Sum+i
i=i+1
Next i
While 表达式[<循环体>]
Wend
3．Do … Loop循环
格式一：
Do [{While|Until} <表达式>}]
<循环体>
[Exit Do]
Loop
格式二：
Do
<循环体>
[Exit Do]
Loop [{While|Until} <表达式>}]
例如：
i=1 : Sum =0
Do Until i>100
Sum=Sum+i
i=i+1
Loop
例如：
i=1 : Sum =0
Do While i<=100
Sum=Sum+i
i=i+1
Loop
例如：
i=1 : Sum =0
Do
Sum=Sum+i
i=i+1
Loop Until i >100
例如：
i=1 : Sum =0
Do
Sum=Sum+i
i=i+1
Loop While i<=100
第5章 常用控件
一、选择类控件
1．单选按钮
属性：Caption, Value
事件：Click
2．复选框
属性：Caption, Value
事件：Click
3．框架
属性：Caption
4．列表框
属性：List, ListCount, ListIndex, Sorted, Text
事件：Click, DblClick
方法：AddItem, RemoveItem,Clear
AddItem
方法的格式：列表框名.AddItem 项目字符串[,位置值]
例如：L1.AddItem “北京”
RemoveItem方法的格式：列表框名.RemoveItem 位置值
例如：L1.RemoveItem 2
5．组合框
二、图形控件
1．图片框
属性：Picture, Autosize
事件：Click, DblClick
方法：Picture, Print, Cls
2．图像框
属性：Picture, Stretch
事件：Click, DblClick
三、滚动条
属性：max, Min, Value, SmallChange, LargeChange
事件：Scroll, Change
四、计时器
属性：Enable, Interval
事件：Timer
第6章 数组
一、数组的概念
1．数组就是一组具有相同名称的变量集合，并用下标来进行区分。集合中的每一个变量叫做数组元素，如s(n)
2．数组的定义
一维数组的定义：Dim 数组名([下标下界 to] 下标上界)[As 数据类型]
例如：Dim arr(1 to 5）As Integer 或 Dim arr(5) As Integer
二维数组的定义：Dim 数组名([第1维下标下界 to] 第1维下标上界, [第2维下标下界 to] 第2维下标上界) [As 数据类型]
例如：Dim arr(1 To 2, 1 To 3) As Integer 或 Dim arr(2, 3) As Integer
二、数组的基本操作
1．数组元素的输入、输出和复制
2．数组的初始化
Array函数可以初始化数组元素的值。例如：
Dim a As Variant
A = Array(1, 2, 3, 4）
VB课后题参考答案
桐桐那时候的考试重点，仅供参考
可做参考的练习题
