前言:可以看到,下面的总结分类没有顺序。其实每个程序里面都有顺序结构,默认程序从上往下执行这就是一个顺序结构。所以顺序结构其实在每一个程序里面都有。
选择
if 语句
单行if 条件 then end if
多行
if 条件 then
语句块1
else
语句块2
end if
****
多条件
if 条件 then
语句块1
elseif 条件 then
语句块2
elseif 条件 then
语句块3
else
语句块4
end if ****
select
select case 条件
case 0
case 1
end select
循环
for
For i=条件 Step 1 ‘默认是1 step 步长值
循环体
Next
do
do 没有条件 do while'先判断条件 do do until '条件flash才执行
loop loop loop wheile '后判断条件 loop ‘也是有两种,先判断条件和后判断条件’
代码示例:
顺序结构
'赋值相容
Dim x As Integer
Dim y As String
y = "100.23" '将数值形式的字符串赋值给y
x = y '将字符串变量y赋值给整型变量x
y = y + 20
Text1.Text = x
Text2.Text = y
选择机构
'一元一次方程
dim x as dobule '用于判断
If x < 1 Then '当x<1
Print "y" & x
ElseIf x >= 1 And x < 10 Then '当1≤x<10
Print "y=" & (2 * x - 1) 'y的值是2x-1
ElseIf x >= 10 Then '当x>10
Print "y=" & (3 * x - 11) 'y的值是3x-11
End If
End Sub
循环结构
'九九乘法表
Print Tab(30);
Print Tab(31);
For i = 1 To 9 '外循环一圈,内循环i圈
For j = 1 To i
Print Tab((j - 1) * 8); j & "*" & j & "=" & j * i; '
Next j
Print
Next i