This is taught to me by a Chinese tech expert named *ABC, he is my master
Dynamic UDT TypeLibs
https://www.vbforums.com/showthread....c-UDT-TypeLibs
Code:
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.UserNamehttps://www.vbforums.com/showthread....c-UDT-TypeLibs