vb select case 如何连起来?或是可以用什么别的方式?

发布网友发布时间：2024-01-08 13:44

共3个回答

热心网友时间：2024-01-17 23:58

把Case chkSK.Checked And chkSG.Checked放到最前面，也就是第一个case，如果你放到了後面当满足了其它条件时就会跑到其它case裏面了。

热心网友时间：2024-01-17 23:59

select case 测试表达式
只要测试到满足的条件就直接跳出select 是不会测试下一个case条件的

If bytTarget <= 9 Then
Select Case True
Case chkSK.Checked And chkSG.Checked
strWep = "SK & SG"
dblPrice = 60 * dblPeople * bytTarget
Case chkSK.Checked
strWep = "SK"
dblPrice = 22 * dblPeople * bytTarget
Case chkSG.Checked
strWep = "SG"
dblPrice = 43 * dblPeople * bytTarget
End Select

热心网友时间：2024-01-17 23:59

你这个程序就是错的select case后面跟的是变量，你那句select case true在第二行是不是笔误？

这个程序的合理写法应该是
select case chkSK.checked
case true
case false
end select

另外你要判断两个变量，可以在case中加select case嵌套。
还有就是，对复杂case可以使用case else来应对