求vb中SELECT CASE语法的使用说明。
求vb中SELECT CASE语法的使用说明。
09-03-20 &
从上往下执行判断,当找到符合的选项时便不再检查剩下的选项了.因此你的代码可化简如下:Private Sub Command1_Click()A = 2: B = 3F = InputBox(&1+2-3*4/5^&)Select Case FCase 0, 1: C = A + BD = &+&Case 2: C = A - BD = &-&Case 3: C = A * BD = &*&Case 4: C = A / BD = &/&Case 5, 6: C = A ^ BD = &^&Case Else: EndEnd SelectPrint A; D; B; &=&; CEnd Sub-----------------------------书本难免有疏漏之处,尽信书不如无书~_
请登录后再发表评论!
给你个例子： select case i case is &50 print i case 50 to 60 print i^2 case is &60 print &wrong!& end select
请登录后再发表评论!您所在位置： &
&nbsp&&nbsp&nbsp&&nbsp
vb选择结程序设计.ppt 37页
本文档一共被下载：
次 ,您可全文免费在线阅读后下载本文档。
下载提示
1.本站不保证该用户上传的文档完整性，不预览、不比对内容而直接下载产生的反悔问题本站不予受理。
2.该文档所得收入(下载+内容+预览三)归上传者、原创者。
3.登录后可充值，立即自动返金币，充值渠道很便利
需要金币：150 &&
你可能关注的文档：
··········
··········
第5章选择结构程序设计本章要点：1．块结构条件语句If…Then…EndIf的使用2．多分支条件语句ElseIf的应用3．多分支选择语句SelectCase…EndSelec的应用选择结构是一种常用的基本结构，其特点是根据所给定的选择条件为真或假，来决定从不同操作中选择执行一种操作。选择结构程序设计5.1块If语句（If...Then语句）5.3ElseIf语句ElseIf子句的格式：If条件1then语句块1ElseIf条件2then语句块2……[Else语句块n+1]EndIf5.4SelectCase语句IIf函数5.5应用举例*底哼度躬冠担骡阀帖吭藉造叭配同极反无曲吝车迭啸用牛卡卤绕侍舒友粳vb选择结构程序设计vb选择结构程序设计5.1块If条件语句5.4SelectCase语句5.5应用举例返回退出5.2块If语句的嵌套5.3ElseIf条件语句丽炮觅沽酞那型路铺颂诊闲初液隆煎锡牡斤炊辜构拱豹审挛围兆丹呢嘻愉vb选择结构程序设计vb选择结构程序设计块If语句是用来判断条件成立与否，然后决定下一步怎么执行的一种控制语句，这种选择结构是最常用的双选择结构，即只有两种操作可以选择。如果条件为真，执行其中一个操作；如果条件为假，则执行另外一个操作。块结构if语句语法格式如下：If&条件表达式&Then[&语句块1&][Else[&语句块2&]]EndIf左攻憋儡裙褥踢验治其贤脂居扔卢蛊郊鉴铲气丢咖四汞叠策编毖知搜阁吠vb选择结构程序设计vb选择结构程序设计说明：&条件表达式&为必选项，它可以是关系表达式、布尔表达式、数值表达式或字符串表达式，但总的说来它是一个逻辑值的表达式，其返回结果必须是True或False。对于数值表达式，VB将0作为False，非0作为True?来处理；对于字符串表达式，VB只允许出现包含数字的字符串，当字符串中的数字值为0时，则认为是False，否则认为是True。&语句块1&和&语句块2&可以是一条语句，也可以是多条语句。迹腋找苗配莲区做疟枫偷伞锹赚烩县摇赎份痢栖奇拖墟骡搞驾卡狂首帕骂vb选择结构程序设计vb选择结构程序设计单行结构If语句的执行过程是这样的：首先计算&条件表达式&的值，如果结果为True，则执行&语句块1&，否则，执行&语句块2&。T（真）F（假）条件满足？语句块1语句块2EndIf之后的语句选择结构流程图按律觉挞折赔初笼继客沧窟闺柱攻碳憎蓖造戏亥推德哩殊哥勉朗殃分贞昔vb选择结构程序设计vb选择结构程序设计【例5.1】设计界面如图5-2所示，用文本框Text1输入x的值，单击按钮时，在标签Label1中显示出x的绝对值。运行界面“求绝对值”按钮Command1的单击事件过程如下：PrivateSubCommand1_Click()x=Val(Text1.Text)'将文本框中的字符内容转换成数值Ifx&0ThenLabel1.Caption=xElseLabel1.Caption=-x'根据x的正负确定显示结果EndSub镇贺捍熙筒丢术邯鸥守猫旱蓉懒嘴麓跺序苟霉站汁眉劳窃被梭今牵诌先怎vb选择结构程序设计vb选择结构程序设计使用该语句时，应该注意以下问题：（1）整个块结构必须以If开始，以EndIf结束。（2）块结构If语句中Then后面的语句不能与其写在同一行上，否则，必须加上分隔符。（3）块结构中的&语句块2&是可以省略的。省略后即简化为以下形式：If&条件&Then&语句块&EndIf这种形式的If语句主要用来判断一些操作是否执行。当条件成立时，根据&语句块&完成的一定的操作；而当条件不成立时不做任何处理，直接执行下条语句。旺争城揖吻杀喘涂幅问斜募葵旱喉卵困烙就勘虽幕汞屯惠民侍吃儡骗弟阐vb选择结构程序设计vb选择结构程序设计例如，例5.1也可以采用下列程序段来实现。x=Val(Text1.Text)Ifx&0Thenx=-x'取负数x的相反数EndIfLabel1.Caption=x（4）在块结构中，If后面显式的给出了判断条件，Else后面虽然没有显式的给出一个条件，但相当于存在一个与If部分相反的隐含条件。返回窄违坛肘曝桐矢捕闺在劫淫竹村崭宝收僵酷酮穗姬獭颖瓶粤趟衫猴瞅扯尉vb选择结构程序设计vb选择结构程序设计在实际应用中，经常会遇到“多分支”选择的程序，即从多种情况中选择执行其中一种情况，这时，就要使用块if语句的嵌套。块结构If语句可以嵌套，即在上述结构中的&语句块1&和&语句块2&部分仍然可以包含另外一个块结构If语句。如果在条件成立或不成立的情况下要继续判
正在加载中，请稍后...扫二维码下载作业帮
1.75亿学生的选择
下载作业帮安装包
扫二维码下载作业帮
1.75亿学生的选择
VB中,select case 超级难!一定要用select case做!现在有2个string.string1=textbox1是输入4位邮政编码的,string2是显示邮政编码所对应的地区的.依照表如下：地区缩写-邮编范围NSW
例外情况：0872 SA 或者WA （string2显示不明确邮编）2540 JBT2620 ACT
, , ,3707 NSW如果所输入邮编即不再表内,也不再例外内,string2 显示无效邮编.例外情况中：只有0872 string2才显示不明确邮编,其余string2显示例外中的对应地区邮编,例如：3500,显示NSW,而非上表中的VIC
扫二维码下载作业帮
1.75亿学生的选择
Private&Sub&Command1_Click()a&=&Text1.Textb&=&Text2.Texta&=&Val(a)Select&Case&a&'这个编程只要把特殊的写在前面就可以了,因为就算有两个满足条件也只执行第一个,这下明白了吧!其实很简单的!&&&&Case&872&&&&Text2&=&&不明确邮编&&&&&Case&2540&&&&Text2&=&&jbt&&&&&Case&2620&&&&Text2&=&&act&&&&&Case&,&,&,&3707&&&&Text2&=&&nsw&&&&&Case&200&To&299&&&&Text2&=&&act&&&&&Case&800&To&999&&&&Text2&=&&nt&&&&&Case&1000&To&2599&&&&Text2&=&&nsw&&&&&Case&2600&To&2618&&&&Text2&=&&act&&&&&Case&2619&To&2898&&&&Text2&=&&nsw&&&&&Case&2900&To&2920&&&&Text2&=&&act&&&&&Case&2921&To&2999&&&&Text2&=&&nsw&&&&&Case&3000&To&3999&&&&Text2&=&&vic&&&&&Case&4000&To&4999&&&&Text2&=&&qld&&&&&Case&5000&To&5999&&&&Text2&=&&sa&&&&&Case&6000&To&6797&&&&Text2&=&&wa&&&&&Case&6800&To&6999&&&&Text2&=&&wa&&&&&Case&7000&To&7999&&&&Text2&=&&tas&&&&&Case&8000&To&8999&&&&Text2&=&&vic&&&&&Case&9000&To&9999&&&&Text2&=&&qld&&&&&Case&Else&&&&Text2&=&&不明确邮编&&&&&&&End&Select&&&&End&Sub
为您推荐：
其他类似问题
扫描下载二维码}