已阅读5页,还剩13页未读, 继续免费阅读
版权说明:本文档由用户提供并上传,收益归属内容提供方,若内容存在侵权,请进行举报或认领
文档简介
Vb选择结构程序设计,猜价格游戏,猜价格游戏代码,语句1.如果价格小于120,那么信息提示框提示“猜低了,再试试”,语句2.如果价格大于120,那么信息提示框提示“猜高了,再试试”,If price 120 Then MsgBox “猜高了,再试试“ If price = 120 Then MsgBox “猜对了,你真厉害“,语句3.如果价格等于120,那么信息提示框提示“猜对了,你真厉害”,选择结构就是在程序运行时,对程序的走向进行选择,以便决定 执行哪种操作.,If price 120 Then MsgBox “猜低了,再试试“,开始,结束,Price120?,猜低了,再试试,真,假,Ifthen的流程图,判断条件,这种只对条件满足时的情况进行处理,我们称为选择结构中的单分支结构。,单分支语法格式,单分支语法格式:,单行语法,多行语法,(1)If Then (2)If Then End If,这里的表达式是关系表达式(、=、=)或逻辑表达式(and、or、not),其值只有真或假两种,当表达式的值为真时,视为条件成立。例如:price120属于什么表达式? 语句可以是赋值语句(a=3)、输出语句(print、msgbox)、结束语句(end)等。,If price = 120 Then MsgBox “猜对了,你真厉害“ If price 120 Then MsgBox “猜高了,再试试“,If price =120 then MsgBox “猜对了,你真厉害“ Else MsgBox “猜错了,再试试“,If price = 120 Then MsgBox “猜对了,你真厉害“ If price 120 Then MsgBox “猜错了,再试试“,三个单分支,两个单分支,一个双分支,语法之间的转换,(1)If Then Else (2)If Then Else End If,双分支语法格式:,注意:在if语句中else部分不需要填写表达式,条件满足,条件不满足,双分支语法格式,开始,结束,判断条件,语句块,真,假,开始,结束,判断条件,语句块1,真,假,语句块2,单分支结构,双分支结构,单分支结构只对判断条件为真的情况进行处理,双分支结构既对判断条件 为真的情况进行处理,同时也对判断条件为假的情况进行处理,所以双分 支结构也就多了else部分的内容。,对比分析,完善程序代码,界面介绍,双击打开窗体文件,扩展名为frm,双击此文件夹,在右边工程资源管理器中双击form1,双击确定按钮,在此处输入代码,点击关闭,调试,运行,If price 150 Then MsgBox “猜高了,再试试“ If price = 150 Then MsgBox “猜对了,你真厉害“,If price =150 then MsgBox “猜对了,你真厉害“ Else MsgBox “猜错了“ End if,改写程序,参考下面的程序,150元为mp3的价格,可以是单分支,也可以是双分支。,三个单分支,双分支,If price = 150 Then MsgBox “猜对了,你真厉害“ If price 150 Then MsgBox “猜错了,再试试“,两个单分支,在线测试练习,1语句If x=1 Then y=1,下列说法正确的是(C )。 A、x=1和 y=1 均为赋值语句 B、x=1和 y=1均为关系表达式 C、x=1为关系表达式,y=1为赋值语句D、x=1为赋值语句,y=1为关系表达 2. 2.电梯的最大容量为13人,在此范围内电梯能正常运行,超出了这个范围电梯将发出警报。(C) Dim a as integer a=val(inputbox(“请输入进入电梯的人数”) if a=13 then print “正常运行” else print “发出警报” end if A.if.thenend ifelse B.thenifelseend if C.ifthenelseend if D.ifelsethenend if,3.以下程序段运行后,分别输入5和6,则输出字符的排列顺序是( B ) I=val(inputbox(“请输入I的值”) If I 6 then Print “#” ; Else Print “*” End if A.*# B.#* C.# D.*,在线测试练习,在vb程序中把代码补充完整并调试运行,得出结果后再选择答案 。 4.走路可以减肥,平地甩手走20分钟内(含20分钟)消耗的能量为6卡每分钟,超过20分钟消耗的能量为7.9卡每分钟。走路的分钟数43分钟,输出共消耗的能量。(D) Dim t,n as single t=val(inputbox(“请输入t的值”) if t=20 then n=6*t else n=6*20+(t-20)*7.9 end if print “n=”;n A258卡 B.339.
温馨提示
- 1. 本站所有资源如无特殊说明,都需要本地电脑安装OFFICE2007和PDF阅读器。图纸软件为CAD,CAXA,PROE,UG,SolidWorks等.压缩文件请下载最新的WinRAR软件解压。
- 2. 本站的文档不包含任何第三方提供的附件图纸等,如果需要附件,请联系上传者。文件的所有权益归上传用户所有。
- 3. 本站RAR压缩包中若带图纸,网页内容里面会有图纸预览,若没有图纸预览就没有图纸。
- 4. 未经权益所有人同意不得将文件中的内容挪作商业或盈利用途。
- 5. 人人文库网仅提供信息存储空间,仅对用户上传内容的表现方式做保护处理,对用户上传分享的文档内容本身不做任何修改或编辑,并不能对任何下载内容负责。
- 6. 下载文件中如有侵权或不适当内容,请与我们联系,我们立即纠正。
- 7. 本站不保证下载资源的准确性、安全性和完整性, 同时也不承担用户因使用这些下载资源对自己和他人造成任何形式的伤害或损失。
最新文档
- JJF 2464-2026可吸附有机卤素测定仪校准规范
- T/SHBX 053-2025全生物降解食品接触用一次性手套
- T/PPZL 039-2025黄河流域内蒙古段草地生态系统服务价值评估技术规程
- T/CECCEDA 8-2026人工智能 数据资产可信流通管理框架
- T/CHASA 017-2024家电上门服务全流程用户体验评价规范
- T/CSMT-YB 018-2026γ射线成像探测系统检测规范
- GB/T 591-2026船用法兰铸铁截止止回阀
- 2025~2026学年河北省廊坊市校联考冀教版六年级上册第三次月考数学试卷【附答案】
- 江苏省新沂市度第二期期2027届数学七上期末联考模拟试题含解析
- PHP工程师经典面试题(含详细答案解析)
- 2026年新版gcp考试题库及答案pdf
- 小学四年级道德与法治教学设计:单元整体教学视域下《反对浪费》大单元实践探索
- 精神卫生行业精神科医师精神诊疗规范手册(执行版)
- 2026年10月自考04842产品系统化设计押题及答案(北京)
- E三相异步电动机的运行维护与故障处理
- GJB3243A-2021电子元器件表面安装要求
- 以诺书999中英对照
- 全国职业院校技能大赛高职组(直播电商赛项)备赛试题库(含答案)
- (正式版)HG∕T 20644-2024 弹簧支吊架选用标准
- HGT 4205-2024《工业氧化钙》规范要求
- 铜锌锡硫硒半导体薄膜制备方法概述
评论
0/150
提交评论