sc_zztz_rpt.dsr

来自「基于SQL2000的企业管理MRPII,包含进销存,财务,报关等组件,VB6开发」· DSR 代码 · 共 32 行

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