如何列印旋轉字型(編號:3792)

HELLO: 各位先進,小弟在PICTURE BOX上利用CreateFontIndirect 及 SelectObject等API顯示出旋轉角度之文字,但現在想列印出此結果,但在Printer物件上同樣使用相同的API卻無法列印出旋轉角度之文字,程式碼如下,不知是哪出了問題,敬請指導,謝謝!
' L 為 LOGFONT 資料結構
L.lfEscapement = 450 ' 設定字型旋轉45度
mFont = CreateFontIndirect(L) ' 建立字型
    mPrevFont = SelectObject(Printer.hdc, mFont) ' 選取字型
    Printer.CurrentX = x ' 設定 X 座標
    Printer.CurrentY = y ' 設定 Y 座標
    Printer.Print inText ' 列印文字