VB编程序的基本结构PPT文档格式.ppt

VB编程序的基本结构PPT文档格式.ppt

《VB编程序的基本结构PPT文档格式.ppt》由会员分享，可在线阅读，更多相关《VB编程序的基本结构PPT文档格式.ppt（65页珍藏版）》请在冰豆网上搜索。

,7,3.1.2用户交互函数,为了便于应用程序与用户之间进行信息交互，完成信息的输入和输出，用户可采用文本框、标签等控件来实现，也可用VB.NET提供的InputBox、MsgBox来实现。

InputBox的功能是等待并提示用户为程序运行输入指定的数据，简称“输入对话框”。

MsgBox的功能是进行提示，用以确认某种程序的操作，简称“消息框”。

8,1.InputBox（输入对话框函数）输入对话框一般由标题、提示信息、“确定”按钮、“取消”按钮和一个供用户输入的文本框组成。

当用户将输入信息输入到文本框，并单击“确定”按钮后，函数返回用户输入的字符串数据。

当单击“取消”按钮时，返回一个空字符串。

语法格式：

InputBox（Prompt，Title，Default）,9,例创建一个输入对话框。

如下图所示：

PrivateSubForm1_Click（ByValsenderAsObject,ByValeAsSystem.EventArgs）_HandlesMe.ClickDimmyvalueAsObjectmyvalue=InputBox（请输入数值，数值在13之间！

输入提示,1）EndSub,10,2.MsgBox（消息框）MsgBox函数用于在屏幕上的消息框中显示简短消息，并等待用户单击按钮，然后返回一个整数型的数值，让应用程序了解用户单击的是哪一个按钮。

MsgBox（Prompt，Buttons，Title）功能：

在屏幕上显示一个消息框，根据选择确定其后的操作。

11,当用户单击消息框上的某按钮时，MsgBox函数将返回一个常量来确认该按钮被按动了，下表是按钮和常量之间的对应关系。

通过对返回值的判断，就可以确定消息框中到底是哪个按钮被按动，从而确定程序下一步的运行方式。

表Msgbox函数的可能返回值,12,例在Form1_Click（）事件过程中定义一个消息框，代码如下：

PrivateSubForm1_Click（ByValsenderAsObject,ByValeAsSystem.EventArgs）_HandlesMe.ClickDimsAsIntegers=MsgBox（用户名必须包含数字和字母,5+48,警告）Ifs=vbCancelThenEnd若用户单击取消，则程序退出EndSub单击窗体，将弹出消息框，如图3-5所示。

3.2选择结构,对于要先做判断再选择的问题就要使用分支结构，如下面例子，,分支结构的执行是依据一定的条件选择执行路径，而不是严格按照语句出现的物理顺序。

单分支结构,多行形式If表达式Then语句块EndIf,单行形式If表达式Then语句块,当表达式的值为True，执行Then后面的语句块，否则不做任何操作。

单分支结构,关系表达式：

IfxyThennum1=50:

Msgbox（“你好！

”）If（x+30）*100y）or（num1=num2）Theni=i+1算术表达式If5+3Thenj=j+2Ifnum1+num2*10Thensum=sum-num3,例：

将保存在变量a和b中的整数按升序排列。

（即a的值一定不大于b的值）分析：

ab时，两者的值交换IfbaThent=aa=bb=tEndIf,单分支结构举例,也可改写成行IF语句，如下所示，IfbaThent=a：

a=b：

b=t,1,2,3,双分支结构,多行形式If表达式Then语句块1Else语句块2EndIf,单行形式If表达式Then语句块1Else语句块2当表达式的值为True时，执行Then后面的语句块1，否则执行Else后面的语句块2,If,Then,Else,双分支结构举例,例通过InputBox输入实数x，求下列分段函数f（x）值，最后通过MsgBox输出f（x），其中：

编制事件过程Form1_Click如下：

PrivateSubForm1_Click（ByValsenderAsObject,ByValeAsSystem.EventArgs）_HandlesMe.ClickDimxAsSinglex=Val（InputBox（输入实数x,计算分段函数的值）Ifx=4ThenMsgBox（f（x）=+Str（1-x*x）Else_MsgBox（f（x）=+Str（x-4）0.25）EndSub,思考：

该处续行符能否去掉？

例:

计算当0x10时，y=x，否则y=100,正确的语句是_。

If0x10theny=xelsey=100If0xandx10theny=xelsey=100If0xandx10theny=xelsey=100If0xorx10theny=xelsey=100正确答案：

C,双分支结构练习,多分支结构,不管有几个分支，依次判断，当某条件满足，执行相应的语句，其余分支不再执行；

若条件都不满足，且有Else子句，则执行该语句块，否则什么也不执行。

else,Elseif,Elseif,Then,If,多分支结构举例,语法格式：

If表达式1Then语句块1ElseIf表达式2Then语句块2ElseIf表达式nThen语句块nElse语句块n+1EndIf,例已知变量ch中存放了一个字符，判断该字符是字母字符、数字字符还是其他字符。

IfUCase（ch）=AAndUCase（ch）=0Andch=9ThenMsgBox（ch+是数字字符）ElseMsgBox（ch+是其他字符）EndIf,多分支结构举例,IfbaThenc=a:

a=b:

b=cEndIfIfbcThenx=bElseIfacThenx=cElsex=aEndIfMsgbox（x=“&

x）EndSub,PrivateSubForm1_Click（）Dima,b,c,dAsSingleDimxAsSinglea=100b=20c=1000,x=100,If语句的嵌套是指If或Else后面的语句块中又包含If语句.If表达式1ThenIf表达式2ThenEndIfEndIf,If语句的嵌套,本章目录,Selectcase语句,SelectCase变量或表达式Case表达式列表1语句块1Case表达式列表2语句块2CaseElse语句块n+1EndSelect,表达式列表i必须与“变量或表达式”的类型相同表达式列表i是下面三种形式之一：

1.表达式例:

“A“例：

52.表达式1To表达式2例：

60To100例:

“a”to”z”较小的数值要出现在To之前3.Is表达式（配合关系运算符）例：

Is=304.以上三种形式的以逗号分隔的任意组合枚举值例：

2,4to8,is50,is-7,注意：

变量的类型或表达式的结果必须为数值或字符串。

对于多个变量进行条件判断时，不能使用selectcase语句，只能使用IF语句,将前面的例子改用SelectCase语句实现：

SelectCasechCaseaToz,AToZMsgBox（ch+是字母字符）Case0To9MsgBox（ch&

是数字字符）CaseElseMsgBox（ch+是其他字符）EndSelect,Select语句举例,DimNumber%Number=Val（InputBox（输入整数）SelectCaseNumberCase1To5范围为1,5Msgbox（Between1and5“）Case6,7,8Msgbox（Between6and8“）Case9,10Msgbox（Greaterthan8“）CaseElseMsgbox（Notbetween1and10“）EndSelect,Select语句举例,28,例：

编写程序,当输入X的值后用SelctCase语句计算输出Y的值。

PrivateSubButton1_Click（ByVal_senderAsSystem.Object,ByValeAs_System.EventArgs）Handles_Button1.ClickDimx,yAsSinglex=Val（TextBox1.Text）SelectCasexCaseIs0y=xCaseIs=10y=x*xCaseIs=20y=10CaseElsey=0.5*x+20EndSelectMsgBox（y=&

y）EndSub,格式：

IIf（表达式，TruePart，FalsePart）IIf函数是IfThenElse结构的简洁表示例如，将x，y中大的数，放入Tmax变量中：

Tmax=IIf（xy，x，y）该语句与如下语句等价：

IfxyThenTmax=xElseTmax=y,IIF函数,3.3循环结构,问题1:

求1100之间的奇数之和即计算1+3+5+7+9+。

+97+99变量i：

从1到100之间的奇数和：

变量sum最初设置sum=0第一次：

i的初值为1sum=sum+isum=0+1=1第二次：

i=i+2执行后i=3sum=sum+i执行后sum=4第三次：

i=i+2执行后i=5sum=sum+i执行后sum=9。

直至i=100结束循环执行的语句即循环体：

sum=sum+ii=i+2,3.3循环结构,问题2：

每个月的工资都放在变量pay中；

求12个月的平均工资需要求12个月的总工资sumsum=sum+pay循环次数12次问题1，2循环次数可以预知,采用循环结构程序可以解决一些按一定规则重复执行的问题。

循环结构可以减少源程序重复书写的工作量，用来描述重复执行某段算法的问题。

3.3循环结构,两种常见的循环语句类型：

控制循环次数已知的循环结构For.Next循环语句；

条件型循环语句Do.Loop循环语句,采用循环结构程序可以解决按一定规则重复执行的问题，可以减少源程序重复书写的工作量，用来描述重复执行某段算法的问题。

格式：

For循环控制变量=初值To终值Step步长语句块ExitFor语句块Next循环控制变量,3.3.1FORNext语句,ForNext语句用于循环次数预知的循环结构。

循环控制变量：

数值型，控制循环的次数。

初值、终值、步长：

均为数值型表达式步长可为正数，也可为负数。

步长为负数时，给循环变量赋初值和终值时注意：

初值=终值当步长为1时，可省略Step步长。

FOR循环的执行流程,循环终止条件：

循环变量终值通过ExitFor,FOR循环的执行流程,循环终止条件：

循环变量终值通过ExitFor,FOR语句的循环次数如何计算？