vb 第四章 顺序分支与循环结构

《vb 第四章 顺序分支与循环结构》由会员上传分享，免费在线阅读，更多相关内容在教育资源-天天文库。

1、第四章基本的控制结构4.1顺序结构4.2选择结构4.3循环结构4.4其它辅助控制语句4.5常用算法（一）4.6常见错误（顺序、条件、循环）4.1顺序结构一.赋值语句P96形式:[LET]变量名＝表达式作用:将表达式的值赋值给变量名.一般用于给变量赋值或对控件设定属性值.例:sRate!=0.1Text1.Text＝"欢迎使用VisualBasic6.0”当表达式的类型与变量的类型不一致时,强制转换成左边的精度iA%=10/3iA中的结果为3注意：错误的赋值语句二.与用户交互函数和过程1.InputBox函数P80InputBox(

2、提示[，标题][，缺省][，x坐标位置][，y坐标位置])其中:提示提示信息，标题对话框标题，缺省输入区缺省值函数返回字符类型.注意多行提示信息的显示方法:DimstrNameAsString*40strName=InputBox(“请输入你的姓名”+vbCrLf+“然后单击确定”,“输入框”)也可以使用如下语句：DimstrNameAsString*40，strS1AsString*40strS1=“请输入你的姓名”+Chr(13)+Chr(10)+“然后单击确定”strName=InputBox(strS1，“输入框”，，10

3、0，100)当键盘输入“王晓明”后，变量strName获得键盘输入的值.2.MsgBox函数和MsgBox过程P81函数形式:变量[%]=MsgBox(提示[,按钮][，标题])过程形式:MsgBox提示[,按钮][,标题]按钮值如下:函数返回所选按钮整数值:例4.1编一帐号和密码检验程序。要求:帐号不超过6位数字,有错,清除原内容再输入.密码输入时在屏幕上以“*”代替;若密码错，显示有关信息，选择“重试”按钮，清除原内容再输入，选择“取消”按钮，停止运行。分析:帐号6位,MaxLength为6,LostFocus判断数字IsNu

4、meric函数密码PassWordChar为“*”,MsgBox函数设置密码错对话框.常见错误数据合法性检查中引起程序的死循环PrivateSubText1_LostFocus()IfNotIsNumeric(Text1)Thenmsgbox“请输入正整数"Text1=""Text1.SetFocusEndIfEndSubPrivateSubText2_LostFocus()IfNotIsNumeric(Text2)Thenmsgbox“请输入正整数"Text2=""Text2.SetFocusEndIfEndSubIfText2

5、<>""AndNotIsNumeric(Text2)当年龄框中输入非字符串，并按下Tab键时。就会出现循环的错误提示。例4-1-12009-3-224.2选择结构1.If…Then语句(单分支结构)P100If<表达式>Then语句块EndIf或If<表达式>Then<语句>例:已知两个数x和y，比较它们的大小，使得x大于y.Ifx0T

6、heny=sin(x)+sqr(x*x+1)例如：计算分段函数思考：如果上面的两个语句换一下顺序即:Ifx<>0Theny=sin(x)+sqr(x*x+1)y=cos(x)－x^3+3*x会是什么结果？2.If…Then…Else语句(双分支结构)P101If<表达式>Then<语句块1>Else<语句块2>EndIf也可以写为一行，格式为：If<表达式>Then<语句1>Else<语句2>双分支结构实现:Ifx<>0Theny=sin(x)+sqr(x*x+1)Elsey=cos(x)－x^3+3*xEndIf3．If语句的嵌

7、套P102If语句的嵌套是指If或Else后面的语句块中又包含If语句。形式如下：If<表达式1>ThenIf<表达式11>Then…EndIf…EndIf例4.4已知x，y，z三个数，使得x>y>z用一个IF语句和一个嵌套的IF语句实现IfxThen<语句块1>

8、ElseIf<表达式2>Then<语句块2>…[Else语句块n+1]EndIf例如：成绩小于60吗，否的话小于70吗，……例4.2已知变量strC中存放了一个字符，判断该字符是字母字符、数字字符还是其他字符。注：Ucase()小写变大写，Lcas