📄 frmorder.frm
字号:
VERSION 5.00
Object = "{0BA686C6-F7D3-101A-993E-0000C0EF6F5E}#1.0#0"; "THREED32.OCX"
Object = "{831FDD16-0C5C-11D2-A9FC-0000F8754DA1}#2.0#0"; "MSCOMCTL.OCX"
Object = "{86CF1D34-0C5F-11D2-A9FC-0000F8754DA1}#2.0#0"; "MSCOMCT2.OCX"
Object = "{5E9E78A0-531B-11CF-91F6-C2863C385E30}#1.0#0"; "MSFLXGRD.OCX"
Object = "{29743316-0803-11D5-AD8E-0050BAA9AC14}#5.0#0"; "FocusText.ocx"
Begin VB.Form frmOrder
BackColor = &H80000000&
BorderStyle = 3 'Fixed Dialog
Caption = "订单管理系统"
ClientHeight = 7380
ClientLeft = 45
ClientTop = 330
ClientWidth = 11865
ControlBox = 0 'False
Icon = "frmOrder.frx":0000
LinkTopic = "Form1"
LockControls = -1 'True
MaxButton = 0 'False
MinButton = 0 'False
ScaleHeight = 7380
ScaleWidth = 11865
ShowInTaskbar = 0 'False
StartUpPosition = 3 '窗口缺省
WindowState = 2 'Maximized
Begin VB.Timer timeDate
Interval = 1000
Left = 3525
Top = 2130
End
Begin VB.PictureBox picBrowser
BackColor = &H80000004&
Height = 5685
Left = 1410
ScaleHeight = 5625
ScaleWidth = 11685
TabIndex = 38
Top = -4980
Visible = 0 'False
Width = 11745
Begin VB.PictureBox picTool1
BackColor = &H80000004&
BorderStyle = 0 'None
Height = 945
Left = 135
ScaleHeight = 945
ScaleWidth = 11265
TabIndex = 40
Top = 3600
Width = 11265
Begin Threed.SSOption optStatus
Height = 345
Index = 0
Left = 6060
TabIndex = 50
Top = 495
Width = 1140
_Version = 65536
_ExtentX = 2011
_ExtentY = 609
_StockProps = 78
Caption = "仅显示草稿"
BeginProperty Font {0BE35203-8F91-11CE-9DE3-00AA004BB851}
Name = "宋体"
Size = 9
Charset = 134
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
End
Begin 给出焦点文本框.FocusText txtSupplerName
Height = 300
Left = 1230
TabIndex = 44
Top = 510
Width = 4575
_ExtentX = 8070
_ExtentY = 529
BeginProperty Font {0BE35203-8F91-11CE-9DE3-00AA004BB851}
Name = "宋体"
Size = 9
Charset = 134
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
BorderStyle = 0
End
Begin VB.CommandButton cmdDisplayorder
Caption = "显示所有"
Height = 390
Left = 7200
TabIndex = 46
Top = 15
Width = 1260
End
Begin VB.CommandButton cmdSearchOrder
Caption = "查询(S)"
Height = 390
Left = 5895
TabIndex = 45
Top = 15
Width = 1260
End
Begin MSComCtl2.DTPicker dtStartDate
Height = 330
Left = 1230
TabIndex = 41
Top = 60
Width = 1725
_ExtentX = 3043
_ExtentY = 582
_Version = 393216
BeginProperty Font {0BE35203-8F91-11CE-9DE3-00AA004BB851}
Name = "宋体"
Size = 9
Charset = 134
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
CalendarBackColor= 16777215
Format = 24510465
CurrentDate = 36949
End
Begin VB.CommandButton cmdReturn
Caption = "返回(&B)"
Height = 390
Left = 8835
TabIndex = 48
Top = 15
Width = 1260
End
Begin MSComCtl2.DTPicker dtEndDate
Height = 330
Left = 4095
TabIndex = 42
Top = 60
Width = 1725
_ExtentX = 3043
_ExtentY = 582
_Version = 393216
BeginProperty Font {0BE35203-8F91-11CE-9DE3-00AA004BB851}
Name = "宋体"
Size = 9
Charset = 134
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
Format = 24510465
CurrentDate = 36949
End
Begin Threed.SSOption optStatus
Height = 345
Index = 1
Left = 7345
TabIndex = 51
Top = 495
Width = 1140
_Version = 65536
_ExtentX = 2011
_ExtentY = 609
_StockProps = 78
Caption = "仅显示执行"
BeginProperty Font {0BE35203-8F91-11CE-9DE3-00AA004BB851}
Name = "宋体"
Size = 9
Charset = 134
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
End
Begin Threed.SSOption optStatus
Height = 345
Index = 2
Left = 8630
TabIndex = 52
Top = 495
Width = 1140
_Version = 65536
_ExtentX = 2011
_ExtentY = 609
_StockProps = 78
Caption = "仅显示完成"
BeginProperty Font {0BE35203-8F91-11CE-9DE3-00AA004BB851}
Name = "宋体"
Size = 9
Charset = 134
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
End
Begin Threed.SSOption optStatus
Height = 345
Index = 3
Left = 9915
TabIndex = 53
Top = 495
Width = 1140
_Version = 65536
_ExtentX = 2011
_ExtentY = 609
_StockProps = 78
Caption = "显示所有"
BeginProperty Font {0BE35203-8F91-11CE-9DE3-00AA004BB851}
Name = "宋体"
Size = 9
Charset = 134
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
Value = -1 'True
End
Begin VB.Label Label2
AutoSize = -1 'True
BackStyle = 0 'Transparent
Caption = "供应商名："
Height = 180
Index = 1
Left = 180
TabIndex = 49
Top = 570
Width = 900
End
Begin VB.Label Label3
AutoSize = -1 'True
BackStyle = 0 'Transparent
Caption = "结束日期："
Height = 180
Left = 3090
TabIndex = 47
Top = 120
Width = 900
End
Begin VB.Label Label2
AutoSize = -1 'True
BackStyle = 0 'Transparent
Caption = "开始日期："
Height = 180
Index = 0
Left = 180
TabIndex = 43
Top = 120
Width = 900
End
End
Begin MSFlexGridLib.MSFlexGrid Grid4
Height = 2955
Left = 135
TabIndex = 39
Top = 105
Width = 5460
_ExtentX = 9631
_ExtentY = 5212
_Version = 393216
ForeColor = 0
BackColorSel = 16777152
ForeColorSel = 0
AllowBigSelection= 0 'False
Enabled = -1 'True
FocusRect = 0
SelectionMode = 1
BeginProperty Font {0BE35203-8F91-11CE-9DE3-00AA004BB851}
Name = "宋体"
Size = 9
Charset = 134
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
End
End
Begin VB.PictureBox picSelectP
BackColor = &H80000004&
Height = 5385
Left = -3210
ScaleHeight = 5325
ScaleWidth = 10110
TabIndex = 31
Top = 6510
Visible = 0 'False
Width = 10170
Begin VB.PictureBox Picture1
BackColor = &H80000004&
BorderStyle = 0 'None
Height = 495
Left = 60
ScaleHeight = 495
ScaleWidth = 10200
TabIndex = 32
Top = 5115
Width = 10200
Begin VB.CommandButton Command5
Caption = "目录(&B)"
Height = 390
Left = 6495
TabIndex = 35
Top = 30
Width = 1245
End
Begin VB.CommandButton Command4
Caption = "查找(&S)"
Enabled = 0 'False
Height = 390
Left = 5055
TabIndex = 34
Top = 30
Width = 1260
End
Begin VB.CommandButton Command3
BackColor = &H00FFFFFF&
Cancel = -1 'True
Caption = "返回(&R)"
Height = 390
Left = 8025
MaskColor = &H00FFFFFF&
TabIndex = 33
Top = 30
Width = 1230
End
Begin 给出焦点文本框.FocusText FocusText1
Height = 315
Left = 1500
TabIndex = 36
Top = 60
Width = 3435
_ExtentX = 6059
_ExtentY = 556
BeginProperty Font {0BE35203-8F91-11CE-9DE3-00AA004BB851}
Name = "宋体"
Size = 10.5
Charset = 134
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
BorderStyle = 0
GotBackColor = 16777215
GotForeColor = 12582912
LostBackColor = 14737632
LostForeColor = 12582912
PreControl = "Grid1"
End
Begin VB.Label Label1
AutoSize = -1 'True
BackStyle = 0 'Transparent
Caption = "请输入产品:"
Height = 180
Index = 9
Left = 225
TabIndex = 37
Top = 120
Width = 990
End
End
Begin MSFlexGridLib.MSFlexGrid Grid3
Height = 3825
Left = 120
TabIndex = 5
Top = 75
Width = 5130
_ExtentX = 9049
_ExtentY = 6747
_Version = 393216
BackColorSel = 14737632
ForeColorSel = 192
AllowBigSelection= 0 'False
FocusRect = 0
SelectionMode = 1
BeginProperty Font {0BE35203-8F91-11CE-9DE3-00AA004BB851}
Name = "宋体"
Size = 9
Charset = 134
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
End
End
Begin VB.PictureBox picSelectSuppler
BackColor = &H80000004&
Height = 5955
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -