Equivalent of (IntPtr)1 in VBNET?

Question

I've taken a piece of code from a @Hans Passant code from here: Bold text in MessageBox

this is the C# code:

SendMessage(hText, WM_SETFONT, mFont.ToHfont(), (IntPtr)1)

Which would be the translation into vb.net?

This will not work (cant be compiled):

SendMessage(hText, WM_SETFONT, mFont.ToHfont(), DirectCast(1, IntPtr))

@Douglas Barbin yes that's the compilation error thankyou for saying it. — ElektroStudios, Oct 09 '13 at 21:51
DirectCast is not a general-purpose conversion of the C# cast operator. The relationship between the type and the item being casted has to be one of inheritance or implementation. — Dave Doknjas, Oct 09 '13 at 22:41

score 6 · Accepted Answer · answered Oct 09 '13 at 21:46

6

Try this:

SendMessage(hText, WM_SETFONT, mFont.ToHfont(), New IntPtr(1))

answered Oct 09 '13 at 21:46

Douglas Barbin

1 Answers1