第4章语句与控制结构.docVIP

第四章 语句与控制结构 练习一、交互函数??? 目的??? 1、熟悉VB交互函数及语句（过程）的用法??? 2、掌握InputBox函数的用法，学会利用InputBox函数从用户获取信息??? 3、掌握MsgBox函数和语句的用法，学会利用MsgBox语句提示信息，用MsgBox函数提示信息并获取用户的响应一、新建一个工程，用“第四章练习一（1）”命名工程和窗体，保存在自己的目录中，在其窗体上添加一个命令按钮，要求用户单击该命令按钮时提示用户输入其姓名，然后在窗体上打印该姓名??? 提示??? 1、InputBox函数的语法如下??? 返回值=InputBox(提示信息[,对话框标题][,默认值])??? 其中“返回值”、“提示信息”和“对话框标题”均为字符串类型，如果用户单击对话框的“确定”按钮，则“返回值”等于用户在对话框的文本框中输入的文字，如果单击“取消”???“返回值”等于空值（）??? 2、该程序需响应命令按钮的单击（Click）事件，参考代码如下??? Dim s As String??? s = InputBox(请输入您的姓名,输入姓名,您的姓名)???? Print s二、修改上面的程序，将原来打印到窗体上的信息用MsgBox语句提示给用户??? 提示??? 1、由于只要求提示信息而不要求获取用户的响应，因此需使用MsgBox语句，语法如下??? MsgBox 提示信息,按钮和图标,对话框标题??? 其中“提示信息”和“对话框标题”均为字符串类型，按钮和图标的取值可参见“MsgBox函数的使用”??? 2、修改后的代码如下??? Dim s As String??? s = InputBox(请输入您的姓名,输入姓名,您的姓名)??? MsgBox 您的姓名为： s ,vbInformation + vbOKOnly,您的姓名三、新建一个工程，用“第四章练习一（3）”命名工程和窗体，保存在自己的目录中，编写程序，单击命令按钮可以显示消息对话框，对话框上的文本为“今天你快乐吗？”，标题为“是否快乐”，有“是”、“否”和“取消”三个按钮，对话框带有“？”图标，将用户回答的按钮值打印在窗体上??? 提示??? 1、由于要求从用户获取其对对话框的响应，因此需使用MsgBox函数，语法如下??? 返回值 = MsgBox (提示信息,按钮和图标,对话框标题)??? 其中“提示信息”和“对话框标题”均为字符串类型，按钮和图标的取值可参见“MsgBox函数的使用”，“返回值”是整型，其值由用户的响应决定??? 2、参考代码如下??? Dim r As Integer??? r = MsgBox(今天你快乐吗？,vbQuestion + vbYesNoCancel,是否快乐)??? Print r 练习二、If条件选择结构??? 目的??? 1、熟悉和掌握If语句三种形式的语法规则??? 2、学会用If语句编写简单的条件选择结构一、新建一个工程，用“第四章练习二（1）”命名工程和窗体，保存在自己的目录中，用“If...Then...Else”语句编写程序，首先提示用户输入分数，根据用户输入的分数判断是否“及格”（分数大于等于60），将结果打印在窗体上??? 提示??? 1、用“变量=InputBox()”获取用户输入的分数??? 2、If...Then...Else的语法为：??? If 条件表达式 Then????? 语句序列1??? [Else????? 语句序列2]??? End If??? 3、条件表达式为：变量=60??? 4、程序的参考代码如下??? Dim Score As Integer??? Score = InputBox(请输入您的分数,输入分数)???? If Score = 60 Then????? Print 恭喜您，您及格了！:)??? Else????? Print 很抱歉，您没有及格！:(??? End If二、新建一个工程，用“第四章练习二（2）”命名工程和窗体，保存在自己的目录中，用“If...Then...Else”语句编写程序，提示用户输入密码，如果输入的密码正确则在窗体上打印“密码输入正确”，否则在窗体上打印“密码输入不正确”（正确密码为：hello）??? 提示??? 1、用“变量=InputBox()”提示用户输入密码??? 2、条件表达式为：变量=hello??? 3、代码可参考上一题的代码三、新建一个工程，用“第四章练习二（3）”命名工程和窗体，保存在自己的目录中，用“If...Then...ElseIf”语句编写程序，首先提示用户输入分数