data3.dat

学习VB的经典资料 vb一点通 看后很快就会了 初学者的帮手

赋值语句


在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