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