(资料图)

1、答案补充：这个方法只适用于一维数组，多维数组只能一个一个分别赋值，没有简便方法。

2、＝＝＝＝＝＝＝＝＝＝＝＝代码如下。

3、 ＝＝＝＝＝＝＝＝＝＝＝＝ Dim a As Variant Private Sub Form_Load() a = Array(1, 5, 2, 43, 222) End Sub。

本文就为大家分享到这里，希望小伙伴们会喜欢。

关键词：