hsfl.net
当前位置:首页 >> VB中的CASE语句 >>

VB中的CASE语句

语法 Select Case End Select其中,表述情形的关键字,有IS和TO,多个情形要并列在一起时,使用逗号(英文)连接。当省略Case Else语句并且语句组都因情形不符合实际时,语句的执行,会直接到达End Select。如果在执行语句的时候,有需要跳过没有...

select case a 意思就是判断a是什么内容。然后根据不同内容执行不同的代码。 如: select case a case "李" '注:当a="李"时,执行下面这句: msgbox "他是姓李的" case "543" '注:当a="543"时,执行下面这句: msgbox "哈哈,a的内容是543" ca...

if a = 1 then 事件A if a = 2 then 事件B if a = 3 then 事件C if a = 4 then 事件D if a = 5 then 事件E 转换为CASE 语句 select case a case 1 事件A case 2 事件B case 3 事件C case 4 事件D case 5 事件E end select CASE语句条理清晰!!!

那当然了,因为你在B = c + d + g 后又写了句 B = Val(Text10.Text) 所以不管你三个TXT中输入什么,B永远是text10的值。

Private Sub Text1_Change() Select Case Val(Text1.Text) Case 0 To 60 Label1.Caption = "不及格" Case 60 To 70 Label1.Caption = "及格" Case 70 To 80 Label1.Caption = "中" Case 80 To 90 Label1.Caption = "良" Case 90 To 100 Label1.C...

选择符合case后面条件的语句 比如 select case a case 1 msgbox "a" case 2 to 5 msgbox "b" case else msgbox "c" end select 以上面代码为例,即当a满足1时候弹出对话框a,满足值为2-5的时候弹出对话框b,满足其它值的时候弹出对话框c

A 错误! 因为 Case后面的表达式是一个或多个表达式的分界列表,比如: Case 1 To 4, 7 To 9, 11, 13, Is > MaxNumber A如果这样写语法上就对了: Case Is>10, Is10 或者 10 And Is10 And Is

比如在一个文本框里输人一个分数,按一下按钮,根据分数判断出级别,代码如下: Private Sub Command1_Click() Select Case Val(Text1.Text) Case 0 To 59 MsgBox ("不及格") Case 60 To 79 MsgBox ("及格") Case 80 To 89 MsgBox ("良好") Case...

Case Is >= (1 < 10): Y = 2 * X - 1 即 Case Is >= True: Y = 2 * X - 1 中,括号先运算,1 < 10的结果为真(ture)所以有上面的就是下面的。 更进一步,ture作为一个数值来使用的话旧又成了“1”,所以: Case Is >= (1 < 10): Y = 2 * X - ...

网站首页 | 网站地图
All rights reserved Powered by www.hsfl.net
copyright ©right 2010-2021。
内容来自网络,如有侵犯请联系客服。zhit325@qq.com