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

VB中的CASE语句

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

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

Private Sub Form_Click() Dim a As Integer a = InputBox("请输入一个数:") Select Case a Case Is > 0 MsgBox "是正数" Case Is < 0 MsgBox "是负数" Case Else MsgBox "是零" End Select End Sub

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...

根据表达式的值执行几组语句之一 select case a 意思就是判断a是什么内容。然后根据不同内容执行不同的代码。 VB里的Select语句的格式是这样的: Select Case '语句开始 Case ’判断条件 …… ‘执行命令 Case …… Case …… …… …… Case Else …… End Se...

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

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

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语句条理清晰!!!

使用的都不算多,至少我就很少用,可能和个人习惯有关吧, Switch和select case差不多,举例说明一下,如根据城市名称选择语言: Matchup = Switch(CityName = "London", "English", CityName _ = "Rome", "Italian", CityName = "Paris", "Fren...

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