打印机支持自定义纸张,但我的程序代码不能控制实现,而且是在win98下,不是2000系统。
连个表头都打不出来。不改代码,在系统内设置一下打印机的自定义纸张,就可以正常打印了。但我只想在程序内设置内。求大侠指点迷津。我的代码如下:   Dim myPrint As Printer
    
    Set myPrint = Printer
    With myPrint
        .PaperSize = vbPRPSUser
        .ScaleMode = 6
        .Orientation = 2
        .Width = 400
        .Height = 550
       
        .ScaleLeft = -5
        .ScaleTop = 30
        .CurrentX = 0
        .CurrentY = 40
        .Font = "黑体"
        .FontSize = 26
        Printer.Print Tab(30); "生 产 日 况 表"