本人编写的 可 更改 任意打印机的默认纸张类型、 大小、走纸方向的 可自定义纸张的 dll文件，使用时，可先设置纸张大小及方向，然后程序中调用打印，即可 按照指定 纸张大小 走纸， 控制准确，更改迅速， 更改完之后 还可 将 打印机默认纸张 还原为调用前的纸张类型 虽用vb编码，但其他语言也可调用此dll 详细函数调用如下 '以下函数均可独立使用 Dim p As New PrinSetUserDefine.PrintSetUserDefine '改变指定打印机的 默认纸张大小及方向,指定打印机不一定是默认打印机 Call p.StartPrintUserPage(28, 24, 1, "EPSON LQ-1600K IIIH ESC/P 2") '改变当前默认打印机的 默认纸张大小及方向 Call p.StartPrintUserPage(28, 24, 1) Dim height As Double '可以获取 指定打印机名的 最大支持纸张高度 height = p.GetMaxPaperLength_Dmm("EPSON LQ-1600K IIIH ESC/P 2") '也可将指定打印机名 设为 默认打印机， 对于必须设置为默认打印，才可调用打印报表的程序 非常有用 Call p.SetPrinterToDefault("EPSON LQ-1600K IIIH ESC/P 2") '还原打印机默认纸张为 自定义之前的纸张 Call p.EndPrintUserPage