如题所述
第1个回答 2022-12-11
Option Explicit;
Sub ArrayTest();
Dim arr As Variant '定义变量;
将1到10十个自然数赋给数组arr;
arr = Array(1, 2, 3, 4, 5, 6, 7, 8, 9, 10);
MsgBox "arr数组的第2个元素为:" & arr(1);
End Sub。
如题所述
Option Explicit;
Sub ArrayTest();
Dim arr As Variant '定义变量;
将1到10十个自然数赋给数组arr;
arr = Array(1, 2, 3, 4, 5, 6, 7, 8, 9, 10);
MsgBox "arr数组的第2个元素为:" & arr(1);
End Sub。
本站内容来自于网友发表,不代表本站立场,仅表示其个人看法,不对其真实性、正确性、有效性作任何的担保
相关事宜请发邮件给我们
© 非常风气网