VB 疑问 do while

来源:百度知道 编辑:UC知道 时间:2024/05/20 13:26:42
Dim k As Long
k = 1
num = Abs (num )
Do While num
k = k * ( num Mod 10 )
num = num \ 10
Loop
fun = k
End Function

请问第四行是什么意思?为什么while后面没条件?是省略了什么?
是特定的省略麽?关于这类的还有别的特定的省略麽?

这是VB的隐式转换,实际上是把num转换到Boolean 数据类型

当转换其他的数值类型为 Boolean 值时,0 会转成 False,而其他的值则变成 True。

Private Sub Form_Load()
num = 1 '改成-1效果一样
Do While num
MsgBox "aa"
end
Loop
End Sub

在条件的位置 表达式 等同于 表达式=true
true 有2个值 分别为1和-1