Private Sub ymsz_Click()
  On Error Resume Next
With CommonDialog1
.Flags = cdlPDPrintSetup
.ShowPrinter
End With
End Sub

但页面设置为横向时,打印后并没有改变设置,是否缺少一句语句,
谢谢

谢谢!!!

我上面的代码怎样修改那?

[ 本帖最后由 看学 于 2011-6-24 19:25 编辑 ]