📄 单据查询.frm
字号:
VERSION 5.00
Object = "{A0C292A3-118E-11D2-AFDF-000021730160}#1.0#0"; "UFEDIT.OCX"
Object = "{7E0DF0CE-703B-11D3-8E57-0000210152D8}#1.0#0"; "UsRefBut.ocx"
Begin VB.Form frmFind
BorderStyle = 3 'Fixed Dialog
Caption = "查询"
ClientHeight = 3480
ClientLeft = 1125
ClientTop = 2895
ClientWidth = 6945
Icon = "单据查询.frx":0000
LinkTopic = "Form2"
LockControls = -1 'True
MaxButton = 0 'False
MinButton = 0 'False
ScaleHeight = 3480
ScaleWidth = 6945
ShowInTaskbar = 0 'False
Begin VB.CommandButton Command2
Cancel = -1 'True
Height = 365
Index = 1
Left = 5730
Style = 1 'Graphical
TabIndex = 13
Top = 930
Width = 1080
End
Begin VB.CommandButton Command2
Default = -1 'True
Height = 365
Index = 0
Left = 5730
Style = 1 'Graphical
TabIndex = 12
Top = 390
Width = 1080
End
Begin VB.Frame Frame1
Caption = "请输入查询条件"
Height = 3075
Left = 210
TabIndex = 16
Top = 120
Width = 5355
Begin UsRefBut.RefCmd RefCmd1
Height = 282
Index = 1
Left = 3516
TabIndex = 25
Top = 1260
Width = 300
_ExtentX = 529
_ExtentY = 503
RefMode = 1
RefUnitMode = 0
RefAccMode = 0
Enabled = -1 'True
End
Begin UsRefBut.RefCmd RefCmd1
Height = 282
Index = 0
Left = 4356
TabIndex = 24
Top = 930
Width = 300
_ExtentX = 529
_ExtentY = 503
RefMode = 0
RefUnitMode = 1
RefAccMode = 0
Enabled = -1 'True
End
Begin EDITLib.Edit edtZDR
Height = 270
Left = 1290
TabIndex = 10
Top = 2250
Width = 1695
_Version = 65536
_ExtentX = 2990
_ExtentY = 476
_StockProps = 253
ForeColor = 0
BackColor = 16777215
Appearance = 1
MaxLength = 10
BadStr = "|'"""
End
Begin EDITLib.Edit edtJeFrom
Height = 270
Left = 1290
TabIndex = 6
Top = 1590
Width = 1695
_Version = 65536
_ExtentX = 2990
_ExtentY = 476
_StockProps = 253
ForeColor = 0
BackColor = 16777215
Appearance = 1
Property = 4
NumPoint = 2
MaxLength = 14
End
Begin EDITLib.Edit edtZhh
Height = 270
Left = 1290
TabIndex = 5
Top = 1260
Width = 2175
_Version = 65536
_ExtentX = 3836
_ExtentY = 476
_StockProps = 253
ForeColor = 0
BackColor = 16777215
Appearance = 1
MaxLength = 60
BadStr = "|'"""
End
Begin EDITLib.Edit edtDwmc
Height = 270
Left = 1290
TabIndex = 4
Top = 930
Width = 3015
_Version = 65536
_ExtentX = 5318
_ExtentY = 476
_StockProps = 253
ForeColor = 0
BackColor = 16777215
Appearance = 1
MaxLength = 60
BadStr = "|'"""
End
Begin EDITLib.Edit edtBhFrom
Height = 270
Left = 1290
TabIndex = 2
Top = 600
Width = 915
_Version = 65536
_ExtentX = 1614
_ExtentY = 476
_StockProps = 253
ForeColor = 0
BackColor = 16777215
Appearance = 1
Property = 2
MaxLength = 8
BadStr = "|'"""
End
Begin EDITLib.Edit edtDateFrom
Height = 270
Left = 1290
TabIndex = 0
Top = 270
Width = 1065
_Version = 65536
_ExtentX = 1879
_ExtentY = 476
_StockProps = 253
ForeColor = 0
BackColor = 16777215
Appearance = 1
Property = 5
MaxLength = 10
End
Begin VB.CheckBox Check1
Caption = "包含未记帐单据"
Height = 285
Left = 1290
TabIndex = 11
Top = 2670
Value = 1 'Checked
Width = 1695
End
Begin VB.CommandButton Command1
Height = 252
Index = 1
Left = 4020
Style = 1 'Graphical
TabIndex = 15
Top = 285
Width = 264
End
Begin VB.CommandButton Command1
Height = 252
Index = 0
Left = 2370
Style = 1 'Graphical
TabIndex = 14
Top = 285
Width = 264
End
Begin EDITLib.Edit edtDateTo
Height = 270
Left = 2940
TabIndex = 1
Top = 270
Width = 1065
_Version = 65536
_ExtentX = 1879
_ExtentY = 476
_StockProps = 253
ForeColor = 0
BackColor = 16777215
Appearance = 1
Property = 5
MaxLength = 10
End
Begin EDITLib.Edit edtBhTo
Height = 270
Left = 2550
TabIndex = 3
Top = 600
Width = 915
_Version = 65536
_ExtentX = 1614
_ExtentY = 476
_StockProps = 253
ForeColor = 0
BackColor = 16777215
Appearance = 1
Property = 2
MaxLength = 8
BadStr = "|'"""
End
Begin EDITLib.Edit edtJeTo
Height = 270
Left = 3300
TabIndex = 7
Top = 1590
Width = 1695
_Version = 65536
_ExtentX = 2990
_ExtentY = 476
_StockProps = 253
ForeColor = 0
BackColor = 16777215
Appearance = 1
Property = 4
NumPoint = 2
MaxLength = 14
End
Begin EDITLib.Edit edtBjeFrom
Height = 270
Left = 1290
TabIndex = 8
Top = 1920
Width = 1695
_Version = 65536
_ExtentX = 2990
_ExtentY = 476
_StockProps = 253
ForeColor = 0
BackColor = 16777215
Appearance = 1
Property = 4
NumPoint = 2
MaxLength = 14
End
Begin EDITLib.Edit edtBjeTo
Height = 270
Left = 3300
TabIndex = 9
Top = 1920
Width = 1695
_Version = 65536
_ExtentX = 2990
_ExtentY = 476
_StockProps = 253
ForeColor = 0
BackColor = 16777215
Appearance = 1
Property = 4
NumPoint = 2
MaxLength = 14
End
Begin VB.Line Line1
Index = 3
X1 = 3060
X2 = 3220
Y1 = 2100
Y2 = 2100
End
Begin VB.Line Line1
Index = 2
X1 = 3060
X2 = 3220
Y1 = 1740
Y2 = 1740
End
Begin VB.Line Line1
Index = 1
X1 = 2280
X2 = 2440
Y1 = 720
Y2 = 720
End
Begin VB.Line Line1
Index = 0
X1 = 2700
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -