一、简单If条件语句
 使用在称之为分支结构的特殊语句块中的条件表达式控制了程序中哪些语句被执行以及什么样的执行次序执行。“If...Then”分支结构在程序中计算条件值，并根据条件值决定下一步执行的操作。最简单的“If...Then”分支结构可以只写在一行：
     If Condition Then Statement[Else statement] 
 注意：“If...Then”分支结构用于给程序添加逻辑控制能力。这里，“Condition”是个条件表达式，“Statement”是条件有效的Visual Basic语句。例如：
     If Score>=20 Then Label1.Text="You Win!"是个使用了下述条件表达式的分支结构：Score>=20
 根据这个表达式的值，程序决定是否把Label1对象的“Text”属性设置为“You Win!”。如果“Score”变量的值大于等于20，Visual Basic设置该属性的值，否则，Visual Basic跳过这条赋值语句，然后执行事件过程中的下一行语句。这类比较运算的结果不是“True”就是“False”，条件表达式从来不会产生模棱两可的值。
 二、If...Then...Else语句
 Visual Basic还支持另一种格式的“If...Then”分支结构，该结构中包含几个条件表达式，由多行语句组成，其中包含了重要关键字“ElseIf”、“Else”以及“End If”。
 
If Condition1 Then
    Statements
 ElseIf Condition2 Then
    Statements
 [其他ElseIf子句及其相应的执行语句]
 Else
    Statements
 End If这个结构中，“Condition1”首先被计算。如果这个条件表达式的值为“True”，那么这个条件表达式下的语句被执行；如果第一个条件的值不是“True”，那么计算第二个表达式（Condition2）的值，如果第二个条件的值为“True”，那么这个条件表达式下的语句块被执行（如果要判断更多的条件，那么继续增加“ElseIf”子句及该子句下的语句块）；如果所有条件表达式的值都不是“True”，那么执行“Else”子句下的语句块；最后，整个结构使用“End If”关键字结束。多行“If...Then”结构特别适合于分段计算问题，比如税费方面的计算。下面的代码展示了如何使用多行“If...Then”结构来确定递进税计算问题（收入和税率的对应关系取自美国国内收入服务1997年税率表）：
 
If AdjustedIncome<=24650 Then
    '15%税段
    TaxDue=AdjustedIncome*0.15
 ElseIf AdjustedIncome<=59750 Then
    '28%税段
    TaxDue=3697+((AdjustedIncome-24650)*0.28)
 ElseIf AdjustedIncome<=124650 Then
    '31%税段
    TaxDue=13525+((AdjustedIncome-59750)*0.31)
 ElseIf AdjustedIncome<=271050 Then
    '36%税段
    TaxDue=33644+((AdjustedIncome-124650)*0.36)
 Else
    '39.6%税段
    TaxDue=86348+((AdjustedIncome-271050)*0.396)
 End If注意：总是可以添加更多的“ElseIf”块到“If...Then”结构中去。但是，当每个“ElseIf”都将相同的表达式比作不同的数值时，这个结构编写起来很乏味。在这种情况下可以使用“Select Case”判定结构。 
 
三、Select Case结构
 Visual Basic还支持在程序中使用“Select Case”分支结构来控制语句的执行。 “Select Case”结构与“If...Then...Else”结构相似，但在处理依赖于某个关键变量或称作测试情况的分支时效率更高。并且，使用“Select Case”结构可以提高程序的可读性。“Select Case”结构的语法如下所示： 
 
Select Case Variable
      Case Value1
          Statements
      Case Value2
          Statements
      Case Value3
          Statements
      ...
 End Select“Select Case”结构以关键字“Select case”开始，以关键字“End Select”结束。“Select Case”结构中的“Variable”可以是变量、属性或者是表达式，“Value1”、“Value2”，“Value3”可以是数值、字符串或与要测试的其他情况相关的其他值，如果其中某个值与变量相匹配，那么该“Case”子句下的语句被执行，然后Visual Basic执行“End Select”语句后面的语句。“Select Case”结构中可以使用任意多个“Case”子句，“Case”子句中也可以包括多个“Value”值，多个“Value”值之间使用逗号分隔。
 下面示例展示了程序中如何使用“Select Case”结构打印与某人年龄相关的信息。当“Age”变量与某个“Case”值匹配时，相应的信息显示在标签对象中。
 
Select Case Age
 case 16
     Label1.Text="You can drive now!"
 Case 18
     Label1.Text="You can vote now!"
 Case 21
     Label1.Text="You can drink wine with your meals."
 Case 65
     Label1.Text="Time to retire and have fun!"
 End Select注意：“Select Case”结构比功能等效的“If...Then”结构更清晰易读。“Select Case”结构还支持“Case Else”子句，该子句可用于当不满足所有“Case”条件时显示信息。下面是说明“Case Else”子句用法的一个示例：
 
Select Case Age
 Case 16
     Label1.Text="You can drive now!"
 Case 18
     Label1.Text="You can vote now!"
 Case 21
     Label1.Text="You can drink wine with your meals."
 Case 65
     Label1.Text="Time to retire and have fun!"
 Case Else
     Label1.Text="You're a great age!Enjoy it!"
 End Select注意：“Select Case”结构每次都要在开始处计算表达式的值，而“If...Then...Else”结构为每个“ElseIf”语句计算不同的表达式，只有在“If”语句和每个“ElseIf”语句计算相同的表达式时，才能使用“Select Case”结构替换“If...Then...Else”结构。
 
本文来自编程入门网：http://www.bianceng.cn/Programming/VB_NET/200705/1268.htm

前言：下面是针对初学VB同学的刷题总结。
 
 
1. 数据类型
 
1.1 数值类型
 
数值类型数据可以直接参与运算，代表的数据类型有：Integer(整型)、Long(长整型)、Single(单精度)、Double(双精度)等，囊括了整数、小数、日期、货币等直接可以参与运算的数据类型。
布尔值：数据类型为Boolean，是一种特殊数值类型。只有两种值：True或者False。True对应数值为-1，False对应数值为0。
 
1.2 字符串类型
 
  字符串类型的数据不能直接参与运算，像字母或者中文字符很容易理解为什么不能直接参与运算；而像数字字符比如"0"的ASCII码是48，参与运算后得到结果则完全和数值0无关。
 
 
2. 程序结构
 
2.1 顺序结构
 
程序的顺序结构就是程序是按照编写的语句一步一步顺序执行，前一段操作执行完之后，后一段操作才能执行，不会随意跳转。
语句标签成对出现构成语句块。比如：有Sub就会有End Sub;有Function就会有End Function；有If就会有End If。因此标记语句块对程序功能分析十分重要。
 
2.2 选择结构
 
  VB的选择结构有If Else，也有Select Case结构。但是目前考察的大多数是If Else结构。并且对于一个If语句块，可能有很多种情况，但是对于按顺序下来最先满足的一种情况符合后，就会退出该If语句块。
 
2.2.1 If - Then
 
  满足条件执行Then后面程序。一个If语句块中只能有一个If语句，并且在开头。
 
If a > b Then
a = a + 1
End If
 
2.2.2 ElseIf - Then
 
  一个语句块中可以有多个ElseIf语句块。
 
If a > b Then
a = a + 1
ElseIf a > c Then
a = a + 2
ElseIf a > d Then
a = a + 3
ElseIf a > e Then
a = a + 4
End If
 
2.2.3 Else
 
  Else表示以上所有情况都不满足时应该执行的语句，是以上所有情况的补集，在整个If语句块最后出现，当然也可以不出现，且后面无需跟Then。
 
If a > b Then
a = a + 1
ElseIf a > c Then
a = a + 2
ElseIf a > d Then
a = a + 3
ElseIf a > e Then
a = a + 4
Else
a = a + 10
End If
 
2.3 循环结构
 
  对于所有的循环需要注意的有以下几点：
 
循环变量：在整个循环进行过程中一直改变，并且作为判断循环是否继续的变量
循环条件：循环能够进行的条件，不满足该条件后循环终止
循环步长：每次循环代码执行后循环变量的变化量
 
2.3.1 For - Next 循环
 
  看到For马上找Next，中间是循环体。
 
For i = 1 To 101 Step 2 
 
Next i
 
	注：step步长不写时默认为1。步长值可正可负。
 
2.3.2 While - Loop 循环
 
  看到While马上找Loop，中间是循环体
 
i = 1
 While i <= 101
  i = i + 2
 Loop
 
	注：While循环和For循环之前的区别是，While循环的循环变量步长变化必须写在循环体中，即上述的 i = i + 2。
 
 
3. 常见运算符
 
3.1 基本运算符
 
3.1.1 +、-、*、\
 
  四则运算的基本运算规则是先乘除后加减，即*和\的优先级高于+和-。
 
3.1.2. Mod
 
  在先乘除后加减的运算规则下，Mod运算符的优先级介于*\和+-之间。即先*\再Mod后+-。
 
3.1.3 / 和 \
 
/：表示除法，结果能够出现小数。如：1 / 2 = 0.5
\：表示整除，结果不能出现小数，若本身出现小数，作截断处理。如：1 \ 2 = 0
 
3.2 逻辑运算符
 
3.2.1 And
 
  And和数学概念中的“且”相同，左右两个条件要同时满足。If ch >= "0" And ch <= "9"表示字符ch既要大于字符"0"又要大于字符"9"，实际上就是判断ch是否在字符0~9的范围，也就是两个范围的交集。
 
3.2.2 Or
 
  Or和数学概念中的“或”相同，左右两个条件要至少满足一个。If ch > "0" Or ch == "0"表示字符ch既要大于字符"0"或者也可以等于字符"0"，实际上就是判断ch>=0，也就是两个范围的并集。
 
3.2.3 Not
 
  Not和数学概念中的“非”相同，If Not ch语句在ch为False时候取反为True，会执行其If后的语句块，是取补集。
 
 
4. 常见函数
 
4.1 字符处理函数
 
4.1.1 Mid(s,i,n) — 字符串截取函数
 
		s:表示要处理的字符串
		i:表示截取字符串的初始位置
		n:表示向后截取几个字符
		(注：VB字符串下标从1开始)
 
  对于s = "ABCDFEG",执行Mid(s,2,3)后取出的字符串是"BCD"。
 
4.1.2 Len(s) — 获取字符串中字符的数量
 
  对于s = "ABCDFEG",其返回的数字是7。
 
4.1.3 Asc(“A”)和Chr(65) — 字符和Ascii值转换
 
  Asc()和Chr()是针对字符的Ascii码的两种操作。
 
		Asc("A")获取”A“的Ascii码值并返回，返回类型是数值
		Chr(65)从Ascii表中找到码值65的对应字符并返回，返回类型是字符串类型
 
4.1.4 Val(“123”)和Str(123) — 字符和数值抓换
 
  Val()和Str()是针对字符和数值转换的两种操作。
 
	Val("123")将数字字符串转化为可计算的数值，返回123为数值类型
	Str(123)将数值转换为字符串返回，返回类型为字符串
	(注意：对于Val()函数，传入参数是非数值类型字符，会产生错误)
 
4.2 数值操作
 
4.2.1 Rnd
 
  Rnd随机数产生范围是 [0,1) ，特别注意前闭后开。
 
4.2.2 Int(“12.1”)
 
  截取整数部分，Int(12.1) = 12。需要注意的是，Int操作为向下取整，故Int(-3.5) = 4。
 
4.3 数学运算
 
4.3.1 Abs(-13 )
 
  取自英文absolute，取绝对值。
 
4.3.2 Sqr(4)
 
  求非负数的算术平方根。

一、简单If条件语句
使用在称之为分支结构的特殊语句块中的条件表达式控制了程序中哪些语句被执行以及什么样的执行次序执行。“If...Then”分支结构在程序中计算条件值，并根据条件值决定下一步执行的操作。最简单的“If...Then”分支结构可以只写在一行：
    If Condition Then Statement[Else statement] 
 
注意：“If...Then”分支结构用于给程序添加逻辑控制能力。这里，“Condition”是个条件表达式，“Statement”是条件有效的Visual Basic语句。例如：
    If Score>=20 Then Label1.Text="You Win!"是个使用了下述条件表达式的分支结构：Score>=20
根据这个表达式的值，程序决定是否把Label1对象的“Text”属性设置为“You Win!”。如果“Score”变量的值大于等于20，Visual Basic设置该属性的值，否则，Visual Basic跳过这条赋值语句，然后执行事件过程中的下一行语句。这类比较运算的结果不是“True”就是“False”，条件表达式从来不会产生模棱两可的值。
二、If...Then...Else语句
Visual Basic还支持另一种格式的“If...Then”分支结构，该结构中包含几个条件表达式，由多行语句组成，其中包含了重要关键字“ElseIf”、“Else”以及“End If”。
 
If Condition1 Then
   Statements
ElseIf Condition2 Then
   Statements
[其他ElseIf子句及其相应的执行语句]
Else
   Statements
End If
 
这个结构中，“Condition1”首先被计算。如果这个条件表达式的值为“True”，那么这个条件表达式下的语句被执行；如果第一个条件的值不是“True”，那么计算第二个表达式（Condition2）的值，如果第二个条件的值为“True”，那么这个条件表达式下的语句块被执行（如果要判断更多的条件，那么继续增加“ElseIf”子句及该子句下的语句块）；如果所有条件表达式的值都不是“True”，那么执行“Else”子句下的语句块；最后，整个结构使用“End If”关键字结束。多行“If...Then”结构特别适合于分段计算问题，比如税费方面的计算。下面的代码展示了如何使用多行“If...Then”结构来确定递进税计算问题（收入和税率的对应关系取自美国国内收入服务1997年税率表）：
 
If AdjustedIncome<=24650 Then
   '15%税段
   TaxDue=AdjustedIncome*0.15
ElseIf AdjustedIncome<=59750 Then
   '28%税段
   TaxDue=3697+((AdjustedIncome-24650)*0.28)
ElseIf AdjustedIncome<=124650 Then
   '31%税段
   TaxDue=13525+((AdjustedIncome-59750)*0.31)
ElseIf AdjustedIncome<=271050 Then
   '36%税段
   TaxDue=33644+((AdjustedIncome-124650)*0.36)
Else
   '39.6%税段
   TaxDue=86348+((AdjustedIncome-271050)*0.396)
End If
 
注意：总是可以添加更多的“ElseIf”块到“If...Then”结构中去。但是，当每个“ElseIf”都将相同的表达式比作不同的数值时，这个结构编写起来很乏味。在这种情况下可以使用“Select Case”判定结构。 
 
三、Select Case结构
Visual Basic还支持在程序中使用“Select Case”分支结构来控制语句的执行。 “Select Case”结构与“If...Then...Else”结构相似，但在处理依赖于某个关键变量或称作测试情况的分支时效率更高。并且，使用“Select Case”结构可以提高程序的可读性。“Select Case”结构的语法如下所示： 
 
Select Case Variable
     Case Value1
         Statements
     Case Value2
         Statements
     Case Value3
         Statements
     ...
End Select
 
“Select Case”结构以关键字“Select case”开始，以关键字“End Select”结束。“Select Case”结构中的“Variable”可以是变量、属性或者是表达式，“Value1”、“Value2”，“Value3”可以是数值、字符串或与要测试的其他情况相关的其他值，如果其中某个值与变量相匹配，那么该“Case”子句下的语句被执行，然后Visual Basic执行“End Select”语句后面的语句。“Select Case”结构中可以使用任意多个“Case”子句，“Case”子句中也可以包括多个“Value”值，多个“Value”值之间使用逗号分隔。
下面示例展示了程序中如何使用“Select Case”结构打印与某人年龄相关的信息。当“Age”变量与某个“Case”值匹配时，相应的信息显示在标签对象中。
 
Select Case Age
case 16
    Label1.Text="You can drive now!"
Case 18
    Label1.Text="You can vote now!"
Case 21
    Label1.Text="You can drink wine with your meals."
Case 65
    Label1.Text="Time to retire and have fun!"
End Select
 
注意：“Select Case”结构比功能等效的“If...Then”结构更清晰易读。“Select Case”结构还支持“Case Else”子句，该子句可用于当不满足所有“Case”条件时显示信息。下面是说明“Case Else”子句用法的一个示例：
 
Select Case Age
Case 16
    Label1.Text="You can drive now!"
Case 18
    Label1.Text="You can vote now!"
Case 21
    Label1.Text="You can drink wine with your meals."
Case 65
    Label1.Text="Time to retire and have fun!"
Case Else
    Label1.Text="You're a great age!Enjoy it!"
End Select
 
注意：“Select Case”结构每次都要在开始处计算表达式的值，而“If...Then...Else”结构为每个“ElseIf”语句计算不同的表达式，只有在“If”语句和每个“ElseIf”语句计算相同的表达式时，才能使用“Select Case”结构替换“If...Then...Else”结构。

1、输入语句
 
变量名 = InputBox(“请输入变量的值”)
 
2、输出语句
 
Print 表达式
 
3、声明语句
 
Dim 变量名 As 数据类型
 
Dim 变量名1 As 数据类型，变量名2 As 数据类型，…
 
Dim 数组名（1 To n） As 数据类型
 
4、赋值语句
 
变量名 = 表达式
 
5、注释语句
 
‘注释文字
 
6、分支语句
 
①单分支语句
 
If 条件 Then
 
语句组
 
EndIf
 
②双分支语句
 
If 条件 Then
 
语句组A
 
Else
 
语句组B
 
EndIf
 
7、循环语句
 
①Do循环语句
 
Do While 循环条件
 
语句组
 
Loop
 
②For循环语句
 
For 循环变量 = 初值 to 终值 Step 步长
 
语句组
 
Next 循环变量