数组的定义

kings12333

duquancai 发表于 2017-12-17 20:11
我也不知道啥意思。。。。。。。。。。。。

不是吧。。百度了，不是很明白意思

duquancai

kings12333 发表于 2017-12-17 20:18
不是吧。。百度了，不是很明白意思

我不知道什么意思，这很正常，没什么大惊小怪的，只允许你不知道啥意思，就不准我不知道啥意思吗？？？我看到大神们这样用，我就抄袭过来用了啊。。。。。

ivccav

kings12333 发表于 2017-12-17 19:58
数据的获取是For...Next循环获取，是不是把这段这样写
Open path For Input As #1'打开文件
Do While N ...

没错。每次获得数据就扩大数组并把数据放进去数组。

ivccav

kings12333 发表于 2017-12-17 20:10
ReDim Preserve arr(1 To n)，这句是啥意思啊

n = n + 1
ReDim Preserve arr(1 To n)
——这两句话跟我写的是一个意思，就是每次获得数据之后，数组大小扩大一列。你要注意n = n + 1，n是加了1的。ReDim 是重定义，Preserve是保留原来数组arr的数值。如果没有Preserve，使用ReDim 之后，原来的数据就被擦除了。

ivccav

kings12333 发表于 2017-12-17 20:07
再请教个数组问题，比如ListBox1控件只有行数，没有列数，这时候我要将ListBox1所有行的内容定义为数组怎 ...

看不懂你的目的，你是要往listbox中放入数据，还是把listbox的数据拿出来？如果是放进去，你用listbox1.list=arr就行了。arr如果是一维数组，且你需要是行的效果，需要转置：Application.WorksheetFunction.Transpose (arr)，因为一维数组只有一行多列。如果是从listbox拿数据出来，就需要循环了。还要看你是导出所有数据，还是只导出已选中的数据。ListBox1.List(i, j)表示第i行第j列，从0开始，选中的数据：你自己搜一下listbox的相关知识吧
For i = 0 To ListBox1.ListCount
If ListBox1.Selected(i) Then

kings12333

ivccav 发表于 2017-12-17 23:21
看不懂你的目的，你是要往listbox中放入数据，还是把listbox的数据拿出来？如果是放进去，你用listbox1.l ...

听你这样的细说，让我对数组的了解又多了一层，非常感谢您的指导。

ivccav

kings12333 发表于 2017-12-18 08:15
听你这样的细说，让我对数组的了解又多了一层，非常感谢您的指导。

多了解一下数组很好。VBA其实就是3个大套路：数组、字典和正则表达式，另加if判断、for循环语句，把这这些搞清楚，基本够用了。“汽车不就是4个轮胎加2个沙发嘛！”，有这种视野，很快就能找到关键点，掌握了核心就站稳了。

lpxkk

多了解一下数组很好。VBA其实就是3个大套路：数组、字典和正则表达式，另加if判断、for循环语句，把这这些搞清楚，基本够用了。“汽车不就是4个轮胎加2个沙发嘛！”，有这种视野，很快就能找到关键点，掌握了核心就站稳了。