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吗?
请高手给我解释下,感谢啊~
你可以定义成别的变量名称...
Good Luck!
当option1没有被选中的时候option1.value的值为false.
同意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
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的问题
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语句中遇到的问题。求教高手
Select Case L Case Is < 17000 H0 = (L \/ 17) \/ 2 Case 23000 H0 = (L \/ 19) \/ 2 Case 17000 To 23000 H0 = (L \/ 18) \/ 2 Case Else HO = (L \/ 20) \/ 2 End Select Text2.Text = Str(H0) '这里是H0（数字），不是HO（字母），而你写成字母了。这就是不强制变量...
VB select case语句中遇到了问题,求教
第一，就是错误。17000 < L < 22999 不是vb的条件表达式。可以按照其他人的建议写，但对你目前的理解还是有点问题；我建议写成17000 to 23000。第二，是一种思路失误，不构成错误，但这样不是好习惯。就是HO = (L \/ 20) \/ 2 样式的语句反复出现。应该合并。综上，你的代码写成：Dim L As ...
有关VB select case语句的一个问题
End Select部分 描述testexpression 任意数值或字符串表达式。expressionlist-n 如 Case 出现则必选。一个或多个表达式的分界列表。statements-n 当 testexpression 与 expressionlist-n 中的任意部分匹配时,执行的一条或多条语句。elsestatements 当 testexpression 与 Case 子句的任何部分不匹配时,执行的一条或多条...
vb select case 的问题
这种格式是错误的，Case 后面只能是数值，不能是判别式 可以用IF IF 100 < Text1.Text THEN MsgBox "大了"ELSEIF100 > Text1.Text THEN MsgBox "小了"Else MsgBox "恭喜你 答对了"ENDIF
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一种情况后,没有及时跳转,它还继续往下执行.那就差远了.
