Windows 2000/XP で、Printer.PaperSize に用紙サイズを代入しても反映されない場合があります。Printer.PaperBin も動作しません。これを解決するには、プリンタ設定関連のAPIを利用する必要があります。
ＶＢレスキュ−（花ちゃん） にサンプルがあるので、そちらを参考にするといいでしょう。
  [VB6.0関係]→印刷関係→プリンタ設定ダイアログボックスを表示（APIを使って）　（その１・その２）