How to complete CustomParameter (CastFrom, CastTo...)

Hello,..

I'm trying to make Custom Parameter, which include list of Point3d and Integer,

But it was not succeeded. Is there anyone who can help me?

/////

Public Structure CustomStruct
    Dim abc As Point3d
    Dim cde As Integer
End Structure

/////

and I attached my VB Code..