J jeff_chen 新手上路 注册 2002-04-06 消息 104 荣誉分数 0 声望点数 0 2004-07-16 #1 现在需要定义一个动态数组.DIMENSION不定, 要根据数据的情况来定义. 从一个文件中读取数据, 如果数据是5行5列,则需要创建一个5X5的数组,如果是 3行8列, 则需要创建一个3X8的数组. 在VB中好象比较难实现, 因为VB中定义数组的唯数都是需要的常量. 比如 DIM A(6) AS VARIANT. 等等. 请求帮助! 谢谢!
现在需要定义一个动态数组.DIMENSION不定, 要根据数据的情况来定义. 从一个文件中读取数据, 如果数据是5行5列,则需要创建一个5X5的数组,如果是 3行8列, 则需要创建一个3X8的数组. 在VB中好象比较难实现, 因为VB中定义数组的唯数都是需要的常量. 比如 DIM A(6) AS VARIANT. 等等. 请求帮助! 谢谢!
周 周生生 新手上路 注册 2003-08-01 消息 481 荣誉分数 0 声望点数 0 2004-07-16 #2 应该是可以定义的. dim String() as String 但在后来需要付值 String= StringArray
J jeff_chen 新手上路 注册 2002-04-06 消息 104 荣誉分数 0 声望点数 0 2004-07-16 #3 这样是可以, 但是... 但是STRARRAY还是需要定义的. 问题是如何动态的定义. 你如何来定义STRARRAY呢? 谢谢!
苦逼热狗 路边通讯社社长 VIP 注册 2002-10-12 消息 47,114 荣誉分数 2,376 声望点数 393 2004-07-16 #4 我觉得你就这么搞 Public Const MAXROW = 10 Public Const MAXCOL = 10 Dim Array(MAXROW,MAXCOL) As Variant Dim ROWTRACKER As Integer Dim COLTRACKER As Integer 你总不会出现一个Array里头有5x5,3x8这样的吧 就算有，也可以搞定 2个附加ARRAY,用来记录对应的row,col 当然结构方面，呵呵
我觉得你就这么搞 Public Const MAXROW = 10 Public Const MAXCOL = 10 Dim Array(MAXROW,MAXCOL) As Variant Dim ROWTRACKER As Integer Dim COLTRACKER As Integer 你总不会出现一个Array里头有5x5,3x8这样的吧 就算有，也可以搞定 2个附加ARRAY,用来记录对应的row,col 当然结构方面，呵呵
苦逼热狗 路边通讯社社长 VIP 注册 2002-10-12 消息 47,114 荣誉分数 2,376 声望点数 393 2004-07-16 #6 不过用redim的时候，如果 size 变小了的话，那部分就消失了，数据就丢失了阿
