欢迎来到天天文库
浏览记录
ID:50029638
大小:451.00 KB
页数:28页
时间:2020-03-07
《Visual_Basic语言程序设计教程 教学课件 作者 周冰 邓娟 刘芳第5章选择结构.ppt》由会员上传分享,免费在线阅读,更多相关内容在教育资源-天天文库。
1、第5章选择结构本章的学习要点If语句的分类If…Then结构If…Then…Else结构多分支If结构:If…Then…ElseIf和If嵌套语句SelectCase结构5.1If语句If语句可以分为如下几类:If语句If…Then结构IIf函数多分支If结构If…Then…ElseIf结构If嵌套If…Then…Else结构If语句If…Then结构语法格式:功能:如果表达式的值为真(True),执行Then后的语句块内容;否则不执行语句块内容。说明:表达式可以是:关系表达式、逻辑表达式、算术表达式。
2、若为算术表达式,值为0则为假,非0则为真。如果是单行If格式,所有的代码必须写在同一行中,绝对不能换行。如果是块If语句,各语句块必须独占一行,EndIf不能省略。语句块若是一条语句,可用单行If结构;为多条语句,则采用块If结构较好。当然也可以采用单行If格式,这时各语句必须在同一行中且用":"分隔,且不能出现EndIf。If表达式Then语句块EndIfIf表达式Then语句块5.1If语句例5.1输入两个数,输出较大的数。分析:本题由用户输入两个数,经计算机判断后将较大数输出,即有两个输入量和一个
3、输出量。所以需要两个文本框接受用户输入,可以采用标签框来实现数据的输出。界面设计:5.1If语句例5.1输入两个数,输出较大的数。属性设置:对象属性属性值LabelNameLabel1Caption请输入数1:LabelNameLabel2Caption请输入数2:LabelNameLabel3Caption空白BackColor粉红色TextBoxNameText1Text空白TextBoxNameText2Text空白CommandButtonNameCommand1Caption较大值Comman
4、dButtonNameCommand2Caption退出5.1If语句例5.1输入两个数,输出较大的数。编写代码:PrivateSubCommand1_Click()DimmaxAsSingleDimminAsSinglemax=Val(Text1.Text)min=Val(Text2.Text)Ifmax5、x=val(text1.text)min=val(text2.text)结束Label3.Caption="较大值为"&max注意:块if语句中的endif能否省略?DimmaxAsSingleDimminAsSinglemax=Val(Text1.Text)min=Val(Text2.Text)Ifmax6、1If语句If语句If…Then…Else结构语法格式:功能:该结构用于解决"二选一"的问题。当表达式的值为真,执行语句块1的语句内容;否则执行语句块2的语句内容。说明:表达式最终的值必须为逻辑值,即取值为真或假。若语句块1和语句块2都是单条语句,可采用单行If格式,否则采用块If语句。跟If…Then不同,该结构中即使表达式值为假,也有语句块2的内容可被执行。If表达式Then语句块1Else语句块2EndIfIf表达式Then语句块1Else语句块25.1If语句例5.2编写一个程序,实现当用户输入7、的用户名和口令都正确时显示"欢迎登录"的消息对话框,当用户名或口令有错误时显示消息对话框报告错误。分析:本题需要两个文本框分别保存用户输入的用户名和口令,一个"登录"按钮,一个"退出"按钮。当输入的用户名和口令与正确的相符时显示"合法用户",当不相符时显示"非法用户",所以应当采用If…Then…Else结构来实现。界面设计:5.1If语句5.1If语句例5.2编写一个程序,实现当用户输入的用户名和口令都正确时显示"欢迎登录"的消息对话框,当用户名或口令有错误时显示消息对话框报告错误。编写代码:Priv8、ateSubCommand1_Click()DimuserAsStringDimpswAsStringuser=Text1.Textpsw=Text2.TextEndSubTF用户名和口令正确吗?显示"欢迎"消息框显示"错误"消息框Ifuser="SYL"Andpsw="123456"ThenMsgBox("欢迎您登录本系统!")ElseMsgBox("您的用户名或口令有误,请重新输入!")EndIfIf语句IIf函数语法格式:功能:当条件
5、x=val(text1.text)min=val(text2.text)结束Label3.Caption="较大值为"&max注意:块if语句中的endif能否省略?DimmaxAsSingleDimminAsSinglemax=Val(Text1.Text)min=Val(Text2.Text)Ifmax6、1If语句If语句If…Then…Else结构语法格式:功能:该结构用于解决"二选一"的问题。当表达式的值为真,执行语句块1的语句内容;否则执行语句块2的语句内容。说明:表达式最终的值必须为逻辑值,即取值为真或假。若语句块1和语句块2都是单条语句,可采用单行If格式,否则采用块If语句。跟If…Then不同,该结构中即使表达式值为假,也有语句块2的内容可被执行。If表达式Then语句块1Else语句块2EndIfIf表达式Then语句块1Else语句块25.1If语句例5.2编写一个程序,实现当用户输入7、的用户名和口令都正确时显示"欢迎登录"的消息对话框,当用户名或口令有错误时显示消息对话框报告错误。分析:本题需要两个文本框分别保存用户输入的用户名和口令,一个"登录"按钮,一个"退出"按钮。当输入的用户名和口令与正确的相符时显示"合法用户",当不相符时显示"非法用户",所以应当采用If…Then…Else结构来实现。界面设计:5.1If语句5.1If语句例5.2编写一个程序,实现当用户输入的用户名和口令都正确时显示"欢迎登录"的消息对话框,当用户名或口令有错误时显示消息对话框报告错误。编写代码:Priv8、ateSubCommand1_Click()DimuserAsStringDimpswAsStringuser=Text1.Textpsw=Text2.TextEndSubTF用户名和口令正确吗?显示"欢迎"消息框显示"错误"消息框Ifuser="SYL"Andpsw="123456"ThenMsgBox("欢迎您登录本系统!")ElseMsgBox("您的用户名或口令有误,请重新输入!")EndIfIf语句IIf函数语法格式:功能:当条件
6、1If语句If语句If…Then…Else结构语法格式:功能:该结构用于解决"二选一"的问题。当表达式的值为真,执行语句块1的语句内容;否则执行语句块2的语句内容。说明:表达式最终的值必须为逻辑值,即取值为真或假。若语句块1和语句块2都是单条语句,可采用单行If格式,否则采用块If语句。跟If…Then不同,该结构中即使表达式值为假,也有语句块2的内容可被执行。If表达式Then语句块1Else语句块2EndIfIf表达式Then语句块1Else语句块25.1If语句例5.2编写一个程序,实现当用户输入
7、的用户名和口令都正确时显示"欢迎登录"的消息对话框,当用户名或口令有错误时显示消息对话框报告错误。分析:本题需要两个文本框分别保存用户输入的用户名和口令,一个"登录"按钮,一个"退出"按钮。当输入的用户名和口令与正确的相符时显示"合法用户",当不相符时显示"非法用户",所以应当采用If…Then…Else结构来实现。界面设计:5.1If语句5.1If语句例5.2编写一个程序,实现当用户输入的用户名和口令都正确时显示"欢迎登录"的消息对话框,当用户名或口令有错误时显示消息对话框报告错误。编写代码:Priv
8、ateSubCommand1_Click()DimuserAsStringDimpswAsStringuser=Text1.Textpsw=Text2.TextEndSubTF用户名和口令正确吗?显示"欢迎"消息框显示"错误"消息框Ifuser="SYL"Andpsw="123456"ThenMsgBox("欢迎您登录本系统!")ElseMsgBox("您的用户名或口令有误,请重新输入!")EndIfIf语句IIf函数语法格式:功能:当条件
此文档下载收益归作者所有