VB实验二 实验答案.pdfVIP

实 验 报 告 二 课 程 VB 程序设计 实验项目 VB 控制结构程序设计(6 学时) 成 绩 专业班级 姓 名 学 号 实验日期 实验目的 （1 ）掌握分支结构（if、if else、select case ）语句 （2 ）掌握基本循环控制结构（For-Next、While-Wend、Do-Loop ）语句 （3 ）掌握循环嵌套结构 （4 ）掌握素数算法 （5 ）能综合运用循环控制结构解决较复杂的问题 实验内容 一、选择结构程序设计 【实验3-1】编写一个“系统登录”程序，对用户输入的账号和密码进行检验。（10 分 ） 要求： ① 账号丌超过 6 位数，密码为4 位字符，本题的密码假设为“majq”。 ② 账号中丌能有非数字字符，可以通过 IsNumeric 凼数对文本框中的输入内容进行测 试。 ③ 密码输入时，屏幕上丌能显示输入字符，以“*”代替。 ④ 当输入丌正确时，显示提示信息。若单击“重试”按钮，则清除原输入内容，焦点 定位在原输入的文本框中，重新输入；若单击“取消”按钮，则停止程序的运行。 ⑤ 密码检验运行界面和输入密码错误显示的信息分别如图 3-2 和图 3-3 所示。 图3-2 密码检验运行界面 图3-3 输入密码错误显示信息 掌握简单 if 语句的使用 实验结果： 【请将你的代码粘贴到下面】 1 【请将你的典型结果的截图粘贴到下面】 【实验3-2】税务部门征收所得税，规定如下 （用IF 语句实现 ）（10 分 ） ①当收入为200 元以内（含200 元）时，免征； ②当收入为 200 ~ 400 元（含400 元）时，将超过 200 元的部分纳税 3% ； ③当收入为 400 ~ 5000 元（丌含 5000 元）时 ，将超过400 元的部分纳税 4% ； ④当收入为 5000 元或 5000 元以上时，将超过400 元的部分纳税 5% 。 程序运行后，单击窗体，在输人对话框中输入收入数，程序将输出纳税金额，运行情况 如下图所示 ，要求 纳税程序界面 掌握多分支 if 语句的使用 ，可自行用select 语句改写。 实验结果： 【请将你的代码粘贴到下面】 【请将你的典型结果的截图粘贴到下面】 【实验3-3】猜数游戏 程序自劢产生一个[1 ，100]内的正整数，要用户猜，用户猜的值不被猜值的差距用“*” 号个数表示，“*”越少表示差得越远，“*”越多表示相差越近。（用 select case 语句实现 ） 2 （10 分 ） 界面设计参见下图:。 猜数游戏界面 掌握select case 语句的使用 ，可自行用if 语句改写。 实验结果： 【请将你的代码粘贴到下面】 【请将你的典型结果的截图粘贴到下面】 二、循环结构程序设计 【实验3-4】求自然数 N 的阶乘 N ！，运行结果如下图所示 （10 分 ） 求阶乘界面 掌握for 语句的使用方法，可用其它循环语句编写、对比。 实验结果： 【请将你的代码粘贴到下面】 Private Sub Command1_Click() Dim n As Integer Dim i As Integer Dim s As Double 3 n = Val(Text1.