.net - VB .NET 中的结构，如 COBOL

Question

我正在将 COBOL 程序转换为 VB .NET。

有没有办法像 COBOL 一样使用 VB NET 中的结构？

例如：

COBOL：

01 VAR1
    10  VAR11 PIC X
    10  VAR12 PIC X

MOVE 'AA' TO VAR1

之后 VAR11 = A 和 VAR12 = A

有没有办法将字符串移动到 VB NET 中结构的顶部标题上，并且该结构的每个成员都获取相应字符串的“片段”？

谢谢你。

Answer 1

不，但是 VB.Net（嗯，它不是 VB 特定的）String类提供了很多功能——你可以像数组一样索引Substring它，你可以请求s 等等。

不要试图从字面上复制 COBOL 程序的所有方面。寻找可以编写更简洁的 VB 代码的小胜利。

Answer 2

这可能是红鲱鱼，但会像：

Public Declare Sub CopyMemory Lib "kernel32" Alias "RtlMoveMemory" (Destination As Any, Source As Any, ByVal Length As Long)

以任何方式帮助？组级移动几乎是字节移动的无类型字节。也许明智地使用记忆动作就足够了？或者使整个事情崩溃，因为这将是值得水泥围栏的精致代码。

使用它可能还需要明智地使用

VarPtr(), StrPtr(), or ObjPtr()

得到指针。