VB编程基础
来源:百度文库 编辑:神马文学网 时间:2024/04/28 13:39:30
基本概念
Visual Basic是微软公司推出的Basic语言编程工具,它比标准Basic语言增加了许多功能。它支持面对对象的编程,由于它是为Window这样的图形用户界面的操作系统开发的,所以它使用事件驱动的方式控制程序流程。
VisualBasic新概念:
一、 VisualBasic术语
·设计时:设计时是指在VB环境中建立应用程序时的时间。
·运行时:运行时是指在应用程序运行期间,用户与应用程序进行交互的时间。通常我们在设计时初始化窗体和控件的属性,在运行时响应窗体和控件的事件修改它们的属性或调用它们的方法。
·对象:将数据和处理该数据的过程(函数和子程序)打包在一起而生成的新的数据类型称之为对象。在VisualBasic中,所有窗体和控件都是对象。要访问对象的属性和方法,必须在对象和属性方法之间加入一个句点。
[例]
Label1.Caption="VB学习系统"
Text1.SetFocus
·属性:对象中的数据。 方法:对象中的过程。
·窗体:窗体是可用作定制应用程序界面的窗口,或用作从用户处收集信息的对话框。你可向窗体增加控件、图形或图片来创建你的应用程序界面。窗体可单独存在,也可是多文档界(MDI)中的一个文档,即一个子窗体。
·控件:控件是用户操作对象的图形表示,以便向应用程序提供信息。例如:按钮、列表框或编辑框等。有的控件没有图形表示。
如:计时器、WinSocket等。
·事件(Event):事件是指窗体或控件识别的活动。事件发生在用户与应用程序交互时。
如:单击控件、键盘输入、移动鼠标等。
也有部分事件由系统产生,不需要用户输入。如:计时器事件。
·事件驱动程序设计:当程序是事件驱动的时,应编写执行来响应由用户或系统激活的事件的代码。与过程程序设计不同,后者的程序起始于代码的第一行,并遵循定义好的路径调用所需的过程。事件驱动设计是图形用户界面的本质,即:由用户控制而代码做出响应。
二、 VB项目文件
包括在VisualBasic应用程序开发中包括的所有的窗体、代码模块和定制控件的一个文件列表,以及在开发中选择的环境选项。 顶点
项目由下列文件组成:
文件类型 扩展名
项目文件 *.vbp
窗体文件 *.frm
模块文件 *.bas
定制控件 *.ocx
类模块 *.cls
资源文件 *.res
变量与常量
一、VisualBasic数据类型
数据类型 举例
字节型 56
布尔型 True False
整型 5367
长整型 4364574
单精度型 4362.34
双精度型 4652.65735745
货币型 $234.34
日期型 4/7/2000
对象型 Label1
字符串型 "My homepage"
变体型 任意值
二、变量的声明
Dim var As Type
Public var As Type
Private var As Type
其中:
Public 定义公有变量
Dim、Private 定义私有变量
三、Option Explicit 关键字
在VisualBasic中用户可以不声明而直接使用变量,但容易产生错误。可以使用Option Explicit关键字强制声明变量,必需先声明再引用。Option Explicit关键字放在窗体或模块的通用声明(GenneralDeclarations)处。也可以通过设置将Option Explicit自动加到每个模块中。
四、变量的作用域
局部(Local):在过程级定义的变量,仅在声明它的过程中可见。
模块/窗体(Modudule/Form):在模块或窗体级声明的变量,在声明它的模块或窗体中的所有过程中可见。
公有(Public):在模块或窗体级声明的变量,在所有项目的任何过程中都可见。
五、Static 关键字
普通的局部变量在过程结束后被释放,在下次执行过程时从新初始化为0。用Static声明的局部变量在过程结束后不被释放,仍保留变量的值。
[例]:
Sub P()
Static I As Integer
I=I+1
MsgBox "A=" & I
End Sub
六、常量
常量是程序中不发生变化的值。它和变量一样有三种作用域。它的定义语法如下:
[Public]Const con[As Type]=expression
[Private]Const con[As Type]=expression
[]内为可以缺省项
七、数据类型转换
VisualBasic自动完成某些数据转换,为提高运行速度,我们通常使用CType() 函数显示地转换。 VisualBasic转换函数包括:
CBool: 转换为Boolean类型
CByte: 转换为Byte类型
CCur : 转换为Currency类型
CDate: 转换为Date类型
CDbl : 转换为Double类型
CInt : 转换为Integer类型
CLng : 转换为Long类型
CSng : 转换为Single类型
CStr : 转换为String类型
CVar : 转换为Variant类型
CVErr: 转换为Error类型
基本语句
一、赋值语句
在VB中赋值语句有两种:
1:对普通变量的赋值。
变量=表达式
[例]
Dim a As Integer
a=100*20
2:对对象变量的赋值。
Set 变量=表达式
[例]
Dim ex As DataBase
Set ex=OpenDataBase("File.mdb")
二、If 语句
If语句用于测试条件,根据测试结果执行不同的操作。格式如下:
If 表达式 Then
...
Else
...
End If
或:
If 表达式 Then 语句1:语句2: ..
[例]
If Password="123456" Then
OK=True
Else
Ok=False
End if
三、Select Case 语句
Select Case 语句用于对某一表达式的值进行多种处理。
格式如下:
Select Case 表达式
Case 值1:
...
Case 值2:
...
Case Else
...
End Select
四、For 循环语句
For...Next用于指定次数的循环。
格式有两种:
1、普通的数字变量:
For var=start To end[Step step]
...
Next var
2、集合中的对象:
For Each obj In objs
...
Next obj
其中:obj 是对象变量。 Objs 是集合变量。
五、Do 循环语句
根据某一条件来决定是否循环时我们使用Do循环。
Do 循环有两种:
1、当型循环(先判断后执行)
Do While|Until 条件
...
Loop
2、直按型循环(先执行后判断)
Do
...
Loop While|Until 条件
[注]:While 当条件为 True 时循环。 Until 当条件为 True 时退出。
六、With 语句
当我们经常使用某一对象的属性、方法时,就可以使用。With语句。With语句可以使代码更简捷,并能提高运行速度。
格式如下:
With 对象变量
...
End With
[例]
With Text1
.SelStart=0
.SeiLength=Len(.Text)
.SetFocus
End With
相当于:
Text1.SelStart=0
Text1.SeiLength=Len(Text1.Text)
Text1.SetFocus
子程序与函数
一、子程序
执行单一活动的代码块。
事件是特殊的子程序。
定义方法如下:
[Public]Sub 子程序名(参数表)
...
End Sub
[Private]Sub 子程序名(参数表)
...
End Sub
参数表格式如下:
var1 As Type1,var2 As Type2,...
二、函数
与子程序的区别是它通过函数名返回值。
定义方法如下:
[Public]Function 函数名(参数表)As 类型
...
函数名=值
End Function
[Private]Function 函数名(参数表)As 类型
...
函数名=值
End Function
[注]:在VB中一条语句在一行中写不完,使用下划线加空格连接。
三、属性过程
在ActiveX中详细介绍。