天下 发表于 2007-8-9 23:36:38

一段VB代码不懂

Select Case num3
   Case 1
       op = "+"
       result = Val(Text1) + Val(Text2)
   Case 2
       op = "-"
       result = Val(Text1) - Val(Text2)
   Case 3
       op = "*"
       result = Val(Text1) * Val(Text2)
   Case 4
       op = "÷"
       result = Val(Text1) / Val(Text2)
End Select

飘云 发表于 2007-8-10 01:43:53

根据 num3 的值来确定做加减乘除的 何种运算~~~

Select Case 语句~~



等效于：

if num3 = 1 then
       op = "+"
       result = Val(Text1) + Val(Text2)
end

以此类推@~~

黑暗次序 发表于 2007-9-4 22:21:32

跟C语言里的 Select Case 语句一个意思

sislcb 发表于 2007-9-5 09:22:27

建议看程序前,拿一本最最基本的书看一下..

xiaxueyiyi 发表于 2007-10-4 12:00:49

我也同意二楼的意见。呵呵
页: [1]
查看完整版本: 一段VB代码不懂