how convert VB6 to VB2010 code?

[joaquim]

correct me: the 'structure' is like 'class'?
(i'm asking, because we can use 'Initialize' function and we can add functions)
from VB6:

Private Type SAFEARRAY2D
    cDims As Integer
    fFeatures As Integer
    cbElements As Long
    cLocks As Long
    pvData As Long
    Bounds(0 To 1) As SAFEARRAYBOUND
End Type

to VB2010:

Private Structure SAFEARRAY2D
        Public cDims As Integer
        Public fFeatures As Integer
        Public cbElements As Long
        Public cLocks As Long
        Public pvData As Long

        <MarshalAs(UnmanagedType.ByValArray, SizeConst:=2)>
        Public Bounds() As SAFEARRAYBOUND

        Public Sub Initialize()
            ReDim Bounds(2)
        End Sub
    End Structure

is these correct?