Foxtable(狐表)用户栏目专家坐堂 → 怎么把 PageSetting.PaperKind 全部值取出来。


  共有3853人关注过本帖树形打印复制链接

主题:怎么把 PageSetting.PaperKind 全部值取出来。

帅哥哟,离线,有人找我吗?
ndxfke
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:三尾狐 帖子:792 积分:5649 威望:0 精华:0 注册:2013/12/9 20:12:00
怎么把 PageSetting.PaperKind 全部值取出来。  发帖心情 Post By:2014/3/1 20:19:00 [只看该作者]

怎么把 PageSetting.PaperKind  全部值取出来。



 回到顶部
帅哥哟,离线,有人找我吗?
有点甜
  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:版主 帖子:85326 积分:427815 威望:0 精华:5 注册:2012/10/18 22:13:00
  发帖心情 Post By:2014/3/1 20:47:00 [只看该作者]

 如下代码

For Each item As Integer In [Enum].GetValues(Gettype(Printing.PaperKind))
    output.Show(item)
Next

For Each item As String In [Enum].GetNames(Gettype(Printing.PaperKind))
    output.Show(item)
Next


 回到顶部
帅哥哟,离线,有人找我吗?
ndxfke
  3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:三尾狐 帖子:792 积分:5649 威望:0 精华:0 注册:2013/12/9 20:12:00
  发帖心情 Post By:2014/3/1 21:04:00 [只看该作者]

收到,谢谢~~

学习的路还很长啊...

 回到顶部
帅哥哟,离线,有人找我吗?
fendouww
  4楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:小狐 帖子:312 积分:2519 威望:0 精华:0 注册:2019/7/19 13:09:00
  发帖心情 Post By:2020/7/28 16:14:00 [只看该作者]

可以获得所有PaperKind值的纸张尺寸吗?比如210*249

 回到顶部
帅哥哟,离线,有人找我吗?
有点蓝
  5楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:110574 积分:562760 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2020/7/28 16:37:00 [只看该作者]

Dim prtdoc As new Printing.PrintDocument()
For Each ps As System.Drawing.Printing.PaperSize In prtdoc.PrinterSettings.PaperSizes  '生成打印机的纸张下拉列表
    Output.Show(ps.Kind & "," & ps.PaperName & "," & ps.width & "*" & ps.height)
Next

 回到顶部