以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  怎么把 PageSetting.PaperKind 全部值取出来。  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=46946)

--  作者:ndxfke
--  发布时间:2014/3/1 20:19:00
--  怎么把 PageSetting.PaperKind 全部值取出来。
怎么把 PageSetting.PaperKind  全部值取出来。



--  作者:有点甜
--  发布时间: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
--  发布时间:2014/3/1 21:04:00
--  
收到,谢谢~~

学习的路还很长啊...

--  作者:fendouww
--  发布时间:2020/7/28 16:14:00
--  
可以获得所有PaperKind值的纸张尺寸吗?比如210*249
--  作者:有点蓝
--  发布时间: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