在二维数组,比如说a(i,j)里面,我把第一维i理解为行,第二维j理解为列
一般情况下,每一列都拥有i个元素如何让每一列拥有的元素数量不同呢?比如说我想要a的第一列有0-10 这11个元素 单第二列却是 0-2个元素请问要如何做呢?
一般情况下,每一列都拥有i个元素如何让每一列拥有的元素数量不同呢?比如说我想要a的第一列有0-10 这11个元素 单第二列却是 0-2个元素请问要如何做呢?
解决方案 »
- 如何才可以用SQL排除表中相同的记录
- 求一个类库MIcrosoft Office Document Imageing 11.0 type
- 【绿豆结婚】散分恭喜!!!
- 关于报表记录重复的问题
- VB代码编辑窗的变量值自动提示功能忽然消失
- 请问一下,用vsPrint预览打印结果的时候,能够通过拖动鼠标来改变表格的宽度或者高度??如果能,应该如何实现?
- 请教UDP通讯没反应
- 如何读取自动控件组生成后的text内的内容呢?
- 帮忙,先谢谢!在线等待!。。。。。。着急1
- 如何实现从LISTVIEW中一次拖动多个ITEM到TREEVIEW中来???(内空)
- 请教:先从数字1-20中任意选出10个数字,再对这10个数字进行分组,每组从中取出4个数字,且每组数字不能完全一样,与数字所在的位置无关……
- 添加数据的代码写好了,可是修改记录的代码怎么写都显示错误。
dim a as new arraylist
定义第一行:
dim a_(10)
a.add a_
定义第二行:
dim b_(11)
a.add b_
查询第一行第5个单元:=a.a_(4) '0开始
a.remove(a_)
重新定义第一行:
redim a.a_(18)
dim a()redim a(0 to 10,0 to 2)
……
erase a
redim a(0 to 10,0 to 5)这只是重用了一下变量而已
a(1,0)=2 a(1,1),a(1,2)
a=array(array(1,2),array(1,2,3,4),array(1,2,3))
debug.print a(0)(0),a(1)(3)
redim a(1)(2)
并且在程序中视行为列,视列为行即可。
v As Integer
b() As Integer
End Type
Private Sub Command1_Click()
Dim a() As ta
ReDim a(10)
a(1).v = 100
ReDim a(1).b(10)
a(1).b(1) = 200
Debug.Print a(1).v, a(1).b(1)
End Sub
b() As Integer
End Type
Private Sub Command1_Click()
Dim a() As ta
ReDim a(10)
ReDim a(1).b(10)
a(1).b(1) = 200
Debug.Print a(1).b(1)
End Sub