欢迎来到Doc100.Net免费学习资源知识分享平台!
您的位置:首页 > 程序异常 >

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

更新时间: 2014-01-05 00:56:35 责任编辑: Author_N1

 

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嘛……
上一篇:上一篇
下一篇:下一篇

 

随机推荐程序问答结果

 

 

如对文章有任何疑问请提交到问题反馈,或者您对内容不满意,请您反馈给我们DOC100.NET论坛发贴求解。
DOC100.NET资源网,机器学习分类整理更新日期::2014-01-05 00:56:35
如需转载,请注明文章出处和来源网址:http://www.doc100.net/bugs/t/1641/
本文WWW.DOC100.NET DOC100.NET版权所有。