Question

按键精灵3级考试问答题，我用了我所有积分谢谢了.

一
1.请用for循环来遍历以下数组,
要求：
1.必须使用到循环变量i
2.必须使用到关键字UBound
3.请在以下代码基础上编写，遍历数组的代码，并在for循环中用一句TracePrint输出arr里的每个元素的值
Dim arr(2)
arr (0)=1
arr (1)=2

二
2把字符串"520"转换为数值型，要求三种方式，请作答

三
3根据以下代码，请用一个命令来实现删除第二个项目"b"
Set a = CreateObject("Scripting.Dictionary")
a.Add "1", "a"
a.Add "2", "b"
a.Add "3", "c"

Answer 1

第一题:
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)
第三题:
待定...

Answer 2

这些都是基础,建议在认证那里有个知识库,学懂后再答就没什么问题