赋值过程必须写入事件过程或自定义过程中，比如 如果是在窗体： Dim bushu(20, 5) As Variant '数组只能声明为Variant型，否则赋值时会出错Private Sub Form_Load() bushu(0, 5) = Array(9, 58, 91, 82, 35) bushu(1, 5) = Array(85, 12, 6, 28,
