读书人

asp 怎么将一个数组复制给另一个数组

发布时间: 2013-11-08 17:52:14 作者: rapoo

asp 如何将一个数组复制给另一个数组
有个arr1和arr2两个数组,两个数组都有不同的长度和值,怎么将arr1复制到arr2并替换掉arr2的长度和值,急求高手赐教
[解决办法]
arr=split(join(arr1,",") & "," &join (arr2,","),",")
[解决办法]
相关知识:单个数组元素可以像简单变量一样从一个数组复制到另一个数组。想要将一个数组赋值个另外一个数组,必须使用For语句将一个数组的元素逐个赋值给另一个数组的元素。InputBox()为输入函数。

例题介绍:编程实现矩阵的转置。

例题界面:



(a)

代码如下:

Option Base 1

Static Sub Form_Click()

Dim Arr(3, 4), Tarr(4, 3)

Dim k As Integer

k=1

For i = 1 To 3 '数组赋值

For j = 1 To 4

Arr(i, j) = k

k=k+1

Next j

Next i

Print "转置前矩阵为:"

For i = 1 To 3 ’转置前矩阵输出

For j = 1 To 4

Print Arr(i, j); " ";

Next j

Print

Next i

Print "转置后矩阵为:"

For i = 1 To 4 ' 数组间数据的复制

For j = 1 To 3

Tarr(i, j) = Arr(j, i)

Print Tarr(i, j); " ";

Next j

Print

Next i

End Sub
[解决办法]
arr1 1 2 3 4 5
arr2 9 8 7 6

你想得到什么结果?
1 2 3 4 5 6 9 8 7 6
1 2 3 4 5
1 2 3 4
9 8 7 6 1 2 3 4 5 6
...
[解决办法]
将arr1复制到arr2并替换掉arr2的长度和值

直接替换掉不就好了么……根本就不需要考虑arr2嘛……

读书人网 >ASP

热点推荐