如何在程序中設置打印機的紙裌

liangyubin2005 2006-07-25 05:15:12
我的打印機有上下兩個紙裌,我想在程序里將紙裌設定為下面的紙裌,而不用用戶選擇
我的做法是:

Dim printDoc As New PrintDocument()
printDoc.DefaultPageSettings.PaperSource.RawKind = 2 -- 我認爲這樣可以將紙裌設定為下面的紙裌

Dim pageSizes As New PaperSize
pageSizes.Width = 308
pageSizes.Height = 500
printDoc.DefaultPageSettings.PaperSize = pageSizes

printDoc.Print()

以上的做法後,紙張仍然從上面的紙裌出來
...全文
110 1 打赏 收藏 转发到动态 举报
写回复
用AI写文章
1 条回复
切换为时间正序
请发表友善的回复…
发表回复
水如烟 2006-07-25
  • 打赏
  • 举报
回复
RawKind其实是纸张类型.
你说的是进纸方式吗?在实际使用中手工操作的吗?估计用代码实行不了.

16,549

社区成员

发帖
与我相关
我的任务
社区描述
VB技术相关讨论,主要为经典vb,即VB6.0
社区管理员
  • VB.NET
  • 水哥阿乐
  • 无·法
加入社区
  • 近7日
  • 近30日
  • 至今
社区公告
暂无公告

试试用AI创作助手写篇文章吧