Question

我正在将我们的VBA AutoCAD脚本转移到VB.NET，但我遇到了警告。 VB.net 2010给我一个警告，这个代码是无条件的，并且有时不能用64位。

该程序需要64兼容，因为我们的vba文件和AutoCAD 2012＆amp; amp; Windows 7 X64。我需要使用什么而不是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 Documentation

如果Endpoint是一个数组，那么：

P1 = Endpoint.Clone()

VB6复制数组AutoCAD

1 个答案: