第一题:
Dim i, arr(2)
arr(0) = 1
arr(1) = 2
arr(2) = 4
For i = 0 To ubound(arr)
TracePrint "arr(" & i & ") =" & arr(i)
Next
第二题:
Dim str, a1, a2, a3
str = "520"
a1 = CInt(str)
a2 = CLng(str)
a3 = CCur(str)
TracePrint typename(a1) & "," & typename(a2) & "," & typename(a3)
第三题:
待定...
这些都是基础,建议在认证那里有个知识库,学懂后再答就没什么问题
内容全部来源于网络收集，如有侵权，请联系网站删除：QQ：24596024