Vb 程序的选择结构select case结构.ppt
-
资源ID：70754349
资源大小：208.50KB
全文页数：7页
- 资源格式： PPT
下载积分：16金币
快捷下载
会员登录下载
微信登录下载
三方登录下载：
微信扫一扫登录
|
友情提示
2、PDF文件下载后，可能会被浏览器默认打开，此种情况可以点击浏览器菜单，保存网页到桌面，就可以正常下载了。
3、本站不支持迅雷下载，请使用电脑自带的IE浏览器，或者360浏览器、谷歌浏览器下载即可。
4、本站资源下载后的文档和图纸-无水印,预览文档经过压缩，下载后原文更清晰。
5、试题试卷类文档，如果标题没有明确说明有答案则都视为没有答案，请知晓。
|
Vb 程序的选择结构select case结构.ppt
程序的程序的选择结构构select case结构构Private Sub Command1_Click()player=Text1.Text Select Case player Case 科比 MsgBox 洛杉矶湖人队；24号球衣,0,球队名称 Case 霍华德 MsgBox 休斯顿火箭队；12号球衣,0,球队名称 Case 詹姆斯 MsgBox 迈阿密热火队；6号球衣,0,球队名称 Case Else MsgBox NBA 没有这个球员,0,球队名称 End SelectEnd SubSelect Case语句语句基本格式基本格式Select Case Case Case Case Else End Select功能功能:根据测试表达式的值根据测试表达式的值,按顺按顺序匹配序匹配Case后的表达式后的表达式,如果匹配成功如果匹配成功,则执行该则执行该Case下的语句块下的语句块,然后转然后转到到End Select语句之后语句之后继续执行继续执行Case（后面的）表达式后面的）表达式（两种形式两种形式）1.罗列。罗列。例如例如:Case“科比科比”，“加索尔加索尔”Case 1,3,52.范围。范围。具体范围具体范围 用用TO 例如例如:Case 10 TO 30 Case A TO Z 其他其他 用用Is 例如例如:Case Is=10注意注意:1.以上两种形式可以混用，以上两种形式可以混用，例如例如:Case Is 0，则有两个不等的实根 b2-4ac 0 X1=(-B+Sqr(Delta)/(2*A)X2=(-B-Sqr(Delta)/(2*A)Picture1.Print X1=;X1,X2=;X2 Case Is 0:MsgBox 有两个共轭复根 End Select End IfEnd Sub 练习:编写程序计算货物运费T。设货物运费每吨单价P(元)与运输距离S(公里)之间有如下关系:30 S100 27.5 100S200 P=25 200S300 22.5 300 S400 20 S400 输入要托运的货物重量为W吨。T=P*W*S
