- 1、本文档共3页,可阅读全部内容。
- 2、有哪些信誉好的足球投注网站(book118)网站文档一经付费(服务费),不意味着购买了该文档的版权,仅供个人/单位学习、研究之用,不得用于商业用途,未经授权,严禁复制、发行、汇编、翻译或者网络传播等,侵权必究。
- 3、本站所有内容均由合作方或网友上传,本站不对文档的完整性、权威性及其观点立场正确性做任何保证或承诺!文档内容仅供研究参考,付费前请自行鉴别。如您付费,意味着您自己接受本站规则且自行承担风险,本站不退款、不进行额外附加服务;查看《如何避免下载的几个坑》。如果您已付费下载过本站文档,您可以点击 这里二次下载。
- 4、如文档侵犯商业秘密、侵犯著作权、侵犯人身权等,请点击“版权申诉”(推荐),也可以打举报电话:400-050-0827(电话支持时间:9:00-18:30)。
查看更多
实验四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/2/3题中任选一题。(必做题)
从4/5题中任选一题。(选作题)
文档评论(0)