- 积分
- 984
- 明经币
- 个
- 注册时间
- 2005-1-5
- 在线时间
- 小时
- 威望
-
- 金钱
- 个
- 贡献
-
- 激情
-
|
楼主 |
发表于 2005-4-7 14:49:00
|
显示全部楼层
如下面这段程序所示,想要返回数组,但返回的并不是数组,这是怎么回事啊?
Private Function hwq_getSelRow() As Variant Dim row As Long, lens As Long, i As Long Dim arr() row = MSFG.RowSel ' 返回选择的行的下标 lens = MSFG.Cols ' 返回列数 ReDim arr(0 To lens - 1) ' 用Redim才能定义变长数组 For i = 0 To lens - 1 arr(i) = MSFG.TextMatrix(row, i) Next i hwq_getSelRow = arr End Function
不知道为什么,发不了新贴,所以只能写在这儿了。 |
|