This is taught to me by a Chinese tech expert named *ABC, he is my master
`Dim PP As UserInfoPtr, U1 As UserInfo
U1.ID = 135
U1.v = 1
U1.UserName = "TOM"
Dim ClassA As New Class1
ClassA.SubInClass1 VarPtr(U1)
MsgBox "Data changeed?UserInfo.V=" & U1.v & "," & U1.UserName`
Dynamic UDT TypeLibs
[url]https://www.vbforums.com/showthread.php?899136-Dynamic-UDT-TypeLibs[/url]
Top comments (0)