VB中select case的一个小问题

看这段代码:
select case true
case option1.value
y=1
case option2.value
y=132
end select
麻烦高手给我解释下true在这里是什么意思?我是新手
下面这段代码我懂:
select case m
case 1
y=1
case 2
y=132
end select
这个的意思是:当m=1时,y=1,当m=2时,y=132.这个我理解的对吧?
类比去理解第一个
就是当true=option1.value时y=1
当ture=option2.value时y=132
可true=option1.value是什么意思啊?正常的不应该是option1.value=true吗?
请高手给我解释下,感谢啊~

true=option1.value和option1.value=true的区别在于,前者表示判断,后者表示赋值,这是两个不同的语句。
温馨提示:内容为网友见解,仅供参考
第1个回答  2008-11-02
true 在VB中作为关键字使用的, 一般不这样用.
你可以定义成别的变量名称...

Good Luck!
第2个回答  2008-11-02
当option1被选中的时候option1.value的值为true.
当option1没有被选中的时候option1.value的值为false.
第3个回答  2008-11-02
从你这个select case true 结构上看,你理解错了,不是当ture=option2.value时y=132,而是当option2.value=true时y=132,

同意Juncox 的说法,最好先转为变量,如:

dim b_Flag as Boolean

b_Flag=True

select case b_Flag
case option1.value
y=1
case option2.value
y=132
end select
第4个回答  2008-11-02
呵呵,第一次看到在Selet case 后面接一个常数的写法,虽然语法正确, 不过挺好笑的。

True 是一个布尔常数,表示一个非零值,数据转换时,
True=-1
而对应的
False=0

VB中select case的一个小问题
true=option1.value和option1.value=true的区别在于,前者表示判断,后者表示赋值,这是两个不同的语句。

VB select case 语句中的一个小问题 在线等.急
这段代码没有问题啊。关键在于这个text1 你在VB上画一个可以输入的框。这个框的名字叫text1.再画一个vb的按钮,按下后触发的事件就是Command1_Click 然后执行VB,在那个可以输入的框里输入“1”就回弹出"a<5"在那个可以输入的框里输入“5”就会弹出"错误"(因为你没有对5作判断)在那个可以输入...

VB select case 的小问题
Case 300 To 600 a = 0.9 * i Case 600 To 800 a = 0.8 * i Case 800 To 1000 a = 0.7 * i Case Is > 1000 a = 0.5 * i End Select a = MsgBox("商品打折后的价格为:" & a, 0, "打折后的价格")End Sub

VB select case语句中遇到的问题。求教高手
Case Else HO = (L \/ 20) \/ 2 End Select Text2.Text = Str(H0) '这里是H0(数字),不是HO(字母),而你写成字母了。这就是不强制变量声明造成的。出了错都看不出来。End Sub

vb中关于select case的问题
Select Case C Case Is < 0.8 Label3.Caption = "您的体型消瘦"Case Is > 1.2 Label3.Caption = "您的体型肥胖"Case Is > 1.1 Label3.Caption = "您的体型偏胖"Case Is >= 0.9 Label3.Caption = "您的体型正常"Case Is >= 0.8 Label3.Caption = "您的体型偏瘦"End Select ...

VB select case语句中遇到了问题,求教
第一,就是错误。17000 < L < 22999 不是vb的条件表达式。可以按照其他人的建议写,但对你目前的理解还是有点问题;我建议写成17000 to 23000。第二,是一种思路失误,不构成错误,但这样不是好习惯。就是HO = (L \/ 20) \/ 2 样式的语句反复出现。应该合并。综上,你的代码写成:Dim L As ...

vb select case 的问题
这种格式是错误的,Case 后面只能是数值,不能是判别式 可以用IF IF 100 < Text1.Text THEN MsgBox "大了"ELSEIF100 > Text1.Text THEN MsgBox "小了"Else MsgBox "恭喜你 答对了"ENDIF

有关VB select case语句的一个问题
End Select部分 描述testexpression 任意数值或字符串表达式。expressionlist-n 如 Case 出现则必选。一个或多个表达式的分界列表。statements-n 当 testexpression 与 expressionlist-n 中的任意部分匹配时,执行的一条或多条语句。elsestatements 当 testexpression 与 Case 子句的任何部分不匹配时,执行的一条或多条...

VB程序设计中,select case语句的一些问题
对 差别不大 Dim n as Integer Select Case n Case 1 。。。Case 2 。。。Case Else 。。。End Select

VB的select case 语句问题。急啊!在线等!!
是啊.用数组的办法.dim old(100)for i =0 to 99 old(i)=0 next do while 表达式 old(i)=old(i)+1 loop 多简单明了.不过select case并不限分支多少.你的错误可能在于old_*没有初始化为0.另外,你试一下,select case 如果case一种情况后,没有及时跳转,它还继续往下执行.那就差远了.

相似回答