How to use StructToPtr with SendMessage?

[SamSpade]

In my C# library I have many SendMessages like the following:

[DllImport("user 32.dll", EntryPoint="Sen dMessage",CharS et=CharSet.Auto )]

public static extern int SendMessage(Int Ptr hwnd, int wMsg, int wParam, ref
PARAFORMAT2 pf2);

I use this one like this:

Dim lSelectedParagr aph As PARAFORMAT2

Rtf.SendMessage (gctlText.TxtHa ndle, Rtf.EM_GETPARAF ORMAT, 0,
lSelectedParagr aph)

So that I do not need to define a SendMesage for each usage, I think I could
define:

[DllImport("user 32.dll", CharSet=CharSet .Auto, SetLastError=tr ue)]public
static extern int SendMessage(

IntPtr hWnd, [MarshalAs(Unman agedType.U4)] int Msg,IntPtr wParam, IntPtr
lParam);

Could someone show me how to write the VB SendMessage call that will use
this SendMessage??

I think if I have one example I can figure out how to do the others,

Thanks in advance

Thanks