通常使うプリンタの取得

環境/言語:[Windows XP .NET FrameWork1.0]
分類:[.NET]

いつもお世話になっております。
早速ですが、VB.NET 2002で通常使うプリンタを取得したいのですが
なにかよい方法はありますか？
Ｃ++では

DWORD dwRet;
char cPrtname[256];
AnsiString strErrmsg;

//現在の通常使うプリンタの取得
dwRet = GetProfileString("windows", "device", "", cPrtname, sizeof(cPrtname));
if (dwRet == 0){
　　strErrmsg = SysErrorMessage(GetLastError());
　　Application->MessageBox(strErrmsg.c_str(),"",MB_OK);
}
ShowMessage(cPrtname);

という具合らしいですが、これをVB.NET 2002 で実現できないでしょうか？

■No1992に返信(tabさんの記事)
> 早速ですが、VB.NET 2002で通常使うプリンタを取得したいのですが
> なにかよい方法はありますか？

PrintDocumentオブジェクトを作成し、PrinterSettings.PrinterNameプロパティを調べれば分かるのではないでしょうか。

■No2054に返信(管理人さんの記事)

いつもお世話になっております。

> PrintDocumentオブジェクトを作成し、PrinterSettings.PrinterNameプロパティ>を調べれば分かるのではないでしょうか。

ご返答ありがとうございます。

Dim pd As New System.Drawing.Printing.PrintDocument()
Dim str As String
str = pd.PrinterSettings.PrinterName
MsgBox(str)

で取得できました。
簡単なことだったんですね。でもどうして調べたらよいかも
わかりませんでした。
これからは、もう少し自分で調べてみます。
ありがとうございました。