vb基本控制结构

赋值语句

变量名=表达式

累加sum=sum+x
计数n=n+1
两边数据类型不同时，如n%=3.5，按四舍六入五取偶，即n=4
逻辑性：
True=-1
False=0

数据输入InputBox

如：n=Val(Text1.Text)
x=Val(InputBox(“输入x”))

变量[$]=InputBox(提示[,[标题][,[默认内容][,[X坐标位置][,[Y坐标位置]]]]])

[]内可省略

数据输出MsgBox

函数形式		变量[%]=MsgBox(提示[,[按钮][,标题]])
过程形式		MsgBox 提示[,[按钮][,标题]]

按钮设置可以表示为：5+48，53

按钮值	描述
0	确定
1	确定，取消
2	终止，重试，忽略
3	是，否，取消
4	是，否
5	重试，取消
16	X图标
32	？图标
48	！图标
64	i 图标

MsgBox函数返回值

被单击的按钮	返回值
确定	1
取消	2
终止	3
重试	4
忽略	5
是	6
否	7

Print方法

[对象.]Print[定位函数][输出表达式列表][分隔符]

定位函数：Spc(n)输出时插入n个空格；Tab(n)定位从最左端算起的n列。
分隔符：分号“ ; ”光标定位在上一个显示的字符后；逗号“ , ”光标定位在下一个显示区（每个显示区占14列）的开始位置处。输出列表最后没有分隔符，表示输出后换行。
如：Print Tab(i);String(6-i,"▼");Spc(6);String(i,"▲")
Tab(i)确定起始位，Spc(6)空6个空格，String(6-i,“▼”)函数重复显示6-i个“▼”。
格式输出函数

Format(表达式,"格式字符串")

符号	作用
0	数字占位符
#	数字占位符
,	千分位占位符
%	百分比占位符

例如：
Format(1234.567,“00000.0000”) 为01234.5670
Format(1234.567,"#####.####") 为1234.567
Format(1234.567,"##,#00.0000") 为1,234.5670
Format(1234.567,"#####.##%") 为123456.7%

选择结构 If 和Select Case

If语句

(1)
If 表达式 Then
	语句块
End If
(2)
If 表达式 Then 语句
(3)
If 表达式 Then
	语句块1
Else
	语句块2
End If
(4)
If 表达式 Then 语句1 Else 语句2
(5)
If 表达式1 Then
	语句块1
ElseIf 表达式2 Then
	语句块2
	...
[Else
	语句块n+1]
End If

Select Case语句

Select Case 表达式
	Case 表达式列表1
		语句块1
	Case 表达式列表2
		语句块2
		...
	[Case Else
		语句块n+1]
End Select

表达式列表：1.表达式，如"a"。2.逗号分隔枚举值，如"a",“b”,“c”,“d”,“e”。3.表达式1To表达式2，如1To10，“A"To"Z”。4.Is关系运算符，如Is>=60。四种形式可混合使用如2,4,6,8,Is>10。

循环结构For…Next和Do…Loop

For…Next

For i=0 To 10 Step 2
	循环体
Next i

Do…Loop

(1)
Do[{While|Until} 条件表达式]
	循环体
Loop
(2)
Do
	循环体
Loop[{While|Until} 条件表达式]

While为True执行循环体，Until相反