文档介绍：Visual Basic 程序设计
余杭高级中学姚国忠
第1页，共40页。
VB程序设计概述

20世纪60年代中期，Basic（Beginners All-Purpose Symbol Instru础语法
Select Case 语句：
Select Case 测试表达式
Case 表达式列表1
语句块1
Case 表达式列表2
语句块2
….
Case Else
语句块n+1
End Select
第18页，共40页。
VB程序设计基础语法
For 语句：
For 循环变量=初值 To 终值 Step 步长
语句块
Next 循环变量
Do 语句：
Do while 表达式
语句块
Loop
实现循环结构的语句：
第19页，共40页。
VB程序设计基础语法
上机练****1：在窗体上打印九九乘法表
第20页，共40页。
VB程序设计基础语法
上机练****2：将十进制数转换成十六进制数（不使用Hex函数）
第21页，共40页。
上机练****2：在窗体上打印杨辉三角（ N层）
第22页，共40页。
VB程序设计基础语法
6、函数和过程
自定义函数的声明：
[Public|Private]Function 函数名(参数列表) As 数据类型

函数体
End Function
第23页，共40页。
VB程序设计基础语法
自定义函数的过程：
[Public|Private]Sub 过程名(参数列表)

函数体
End Sub
函数和过程的参数传递：
按值传递（ByVal）
按地址传递（ByRef）
第24页，共40页。
‘按值传递
Private Sub f1(ByVal x As Integer)
x = x + 1
End Sub
‘按地址传递
Private Sub f2(ByRef x As Integer)
x = x + 1
End Sub
Private Sub Command1_Click()
Dim a As Integer
a = 10
f1 a
MsgBox a
End Sub
Private Sub Command2_Click()
Dim a As Integer
a = 10
f2 a
MsgBox a
End Sub
第25页，共40页。
VB程序设计基础语法
7、标准模块
从工程菜单中添加标准模块文件(*.bas)
8、变量、函数、过程的作用域
局部变量、模块变量、全局变量（Public、Global）
第26页，共40页。
VB程序设计基础语法
9、异常处理
On Error Resume Next
On Error Goto 标号
第27页，共40页。
上机练****3：编写一个随机生成双色球号码的程序
第28页，共40页。
VB常用控件使用

命令按钮、标签、文本框、复选框、单选框
列表框、组合框、定时器、图片框、图像框

3. 菜单、弹出式菜单使用
4. 添加第三方控件
第29页，共40页。
VB常用控件使用
5. VB基础绘图
画点：
(x,y),Color
画线：
(x1,y1)-(x2,y2),Color
画矩形：
(x1,y1)-(x2,y2),Color,B
画圆：
(x,y) ,radius,color
第30页，共40页。
VB常用控件使用
上机练****1：编写彩票号码生成器程序
（使用基础控件改进前一个程序）
第31页，共40页。
上机练****2：编写一个简易画图板程序
第32页，共40页。
文件基础操作

打开文本文件
Open 文件名 For [Input/Outpt/Append] As #FileNumber
例如：
n=FreeFile
Open “c:\” For Input As n ‘以只读方式打开
Open “c:\” For Output As n ‘以写文件方式打开
Open “c:\” For Append As n ‘以追加方式打开
关闭文件