VB选择结构

选择结构一、单分支的if语句1、格式[1] If 表达式Then语句块End if[2] If 表达式Then语句块2、功能：3、说明：（1）“表达式”一般为关系或逻辑表达式。

（2）“语句块”可以是任意多个语句，只不过“格式[2]”中的多个语句之间必须用：隔开，书写在同一行。

此时，“End if”可以省略。

4、举例：例1：任意读入两个整数，从小到大输出这两个数。

Private Sub Command1_Click()Dim a As Integer, b%a =InputBox("请输入一个整数：")b = InputBox("请输入一个整数：")If a > b Then Print b; a End IfIf b >= a Then Print a; b End IfEnd Sub5、InputBox函数（1）简单格式InputBox("提示信息") （2）使用格式（赋值语句）变量= InputBox("提示信息") （3）功能：从键盘上接受一个数据，然后赋值给某个变量（即读入一个任意值，保存到某变量中。

（4）用InputBox函数输入的数据默认为字符型，但由于赋值语句的特点“右边服从左边”，通常会自动转换成相应类型值之后再赋值给变量。

例如：Private Sub Command1_Click()'a,b不定义就使用，被认为是变体型a = InputBox("请输入一个整数：")b = InputBox(请输入一个整数：") If a > b Then Print b, aIf b >= a Then Print a, bEnd Sub输入的是“9”和“12”则会被当成字符串"9"和字符串"12"，赋值给a和b，而字符串按其ASCII 码值比较大小（字典序）。

VB选择结构程序设计If条件语句1．单分支条件结构（If...Then语句）用If...Then 结构有条件地执行一个或多个语句。

单行语法和多行块语法都可以使用：（1）If < 表达式> Then <语句块>（2）If < 表达式> Then<语句块>End If2. 双分支结构（If...Then...Else语句）可以用If...Then...Else 块定义几个语句块，执行其中一个语句。

其语法格式也有两种形式：（1）If <表达式> Then<语句块1>Else<语句块2>End If（2）If <表达式> Then<语句1>Else<语句2>3. 多分支结构（If…Then…ElseIf语句）多分支结构可以处理两个或两个以上分支。

其语句形式为：If <表达式1> Then<语句块1>ElseIf<表达式2> Then<语句块2>…[Else<语句块n+1>]End IfIf语句的嵌套上面学习了If语句的基本形式，可以通过这些基本形式加以复合，获得更为复杂的If结构，称为If语句的嵌套。

可根据实际情况选择采用何种结构。

Select CaseSelect Case的结构形式为：Select Case <测试表达式>[Case <表达式列表1>[<语句块1>]][Case <表达式列表3>[<语句块2>]]…[Case <表达式列表n>[<语句块n>]][Case Else[<语句块n+1>]]End Select条件函数1．IIf 函数IIf 函数的功能是根据表达式的值，来返回两部分中的其中一个。

其语法格式为：IIf(<测试表达式>, <真值部分>, <假值部分>)例如，求分段函数：函数值的语句可以简单地表示为：y=Iif(x<0,2*x+3,4-3*x)2．Choose函数Choose函数的功能是：从参数列表中选择并返回一个值。

VB选择结构程序设计在VB程序设计中，选择结构是一种常用的程序设计结构，用于根据不同的条件执行不同的代码块。

在本文中，我们将探讨VB选择结构的基本语法和一些实际应用。

选择结构主要有两种形式：IF-THEN和SELECTCASE。

IF-THEN结构是最基本的选择结构，它根据条件的真假来决定是否执行特定的代码块。

它的语法如下：```If condition Then'执行的代码块Else'执行的代码块End If```其中，condition是一个返回布尔值的表达式。

如果condition为True，那么执行if后的代码块；否则执行else后的代码块。

下面是一个简单的例子，根据用户输入的成绩判断是否及格：```vbDim score as Integerscore = InputBox("请输入成绩：")If score >= 60 ThenMsgBox("及格")ElseMsgBox("不及格")End If```SELECTCASE结构类似于多重IF-THEN结构，它根据不同的条件选择执行特定的代码块。

它的语法如下：```Select Case expressionCase value1'执行的代码块Case value2'执行的代码块Case Else'执行的代码块End Select```其中，expression是一个可以返回一个值的表达式。

根据expression的值，选择执行相应的代码块。

Case后跟着的是可以匹配expression的值的值。

如果expression的值与一些Case后的值匹配，那么执行对应的代码块；否则执行Case Else后的代码块。

下面是一个简单的例子，根据用户输入的数字判断是星期几：```vbDim day as Integerday = InputBox("请输入数字（1-7）：")Select Case dayCase 1MsgBox("星期一")Case 2MsgBox("星期二")Case 3MsgBox("星期三")Case 4MsgBox("星期四")Case 5MsgBox("星期五")Case 6MsgBox("星期六")Case 7MsgBox("星期日")Case ElseMsgBox("请输入1-7的数字")End Select```在实际应用中，选择结构经常用于根据用户的选择执行不同的操作。

VB顺序结构与选择结构VB（Visual Basic）是一种事件驱动的、面向对象的高级编程语言，广泛应用于Windows应用程序开发。

在VB中，顺序结构和选择结构是编写程序时经常使用的两种结构。

下面将详细介绍这两种结构。

一、顺序结构顺序结构是指程序的执行按照代码编写的顺序逐行进行。

也就是说，代码从上到下依次执行，不会跳过任何一行。

在VB中，顺序结构是最基本也是最常用的结构。

例如，我们可以编写一个简单的程序来计算并输出两个数的和：```Dim num1 As Integer = 10Dim num2 As Integer = 20Dim sum As Integersum = num1 + num2Console.WriteLine("两个数的和为：" & sum)```在这个程序中，首先定义了两个整数变量`num1`和`num2`，并分别给它们赋值为10和20。

然后，定义了一个整数变量`sum`用来存储两个数的和。

接着，将`num1`和`num2`相加的结果赋值给`sum`，并最后通过`Console.WriteLine`方法将结果输出到控制台。

顺序结构在程序设计中最常用，因为很多时候程序的执行过程就是按照顺序逐行运行的。

下面我们将介绍另一种常用的结构，选择结构。

二、选择结构选择结构是根据条件的结果来选择是否执行段代码。

简单来说，就是根据条件判断来选择程序的执行路径。

在VB中，选择结构通常使用`If...Then...Else...End If`语句来实现。

例如，我们可以编写一个程序来判断一个数是否为正数：```Dim num As Integer = -5If num > 0 ThenConsole.WriteLine("这个数是正数")ElseIf num = 0 ThenConsole.WriteLine("这个数是零")ElseConsole.WriteLine("这个数是负数")End If```在这个程序中，首先定义了一个整数变量`num`，并给它赋值为-5、然后，使用`If...Then...Else...End If`语句来判断`num`的值。

第四章 选择结构程序设计程序设计基本过程①．变量定义②．变量赋值（直接输入、文本框输入、InputBox 函数） ③．问题解决计算过程④．输出计算结果（Print 语句、文本框输出） 运行、调试、修改及完善程序；保存程序。

例[4.9] 编写程序，从键盘上输入三角形的三个边长值，应用下面计算三角形面积的公式求三角形面积。

⑴．定义变量a, b, c ，L ，s⑵．输入三个边长值。

（任两边和大于第三边） ⑶．根据公式求面积：第一步求出半周长L ：L = ( a + b + c ) ／ 2。

第二步求出面积s ：))()((c L b L a L L s ---=⑷．输出三角形面积s 。

程序代码设计Dim a!, b!, c!, L!, s! a = Text1 b = Text2 c = Text3L = (a + b + c) / 2s = Sqr(L * (L - a) * (L - b) * (L - c)) Text4 = s问题：如果出现a+b<c 或 a+c<b 或 b+c<a ，则不能构成三角形，上面程序就会出现错误。

所以要对是否能构成三角形进行判断，可以才能进行计算；否则就不能计算面积。

用选择结构可以很容易处理上面的问题。

程序如下：Dim a!, b!, c!, L!, s! a = Text1 b = Text2 c = Text3if a+b>c And a+c>b And b+c>a then L = (a + b + c) / 2s = Sqr(L * (L - a) * (L - b) * (L - c)) Text4 = sEnd If4.3 选择结构程序设计（条件结构）顺序结构程序：顺序从上到下依次执行语句。

选择结构程序：根据条件的成立与否来分别执行不同的程序语句。

主要有以下几种形式：行结构条件语句If … Then … Else …块结构条件语句If … Then … Else … End If多分支条件语句If … Then … ElseIf … End If多分支选择语句Select Case … End Select。

问题：计算所得税：输入工资。

如果工资少于2000,免收所得税。

如果工资≥2000,所得税为5%。

单击窗体，在窗体上显示工资及所得税的结果。

程序结构：输入、处理、输出。

程序框架：Private Sub Form_Click()分析：设立变量gz代表工资，sj代表所得税；输入工资用InputBox函数，并存入变量gz；输出工资、所得税用Print方法。

程序为：Private Sub Form_Click()Gz=InpueBox("请输入工资", "输入工资")End Sub“如果”、“那么”、“否则”如何实现呢？用程序的控制结构实现。

Vb程序设计选择结构实际上，“如果”、“否则”是程序的一种控制结构。

它的功能是根据条件“工资>=2000”是否成立，决定程序下一步的执行方向是“所得税=工资*0.05”还是“所得税=０”。

这种根据条件的不同结果，选择不同的分支的程序结构，称为“选择结构”或“分支结构”。

它属于程序的控制结构。

结构化程序设计的基本控制结构有３种：(1) 顺序结构：单线条、无分支、不重复、每个语句均有机会执行，且都仅执行一次。

这种结构功能最简单。

(2) 选择结构：即分支结构。

(3) 循环结构：重复执行某块程序若干次。

7.1 选择结构在VB中，选择结构用If语句实现，故选择结构也称If结构。

它有２种格式：单行结构、块结构。

一、单行If语句格式1：If 条件Then 语句1 Else 语句2功能：如果“条件”为True，执行语句1，否则执行语句2。

应用：（计算所得税）If gz>=2000 Then sj=gz*0.05 Else sj=0格式2：If 条件Then 语句1功能：如果“条件”为True，执行语句1，否则什么也不执行，直接执行下一个语句。

应用：（计算所得税）If gz>=2000 Then sj=gz*0.05“条件”：可以是关系表达式（单条件），也可以是逻辑表达式（复合条件）。