[VB6→VB.NET] 구조체 안에 배열선언

VB.NET에서는 구조체 안에 배열선언이 안된다.
별로도 초기화를 할 필요가 있음. 정말 가지가지한다.

[VB6 정의]

Type STATUS
    No           As Integer
    User(16)   As Integer
End Type

[VB6 선언]

Global gUser As STATUS

[VB.NET 정의]

 Structure STATUS
        Dim No As Short
        <VBFixedArray(16)> Dim User() As Short

        Public Sub Initialize()
            ReDim User(16)
        End Sub
 End Structure

[VB.NET 선언]

'선언
Global gUser As STATUS

'초기화
gUser.Initialize()