VB 代替 多重条件判断语句是啥?

If a = 1 Then

End If

If a = 2 Then

End If

If a = 3 Then

End If
'问的是可以代替以上多条语句的一个判断语句关键字。

第1个回答  2011-05-24
Select Case <变量名>
Case<变量值>
……
Case<变量值>
……
End Select

大多与Combo控件使用 类似:
Select Case Combo1.List(Combo1.ListIndex)
Case <变量值>
……
Case<变量值>
……
End Select

Form_Load()时可以定义初值:
Combo1.ListIndex = 0 '---第一个值
Combo1.ListIndex = 1 '---第二个值
……依次
第2个回答  2011-05-23
Select Case <变量名>
case <变量值>
进行的事件...

case <变量值>
进行的事件...

case <变量值>
进行的事件...

case <变量值>
进行的事件...

End Select //过程结束追问

为什么我把它放到 Private Sub Form_Load() 之中,用按钮调用 Form 时它只执行一次,下次明明成立它也不执行case 之内的事件,而在 if then 中就没有这种问题。

第3个回答  2011-05-24
select case s
case 1
.......
case 2
.......
case 3
.......
end select
第4个回答  2011-05-23
可以使用Select case块。
select case a
case 1

case 2

case 3

case else

end select追问

为什么我把它放到 Private Sub Form_Load() 之中,用按钮调用 Form 时它只执行一次,下次明明成立它也不执行case 之内的事件,而在 if then 中就没有这种问题。

追答

不明白你的意思,这种问题在IDE中跟踪一下就知道错在哪里了。

追问

Private Sub Form_Load()
select case a
case 1
case 2
case 3
case else
end select
end sub
'----
Private Sub Form_Load()
If a = 1 Then
End If
If a = 2 Then
End If
If a = 3 Then
End If
end sub
以上两个过程,当a有个固定值时(比如a=3)并切从外部调用时。
第一次调用时 程式判断case a=3成立。
以的后调用明明A=3 它也判断为不成立。
而if a=3 then 就没这问题。

第5个回答  2011-05-24

=if(c22<120,"没有",LOOKUP(C22,,)*(c22-e21))

VB的也可以)
VB中的条件判断语句是编程中的重要组成部分,主要分为If...Then、If...Then...Else...End If和Select Case三种形式。If...Then是基础单行判断,根据比较或逻辑表达式的真假决定是否执行紧跟的程序代码。例如:If a > b Then Print "a > b"或 If a > b Then c = a + b Print "a + b...

VBScript 多重判断
If MsgBox("是否关闭代理",vbYesNo)= vbYes Then '执行关闭IE代理代码 End If '执行重新设置代理代码 Else '执行重新设置代理代码 End if

vb if语法多条件判断
if (条件1 and 条件2 and 条件3) then '3个条件同时满足 结果1elseif (条件1 or 条件2 or 条件3) then'3个条件满足至少一个 结果2end if

vb判断语句的使用方法是什么?
判断语句在编程中扮演着重要角色,VB语言中的条件语句使用方式主要包括了`if`与`else`结构。当翻译类似`if x = 0 then ... else ...`这样的条件语句时,需要特别注意`else`部分的代码位置。在尚未得知`else`部分确切位置的情况下,程序会暂时跳过`else`部分的代码,直至其位置被确定。具体的实现方...

VB多条件if语句
If a = "好"||"你" Then T2.Text = "好"(用“或”来增加判断条件)

vb判断语句的使用方法是什么?
在编程语言VB中,使用判断语句的主要目的是在程序执行过程中根据不同的条件选择执行不同的代码块。判断语句的核心结构为if...then...else...,这里if后面跟的是一个条件表达式,当条件成立时执行then后面的代码块,否则执行else后面的代码块。例如:假设我们有以下代码段:if x > 10 then ' 执行一些...

vbifelse用法,
一、基本结构 VB中的If Else结构是基本的条件判断语句,用于根据不同的条件执行不同的操作。其基本结构如下:vbscript If 条件 Then ' 条件为真时执行的代码 Else ' 条件为假时执行的代码 End If 这种结构是最基础的,只有两种分支情况。如果需要根据更多的条件进行判断,可以使用嵌套的If Else结构。...

VB中的判断句
无论你在判断中限定X等於多少,你最终Pocess中操作的X都等於R*y,因为你在Process中给X重新赋值R*y了,你加几断点逐句调试下看看就知道了,按照你现在写的语句,你最后输出的Z=a+b+c-0.1(a+b+c)。

求教VB 数据库 多个条件筛选语句的问题
应该是漏了单引号 如:select aa from TDLYZYTKZBB where zbdm='1'给你一个重要的技巧,但凡做sql的链接字符串时出现问题,先把你的连接字符串打印出来,再他打印出来的字符串拷贝到sql数据库中直接查询执行,让sql帮你找出语法的错误,如果sql能过,那你的连接字符串就没问题。参考资料:http:\/\/...

VB中多重For循环时停止响应怎么办?
在子循环体中写doevents试试,不行的话可以换个位置或换个循环体写doevents,我以前也是这么做的。

相似回答