实验四、VB选结构程序设计方案 下载本文

实验四、 选择结构程序设计

实验目的:

1、了解选择结构的结构特点 2、掌握IF条件语句的使用方法 3、掌握Case语句的使用方法 实验内容:

例1、税务部门征收所得税,规定如下(用IF语句实现): ①当收入为200 元以内(含200元)时,免征;

②当收入为 200 ~ 400 元(含400元)时,将超过 200 元的部分纳税 3% ; ③当收入为 400 ~ 5000元(不含5000元)时,将超过 400 元的部分纳税 4% ; ④当收入为 5000 元或5000元以上时,将超过400元的部分纳税5% 。

程序运行后,单击窗体,在输人对话框中输入收入数,程序将输出纳税金额,运行情况如图 4.1 所示。

图4.1

提示:

因为该程序的条件分支较多,故可采用多分支的条件语句进行编写。 多分支条件语句格式如下: If 条件1 Then 语句块1

【ElseIf 条件2 Then 语句块2 】

【ElseIf 条件3 Then 语句块3】 …… 【Else

语句块 n+1】 End If

例 2 将上题用SELECT CASE 多分支结构设计。 提示:Case语句的一般格式为 Select Case 测试表达式

Case 表达式列表1 【语句块1】 【Case 表达式列表1

【语句块1】】 ……

【Case Else 【语句块1】】 End Select

【上机参考练习题】

要求: 利用空余时间设计调试出来,并将设计方法及代码写入实验报告。

1.(基本设计题) 在购买某物品时,若所花的的钱 x 在下述范围内,所付钱 Y 按对应折扣支付: 提示:此例可以多分支结构或者选择结构实现,注意计算公式和条件表达式的正确书写。

图4.2

2.(基本设计题)编一程序根据上网时间计算上网费用,同时为了鼓励多上网,每月收费最多不超过 150 元。计算的方法如下:

图 4.3

提示:此题用可以用多分支结构或者选择结构实现,但请特别注意有个条件“每月收费最多不超过 150 元”

3.(基本设计题)输入一个数字 (1-7) ,用英文显示对应的星期一到星期日。 提示:用 Select Case语句来实现。

4.(提高设计题)编一模拟袖珍计算器的完整程序,界面如图4.4 所示。要求:输入两个操作数和一个操作符,根据操作符决定所做的运算。 提示:

(1) 为了程序运行正确,对存放操作符的文本框 Text3 ,应使用 trim(Text3) 函数,去除运算符两边的空格。

(2) 根据存放操作符的文本框利用 Select Case 语句实现。

图4.4

5.(提高设计题)某市公用电话收费标准如下:通话时间在 3 分钟以下,收费 0.50 元; 3 分钟以上,则每超过 1分钟加收 0.152元。

提示:此例用分支结构实现,注意判断时间范围。

实验报告:

1. 从1/2/3题中任选一题。(必做题) 2. 从4/5题中任选一题。(选作题)