请问VB中 select case 的用法
select case year
case year mod 400 =0
这个语法会错吗？
还有，CASE YEAR 和IF 的用法有什么区别啊？是不是都可以用？
我想问下一下if代码转为select case应该怎么写
Dim year as integer
year=val(text1.text)
if year mod 400=0 then
b="闰年"
elseif year mod 100<>0 and year mod 4= 0 then
b="闰年"
else
b="不是闰年"
end if
text2.text=b
end sub
rivate Sub Form_Click()
Dim year As Integer, b As String
year = Val(Text1.Text)
Dim x400 As Integer, x100 As Integer, x4 As Integer
x400 = year Mod 400
x100 = year Mod 100
x4 = year Mod 4
Select Case x400
Case 0
b = "闰年"
Case Else
Select Case x100
Case 0
b = "不是闰年"
Case Else
Select Case x4
Case 0
b = "闰年"
Case Else
b = "不是闰年"
End Select
End Select
End Select
Text2.Text = b
End Sub
简直是一材乱麻，做你这道题，我自己都快搞晕了，不过执行起来是完全正确的。已经运行过了。
case 里面只能是:case 数值 、case is >（<,>=,<=)数值、case 数值 to 数值
Select Case day
Case "1"
<----------------->
Case "2"
<----------------->
Case "3"
<----------------->
Case "4"
<----------------->
End Select
用IF的话
if day = "1" then
<----------------->
elseif day = "2" then
<----------------->
elseif day = "3" then
<----------------->
elseif day = "4" then
<----------------->
end if
sub
command1_click()
dim
k
as
integer
k
=
val(text1.text)
select
case
k
case
is
>=
90
text2.text
=
"a"
case
80
to
90
text2.text
=
"b"
case
70
to
80
text2.text
=
"c"
case
60
to
70
text2.text
=
"d"
case
is
<
60
text2.text
=
"e"
end
select
end
sub
Case
表达式
Case
值1
程序1
Case
值2
程序2.
.
.
Case
Else
其他程序
End
Select
vb中“select case”是什么意思?
根据表达式的值执行几组语句之一\\x0d\\x0aselect case a 意思就是判断a是什么内容。然后根据不同内容执行不同的代码。 \\x0d\\x0a VB里的Select语句的格式是这样的： \\x0d\\x0aSelect Case '语句开始 \\x0d\\x0aCase ’判断条件\\x0d\\x0a?? ‘执行命令\\x0d\\x0aCase \\x0d\\...
vbselectcase是什么意思
在实际编程过程中，Select Case常用于处理具有多种可能情况的条件判断。例如，根据不同的用户输入或程序状态执行不同的操作。通过使用Select Case语句，开发者可以更加高效地处理这些情况，减少代码的冗余和复杂性。因此，它是VB编程中非常有用的工具之一。当遇到需要根据不同条件执行不同操作的情况时，使用S...
vb里,select case 的用法?
select的用法：select case <变量> case <条件1> <执行语句1> case <条件2> <执行语句2> ...end select
VB里的selsct case是做什么用的
vb Dim num As Integer num = InputBox("请输入一个数字：")Select Case num Case 1 MsgBox "您选择了数字1。"Case 2 MsgBox "您选择了数字2。"Case 3 MsgBox "您选择了数字3。"Case Else MsgBox "您没有选择数字1、2或3。"End Select 在这个例子中，程序会提示用户输入一个数字，并根据...
VB中如何使用select case语句
基本用法Private Sub main()Select Case InputBox("请输入你希望的天气，从晴天、多云、阴天、阵雨、小雨、小雪、冰雹中选一个填入。", "请输入你希望的天气", "晴天")Case "晴天"MsgBox "哇哦！你喜欢的是晴天啊，祝你天天好心“晴”~！"Case "多云"MsgBox "喜欢多云的天气，是因为比较怕紫外...
VB的select case语句怎么用?
Select Case 语句 根据表达式的值，来决定执行几组语句中的其中之一。语法 Select Case testexpression [Case expressionlist-n [statements-n]] ...[Case Else [elsestatements]]End Select Select Case 语句的语法具有以下几个部分：部分 描述 testexpression 必要参数。任何数值表达式或字符串表达式。e...
vb中“select case”是怎样使用的?
Case Else 用于指示若在 testexpression 和任何其他 Case 选项的 expressionlist 之间未找到匹配，则执行 elsestatements。虽然不是必要的，但最好是将 Case Else 语句置于 Select Case 块中以处理不可预见的 testexpression 值。如果没有 Case expressionlist 与 testexpression 匹配且无 Case Else 语句，...
vb里面,可以听我通俗地解释下Select case的作用吗?看我理解的对不...
Select Case相当于C语言中的Switch Case Select Case在执行时，根据表达式，如果找到满足条件的Case分支，就会执行这个语句块的代码，执行完毕后会立即跳出Select Case语句。Select Case可以用来处理多个分支 例子：' 判断数字大小Select Case 成绩 Case Is = 100 Print "满分！" Case Is > 80 ...
请问VB中 select case 的用法
这里不是不能用select case写，而是if和select case适用于不同的选择中。在这道题中，使用if显得条理很清楚，使用的语句也少。而使用select case显得太麻烦和不可理喻，请看：rivate Sub Form_Click()Dim year As Integer, b As String year = Val(Text1.Text)Dim x400 As Integer, x100 As ...
vb select case怎么表示and关系
select case就是对表达式结果进行分类，不能表示AND关系，可以表示Or，因为一个表达式的计算结果，不能即等于一个数，又等于另一个数，例如：select case 考试成绩 case is < 60 s="不及格"case 60 to 70 s="及格"case 100 s="优秀"end select ...
