7,786
社区成员
发帖
与我相关
我的任务
分享
Private Sb Command1_Click()
Dim s As String, v As Variant
s = "123"
v = "123"
s = s - s
v = v - v
Debug。Print s
Debug。Print v
End Sb
有点意思
Debug.Print 3
Debug.Print -3
Dim v As Variant
v = "1"
MsgBox TypeName(v)
v = v - v
MsgBox TypeName(v)
v = 1
MsgBox TypeName(v)
v = v - v
MsgBox TypeName(v)