2019 VB编程序的基本结构ppt课件.ppt

《2019 VB编程序的基本结构ppt课件.ppt》由会员上传分享，免费在线阅读，更多相关内容在教育资源-天天文库。

1、第3章程序的基本结构程序开发的两步程序基本控制结构（三种）3.1顺序结构顺序结构的程序设计是最简单的，只要按照解决问题的顺序写出相应的语句就行。顺序结构就是各语句按出现的先后次序执行顺序结构可以独立使用构成一个简单的完整程序，常见的输入、计算，输出三部曲的程序就是顺序结构，例如计算圆的面积。语法格式：变量名=表达式3.1.1赋值语句功能:计算赋值号“=”右边表达式的值，然后赋给赋值号“=”左边的变量。给变量赋值和设定属性是VB编程中常见的两个任务如以下语句，n=n+1'计数累加Label1.Text＝"欢

2、迎使用VB"6以下语句形式很常用：dimsum%,x%sum=100:x=5sum=sum+x‘执行后，sum的值为多少？dimn%n=7n=n+1‘执行后，n的值为多少？73.1.2用户交互函数为了便于应用程序与用户之间进行信息交互，完成信息的输入和输出，用户可采用文本框、标签等控件来实现，也可用VB.NET提供的InputBox、MsgBox来实现。InputBox的功能是等待并提示用户为程序运行输入指定的数据，简称“输入对话框”。MsgBox的功能是进行提示，用以确认某种程序的操作，简称“消息框”。

3、81.InputBox（输入对话框函数）输入对话框一般由标题、提示信息、“确定”按钮、“取消”按钮和一个供用户输入的文本框组成。当用户将输入信息输入到文本框，并单击“确定”按钮后，函数返回用户输入的字符串数据。当单击“取消”按钮时，返回一个空字符串。语法格式：InputBox(Prompt[，Title][，Default])9例创建一个输入对话框。如下图所示：PrivateSubForm1_Click(ByValsenderAsObject,ByValeAsSystem.EventArgs)_Handl

4、esMe.ClickDimmyvalueAsObjectmyvalue=InputBox("请输入数值，数值在1~3之间！","输入提示","1")EndSub102.MsgBox（消息框）MsgBox函数用于在屏幕上的消息框中显示简短消息，并等待用户单击按钮，然后返回一个整数型的数值，让应用程序了解用户单击的是哪一个按钮。语法格式：MsgBox(Prompt[，Buttons][，Title])功能：在屏幕上显示一个消息框，根据选择确定其后的操作。11当用户单击消息框上的某按钮时，MsgBox函数将返回

5、一个常量来确认该按钮被按动了，下表是按钮和常量之间的对应关系。通过对返回值的判断，就可以确定消息框中到底是哪个按钮被按动，从而确定程序下一步的运行方式。符号常量值用户单击的按钮vbOK1“确定”vbCancel2“取消”vbAbort3“中止”vbRetry4“重试”vbIgnore5“忽略”vbYes6“是””vbNo7“否”表Msgbox函数的可能返回值12例在Form1_Click（）事件过程中定义一个消息框，代码如下：PrivateSubForm1_Click(ByValsenderAsObjec

6、t,ByValeAsSystem.EventArgs)_HandlesMe.ClickDimsAsIntegers=MsgBox("用户名必须包含数字和字母",5+48,"警告")Ifs=vbCancelThenEnd'若用户单击"取消"，则程序退出EndSub单击窗体，将弹出消息框，如图3-5所示。3.2选择结构对于要先做判断再选择的问题就要使用分支结构，如下面例子，分支结构的执行是依据一定的条件选择执行路径，而不是严格按照语句出现的物理顺序。单分支结构多行形式If表达式Then语句块EndIf单行形式

7、If表达式Then语句块表达式语句块TF当表达式的值为True，执行Then后面的语句块，否则不做任何操作。单分支结构关系表达式：Ifx>yThennum1=50:Msgbox（“你好！”）If(x+30)*100<=(y^20)thennum2=num5逻辑表达式IfaAndbThennum2=num3：k＝k+1IfnotxThensum=sum+mark:i=i+1If(x>y)or(num1<=num2)Theni=i+1算术表达式If5+3Thenj=j+2Ifnum1+num2*10Thens

8、um=sum-num3例：将保存在变量a和b中的整数按升序排列。（即a的值一定不大于b的值）分析：ab时，两者的值交换Ifb>aThent=aa=bb=tEndIf单分支结构举例也可改写成行IF语句，如下所示，Ifb>aThent=a：a=b：b=t123双分支结构多行形式If表达式Then语句块1Else语句块2EndIf单行形式If表达式Then语句块1Else语句块2当表达式的值为True时，执行T