📄 sc_zztz_rpt.dsr
字号:
VERSION 5.00
Begin {82282820-C017-11D0-A87C-00A0C90F29FC} sc_zztz_rpt
Caption = "生产令单输出报表"
ClientHeight = 11115
ClientLeft = 60
ClientTop = 345
ClientWidth = 15240
Icon = "sc_zztz_rpt.dsx":0000
StartUpPosition = 3 '窗口缺省
_ExtentX = 26882
_ExtentY = 19606
SectionData = "sc_zztz_rpt.dsx":030A
End
Attribute VB_Name = "sc_zztz_rpt"
Attribute VB_GlobalNameSpace = False
Attribute VB_Creatable = False
Attribute VB_PredeclaredId = True
Attribute VB_Exposed = False
Private Sub ActiveReport_ReportStart()
'Me.Printer.DeviceName = ""
lbl_gsmc.Caption = Trim(c_gsmc)
'Me.Printer.PaperSize = 256
'Me.Printer.PaperHeight = 13 * 1440 / 2.5 '(1 inch = 1440 twips, so this would be 8 inches)
'Me.Printer.PaperWidth = 22 * 1440 / 2.5
'Lbl_cdizh.Caption = Trim(c_dizh)
'Lbl_dh.Caption = Trim(gs_dh)
'Lbl_cz.Caption = Trim(gs_cz)
'sc_zztz_rpt.Printer.Orientation = ddOPortrait
'sc_zztz_rpt.Printer.PaperSize = vbPRPSEnvB6
End Sub
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -