打印纸张设置

Question

VB中如何制作一个对话框设置打印机的纸张格式,而且能从打印机中获得当前纸张的详细信息,并保存在数据库中

Answer 1

用CommonDialog来实现，加载：Project-Component-Microsoft Common Dialog Control 6.0   '打印机设置
    CommonDialog1.Flags = cdlPDPrintSetup
    CommonDialog1.ShowPrinter

Answer 2

使用printdlg函数可以得到纸张的相关信息.
至于走纸和换行,是程序提供的.
Public Declare Function PrintDlg Lib "comdlg32.dll" Alias "PrintDlgA" (pPrintdlg As PRINTDLG) As Long