VC为自定类型动态分配

Question

在VB中自定以下列类型:Type udtX
    intCode1 as Integer
    intCode2 as Integer
End TypeType udtY
    usrX() as udtX
End TypeType udtMap
    usrY() as udtY
End TypeFunction Define_Map(usrMap as udtMap)
    dim flngX as Long
    dim flngY as Long    redim usrMap.usrY(1 to 10)
    for flngY=1 to 10
        redim usrMap.usrY(flngY).usrX(1 to 2)
    next flngY    for flngY=1 to 10
        for flngX=1 to 2
            usrMap.usrY(flngY).usrX(flngX).intCode1=flngX
            usrMap.usrY(flngY).usrX(flngX).intCode2=flngY
        next flngX
    next flngYEnd Function上面代码中动态分配内存的实现,如何在VC6.0中实现
期盼VC高手赐教    

Answer 1

有高手给用VC6代码实现上面的功能么? 帮忙写出对应的VC6编码.