VB6复制数组AutoCAD

Question

我正在将我们的VBA AutoCAD脚本转移到VB.NET,但我发现了一个警告.VB.net 2010给我一个警告,这个代码是绝对的,并且有时不能用于64位.

由于我们的vba文件和AutoCAD 2012和Windows 7 X64存在问题,该程序需要64兼容.我需要使用什么而不是VB6.CopyArray？

If Flipline = True Then
        P1 = VB6.CopyArray(Endpoint)
        P2 = VB6.CopyArray(Beginpoint)
    Else
        P1 = VB6.CopyArray(Beginpoint)
        P2 = VB6.CopyArray(Endpoint)
    End If

Answer 1

根据Support.CopyArray的 MSDN文档:

Visual Basic 2010不再支持Visual Basic 6.0 Variant数据类型.升级工具使用CopyArray函数将数组复制到Variant数组或从Variant数组复制数组.

若要在Visual Basic 2010中复制数组,请使用Array类的Clone,Copy或CopyTo方法.

Array.Clone文档

如果Endpoint是数组,那么:

P1 = Endpoint.Clone()