?? activereport3.dsr
字號:
VERSION 5.00
Begin {82282820-C017-11D0-A87C-00A0C90F29FC} ActiveReport3
Caption = "ActiveReport3"
ClientHeight = 8595
ClientLeft = 360
ClientTop = 345
ClientWidth = 11880
Icon = "ActiveReport3.dsx":0000
_ExtentX = 20955
_ExtentY = 15161
SectionData = "ActiveReport3.dsx":0442
End
Attribute VB_Name = "ActiveReport3"
Attribute VB_GlobalNameSpace = False
Attribute VB_Creatable = False
Attribute VB_PredeclaredId = True
Attribute VB_Exposed = False
Private Sub ActiveReport_DataInitialize()
With DataControl1
.ConnectionString = "DSN=Client_DBase;UID=ETOOUSER;PWD=bluesky;"
.Source = "select * from 交易統計表 where 交易日期 between cdate('" + SDate + "') and cdate('" + EDate + "')"
End With
Label14.Caption = "從 " + SDate + " 至" + EDate + "交易信息統計"
Me.Printer.Orientation = ddOLandscape
End Sub
?? 快捷鍵說明
復制代碼
Ctrl + C
搜索代碼
Ctrl + F
全屏模式
F11
切換主題
Ctrl + Shift + D
顯示快捷鍵
?
增大字號
Ctrl + =
減小字號
Ctrl + -