顺序结构
注释
-
Rem 要求于注释内容之间加一个空格
-
'
End 和 Stop
-
End当前程序会终止运行,清楚所有变量,并关闭所有所有数据文件
-
Stop在语句中设置断点,常用于调试
选择结构
关系表达式
运算符 | 名称 |
---|---|
< | 小于 |
<= | 小于等于 |
> | 大于 |
>= | 大于等于 |
= | 等于 |
<> | 不等于 |
Is | 比较对象变量(引用变量) |
逻辑表达式
And (与) Or(或) Not(非)Xor(异或)
IF条件语句
If a > 12 Then
'语句1
ElseIf a < 11 Then
'语句2
Else
'语句3
End If
IIF函数
Dim Min As Integer
Dim a As Integer = 10
Dim b As Integer = 20
Min = IIf(a > b, a, b)
Select Case 多条件分支语句
执行每条 Case语句都会直接跳到End Select 语句
Select Case a
Case 2
'语句1
Case 1, 3
'语句2
Case 4 To 10
'语句3
Case Is < 1
'表示条件a小于1时
End Select
循环语句
For Next循环
For a = 2 To 10 Step 2
'Step步长可以是负数
Next
For Each循环
Dim Sum(10) As Integer
Dim x As Integer = 0
For Each x In Sum
'语句
x = x + 1
Next x
Do 循环
前测型
Do While a < 100
'条件成立执行
a = a - 1
Loop
Do Until a < 100
'条件不成立执行
a = a + 1
Loop
后测型
Do
'条件成立执行
a = a - 1
Loop While a < 100
Do
'条件不成立执行
a = a + 1
Loop Until a < 100
循环出口 Exit For和Exit Do
For a = 2 To 10 Step 2
'Step是指每次循环的间隔
If a > 8 Then
Exit For
End If
Next
Do While a < 100
'条件成立执行
a = a - 1
If a < 20 Then
Exit Do
End If
Loop