实验五选择结构程序设计

《实验五选择结构程序设计》由会员上传分享，免费在线阅读，更多相关内容在行业资料-天天文库。

1、实验五选择结构程序设计一、实验目的1.掌握逻辑表达式的正确书写形式。2.掌握If…Then语句（单分支）、If…Then…Else语句（双分支）、If…Then…ElseIf语句（多分支）及If语句嵌套程序设计。3.掌握SelectCase语句程序设计二、实验内容1.用If…Then语句及其嵌套实现三个数字的排序。2.用If…Then、If…Then…Else语句检查用户名和密码，进行用户登录检测。3.制作一个摇奖机，用If…Then…Else语句使其中的摇奖按钮成为摇奖机的开关按钮。4.综合运用If…Then、If…Then…Else、If…Th

2、en…ElseIf语句和SelectCase语句编制算术考试程序。三、实验步骤及指导1.三值排序程序运行时，在三个文本框中输入数字，单击“排序”按钮后按从大到小排序。（1）设计界面及设置属性在窗体上放置三个文本框，Text属性均设为空。添加四个标签，Caption属性分别设为“请输入三个数字：”、“x”、“y”、“z”。添加三个命令按钮，Caption属性分别为“排序”、“清除”、“退出”。界面布局如图5-1所示。（2）编写代码在“排序”按钮的单击事件中，将三个文本框中的数字分别赋予三个变量x、y、z，用If语句判断其大小，根据排序要求确定变量中的

3、数据是否需要交换。若需交换，则借助中间变量t进行。这是两个变量进行数据交换最常用的算法。例如，以下语句可以完成x和y之间的数据交换：t=x:：x=y：y=t排序完成后，用窗体的Print方法在窗体上显示排序结果。程序运行结果如图5-1所示。图5-1三值排序程序代码如下：OptionExplicitPrivateSubCommand1_Click()'x、y、z用于存放在文本框中输入的数字DimxAsSingle,yAsSingle,zAsSingleDimtAsSingle't作为中间变量，用于x、y、z之间的数据交换x=Val(Text1.Tex

4、t)'将文本框中的数字分别赋予变量y=Val(Text2.Text)z=Val(Text3.Text)Ifxyt=x:x=y:y=tEndIfIfyzt=y:y=z:z=tIfx

6、户登录检测在各种管理信息系统的用户登录界面，一般需要进行用户名和密码的双重检测，并且规定了出错的最多次数。本实验项目要求设计一个用户登录检测程序，若用户输入的用户名和密码均无误，显示“欢迎使用本系统”，否则提示用户名或密码错误，请用户重新输入。若用户名或密码连续三次输入错误，则提示“对不起，您不是本系统的合法用户”。按照信息服务用户管理的常规，应当先对用户名进行检测（用户名具有惟一性），若用户名输入正确，则不再要求用户重复输入用户名，仅检查密码即可，这样做也符合界面友好的原则。程序运行效果如图5-2所示。(a)输入用户名和密码(b)登录成功(c)用

7、户名错误(d)密码错误图5-2用户登录检测（1）设计界面及设置属性在窗体上放置两个文本框，分别命名为txtUserID和txtPassword，Text属性均设为空。添加三个标签，Caption属性分别设为“请输入用户名和密码”、“用户名”、“用户密码”。添加两个命令按钮，Caption属性分别为“确定”、“退出”。界面布局如图5-2(a)所示。（2）编写代码在“确定”按钮的单击事件中，检测用户在文本框中输入的用户名和密码。用If语句判断其正误，根据判断结果显示相应的信息。若用户输入有误，除提示出错信息外，应将焦点返回出错的文本框，并且反相显示出错

8、内容。程序代码如下：OptionExplicitPrivateSubcmdExit_Click()'退出UnloadMeE