当前位置:文档之家› 实验四、VB 选择结构程序设计

实验四、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题中任选一题。

(选作题)。

相关主题