c# - VBNET の (IntPtr)1 と同等ですか?

Question

ここから @Hans Passant コードからコードを抜粋しました: MessageBox の太字のテキスト

これはC＃コードです：

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

vb.netへの翻訳はどれですか?

これは機能しません (コンパイルできません):

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