VB程序设计培训全解课件

1、Visual Basic 程序设计余杭高级中学 姚国忠第1页，共40页。VB程序设计概述1.VB的发展 20世纪60年代中期，Basic（Beginners All-Purpose Symbol Instruction Code 初学者通用指令代码）语言问世 1991年，微软推出Visual Basic 1.0 1999年，微软推出Visual Basic 6.0 2002年，微软推出Visual Studio .NET （VB.Net）2.VB特点 简单、易学，可视化编程，基于事件驱动的编程方式（事件，即用户的动作控制程序的流向）、快速开发（特别是非常界面设计方便）第2页，共40页。VB程序

2、概述3.面向对象程序设计对象：数据（若干属性）和代码（若干事件与方法过程）的集合属性：用来描述和反映对象特征的参数方法：是对象具有的特定的行为或功能，实质上是用来完成特定操作的过程和函数事件：发生在对象上的事情，对象能识别的动作类： 同一种对象的统称，是一个抽象的整体概念，对象是类的实例第3页，共40页。VB程序概述4.创建VB应用程序的一般步骤建立工程界面设计代码编写运行调试保存编译5. VB应用程序包含的文件工程文件(*.vbp) 窗体文件(*.frm)窗体二进制文件(*.frx)标准模块文件(*.bas)自定义类文件(*.cls)第4页，共40页。VB程序概述4.创建VB应用程序的一般步

3、骤建立工程界面设计代码编写运行调试保存编译5.VB程序常用调试方法断点调试、单步调试（F8）、立即窗口调试第5页，共40页。VB程序概述6. VB应用程序包含的文件工程文件(*.vbp) 窗体文件(*.frm)窗体二进制文件(*.frx)标准模块文件(*.bas)自定义类文件(*.cls)第6页，共40页。VB程序设计基础语法1.VB数据类型第7页，共40页。VB程序设计基础语法2.变量、符号常量定义变量定义：Dim 变量名 As 数据类型 Dim 变量名Dim 变量名1 As 数据类型, 变量名2 As 数据类型Option Explicit （要求变量定义）符号常量定义Const 常量名

4、= 常量值第8页，共40页。VB程序设计基础语法一维数组变量定义：Dim 变量名(下界 To 上界) As 数据类型 Dim 变量名(常数) As 数据类型 例如：Dim x(3) As Integer （有4个数组元素，默认下标从0开始，可以使用Option Base 语句改变数组下标的起始值，比如：Option Base 1）第9页，共40页。VB程序设计基础语法动态数组；Dim a() As IntegerRedim x(n) 或者 Redim Preserve x(n)多维数组:Dim 变量名(下界 To 上界,下界 To 上界, ) As 数据类型 Dim 变量名(常数1,常数2 ,

5、 ) As 数据类型 第10页，共40页。VB程序设计基础语法3. VB运算符第11页，共40页。VB程序设计基础语法4. VB常用系统函数第12页，共40页。VB程序设计基础语法第13页，共40页。VB程序设计基础语法第14页，共40页。VB程序设计基础语法输入输出对话框函数：InputBox 、 MsgBoxPrint语句例如：Print 1 + 1 Print 1+1=; 1 + 1, 2+2=, 4 Print Print Hello第15页，共40页。VB程序设计基础语法5、三种基本控制结构顺序结构、选择结构、循环结构赋值语句：变量名=表达式第16页，共40页。VB程序设计基础语法块

6、IF语句：If 条件表达式1 Then 语句块1Elseif 条件表达式2 Then 语句块2Elseif 条件表达式3 Then 语句块3Else 语句块End If 实现选择结构的语句行IF语句：If 条件表达式1 Then 语句1 Elseif 条件表达式2 Then 语句2第17页，共40页。VB程序设计基础语法Select Case 语句：Select Case 测试表达式 Case 表达式列表1 语句块1 Case 表达式列表2 语句块2 . Case Else 语句块n+1End Select 第18页，共40页。VB程序设计基础语法For 语句：For 循环变量=初值 To 终

7、值 Step 步长 语句块Next 循环变量Do 语句：Do while 表达式 语句块Loop实现循环结构的语句：第19页，共40页。VB程序设计基础语法上机练习1：在窗体上打印九九乘法表第20页，共40页。VB程序设计基础语法上机练习2：将十进制数转换成十六进制数（不使用Hex函数）第21页，共40页。上机练习2：在窗体上打印杨辉三角（ N层）第22页，共40页。VB程序设计基础语法6、函数和过程自定义函数的声明：Public|PrivateFunction 函数名(参数列表) As 数据类型 函数体End Function第23页，共40页。VB程序设计基础语法自定义函数的过程：Publ

8、ic|PrivateSub 过程名(参数列表) 函数体End Sub函数和过程的参数传递：按值传递 （ByVal）按地址传递（ByRef）第24页，共40页。按值传递Private Sub f1(ByVal x As Integer) x = x + 1End Sub按地址传递Private Sub f2(ByRef x As Integer) x = x + 1End SubPrivate Sub Command1_Click() Dim a As Integer a = 10 f1 a MsgBox aEnd SubPrivate Sub Command2_Click() Dim a As

9、 Integer a = 10 f2 a MsgBox aEnd Sub第25页，共40页。VB程序设计基础语法7、标准模块从工程菜单中添加标准模块文件(*.bas)8、变量、函数、过程的作用域局部变量、模块变量、全局变量（Public、Global）第26页，共40页。VB程序设计基础语法9、异常处理On Error Resume NextOn Error Goto 标号第27页，共40页。上机练习3：编写一个随机生成双色球号码的程序第28页，共40页。VB常用控件使用2.常用控件 命令按钮、标签、文本框、复选框、单选框 列表框、组合框、定时器、图片框、图像框1.窗体3. 菜单、弹出式菜单使

10、用4. 添加第三方控件第29页，共40页。VB常用控件使用5. VB基础绘图画点：容器对象名.Pset (x,y),Color画线：容器对象名.Line (x1,y1)-(x2,y2),Color画矩形：容器对象名.Line (x1,y1)-(x2,y2),Color,B画圆：容器对象名.Circle (x,y) ,radius,color第30页，共40页。VB常用控件使用上机练习1：编写彩票号码生成器程序（使用基础控件改进前一个程序）第31页，共40页。上机练习2：编写一个简易画图板程序第32页，共40页。文件基础操作1.文本文件的读写打开文本文件Open 文件名 For Input/Ou

11、tpt/Append As #FileNumber例如：n=FreeFileOpen “c:1.txt” For Input As n 以只读方式打开Open “c:1.txt” For Output As n 以写文件方式打开Open “c:1.txt” For Append As n 以追加方式打开关闭文件 ： Close 文件号第33页，共40页。文件基础操作读取文本文件Line Input #FileNum, 字符串变量名 一次读入一行文本例如：Dim n As Integer, s As Stringn = FreeFileOpen c:data.txt For Input As n

12、Do While Not EOF(n) Line Input #n, s Text1.Text = Text1.Text & s & vbCrLfLoopClose n 第34页，共40页。文件基础操作写文本文件Print #FileNum,表达式列表 （与Print语句输出到窗体效果一样）例：n = FreeFileOpen “c:data.txt” For Output As n 改为Append，为追加方式写入Print #n,Text1.text;Close n第35页，共40页。文件基础操作写文本文件：Print #FileNum,表达式列表 （与Print语句输出到窗体效果一样）例：n = FreeFileOpen “c:data.txt” For Output As #n 改为Append，为追加方式写入Print #n,Text1.text;Close n第36页，共40页。文件基础操作2.文件打开、保存对话框使用（CommandDialog）调用打开文件对话框CommandDialog1.ShowOpensFile=CommandDialog1.Filename调用保存文件对话框CommandDialog1.ShowSavesFile=CommandDi