📄 frmqstorage.frm
字号:
VERSION 5.00
Object = "{5E9E78A0-531B-11CF-91F6-C2863C385E30}#1.0#0"; "msflxgrd.ocx"
Begin VB.Form frmQStorage
BackColor = &H00C0E0FF&
BorderStyle = 1 'Fixed Single
Caption = "库存查询"
ClientHeight = 7875
ClientLeft = 45
ClientTop = 435
ClientWidth = 10320
Icon = "frmQStorage.frx":0000
LinkTopic = "Form6"
MaxButton = 0 'False
MDIChild = -1 'True
MinButton = 0 'False
ScaleHeight = 7875
ScaleWidth = 10320
Begin VB.CommandButton CmdAdd
Caption = "添 加(A)"
BeginProperty Font
Name = "幼圆"
Size = 12
Charset = 134
Weight = 700
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
Height = 495
Left = 5160
TabIndex = 21
Top = 6960
Width = 2175
End
Begin VB.CommandButton CmdModify
Caption = "修 改(&M)"
BeginProperty Font
Name = "幼圆"
Size = 12
Charset = 134
Weight = 700
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
Height = 495
Left = 2760
TabIndex = 19
Top = 6960
Width = 2175
End
Begin VB.CommandButton CmdDel
Caption = "删 除(&D)"
BeginProperty Font
Name = "幼圆"
Size = 12
Charset = 134
Weight = 700
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
Height = 495
Left = 360
TabIndex = 18
Top = 6960
Width = 2175
End
Begin VB.CommandButton CmdExit
Caption = "退 出(&E)"
BeginProperty Font
Name = "幼圆"
Size = 12
Charset = 134
Weight = 700
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
Height = 495
Left = 7560
TabIndex = 8
Top = 6960
Width = 2175
End
Begin VB.Frame Frame1
BackColor = &H00C0E0FF&
Caption = "请选择查询项目，查询条件"
BeginProperty Font
Name = "幼圆"
Size = 12
Charset = 134
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
ForeColor = &H00000000&
Height = 2415
Left = 120
TabIndex = 1
Top = 1080
Width = 10000
Begin VB.OptionButton OptSPID
BackColor = &H00C0E0FF&
Caption = "Option4"
Height = 255
Left = 360
MaskColor = &H00C0E0FF&
TabIndex = 23
Top = 1853
Width = 255
End
Begin VB.OptionButton OptAmount
BackColor = &H00C0E0FF&
Caption = "Option3"
Height = 180
Left = 360
TabIndex = 22
Top = 1364
Width = 255
End
Begin VB.CommandButton CmdQuery
Caption = "查 询(&Q)"
BeginProperty Font
Name = "幼圆"
Size = 12
Charset = 134
Weight = 700
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
Height = 495
Left = 6840
TabIndex = 17
Top = 1560
Width = 2175
End
Begin VB.CommandButton CmdINT
Caption = "初 始 化(&I)"
BeginProperty Font
Name = "幼圆"
Size = 12
Charset = 134
Weight = 700
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
Height = 495
Left = 6840
TabIndex = 16
Top = 480
Width = 2175
End
Begin VB.OptionButton OptName
BackColor = &H00C0E0FF&
Caption = "Option2"
Height = 180
Left = 360
TabIndex = 13
Top = 877
Width = 255
End
Begin VB.ComboBox Comb1
BeginProperty Font
Name = "宋体"
Size = 12
Charset = 134
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
Height = 360
ItemData = "frmQStorage.frx":030A
Left = 3720
List = "frmQStorage.frx":0317
Style = 2 'Dropdown List
TabIndex = 12
Top = 1274
Width = 1695
End
Begin VB.OptionButton OptID
BackColor = &H00C0E0FF&
Caption = "Option1"
Height = 180
Left = 360
TabIndex = 10
Top = 390
Width = 255
End
Begin VB.TextBox TxtName
BeginProperty Font
Name = "宋体"
Size = 12
Charset = 134
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
Height = 375
Left = 3720
TabIndex = 9
Top = 780
Width = 1695
End
Begin VB.TextBox TxtID
BeginProperty Font
Name = "宋体"
Size = 12
Charset = 134
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
Height = 375
Left = 3720
TabIndex = 0
Top = 293
Width = 1695
End
Begin VB.TextBox TxtSPID
BeginProperty Font
Name = "宋体"
Size = 12
Charset = 134
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
Height = 375
Left = 3720
TabIndex = 2
Top = 1800
Width = 1695
End
Begin VB.Label Label8
AutoSize = -1 'True
BackStyle = 0 'Transparent
Caption = "LIKE"
BeginProperty Font
Name = "宋体"
Size = 12
Charset = 134
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
ForeColor = &H00FF0000&
Height = 240
Left = 2640
TabIndex = 20
Top = 840
Width = 480
End
Begin VB.Label Label5
AutoSize = -1 'True
BackStyle = 0 'Transparent
Caption = "LIKE"
BeginProperty Font
Name = "宋体"
Size = 12
Charset = 134
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
ForeColor = &H00FF0000&
Height = 240
Left = 2640
TabIndex = 15
Top = 1860
Width = 480
End
Begin VB.Label Label7
AutoSize = -1 'True
BackStyle = 0 'Transparent
Caption = "LIKE"
BeginProperty Font
Name = "宋体"
Size = 12
Charset = 134
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
ForeColor = &H00FF0000&
Height = 240
Left = 2640
TabIndex = 14
Top = 360
Width = 480
End
Begin VB.Label Label6
AutoSize = -1 'True
BackStyle = 0 'Transparent
Caption = "商 品 名 称"
BeginProperty Font
Name = "宋体"
Size = 12
Charset = 134
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
Height = 240
Left = 840
TabIndex = 11
Top = 840
Width = 1320
End
Begin VB.Label Label3
AutoSize = -1 'True
BackStyle = 0 'Transparent
Caption = "库 存 数 量 "
BeginProperty Font
Name = "宋体"
Size = 12
Charset = 134
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
Height = 240
Left = 840
TabIndex = 5
Top = 1334
Width = 1440
End
Begin VB.Label Label2
AutoSize = -1 'True
BackStyle = 0 'Transparent
Caption = "商 品 编 号"
BeginProperty Font
Name = "宋体"
Size = 12
Charset = 134
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
Height = 240
Left = 840
TabIndex = 4
Top = 360
Width = 1320
End
Begin VB.Label Label4
AutoSize = -1 'True
BackStyle = 0 'Transparent
Caption = "厂 商 编 号"
BeginProperty Font
Name = "宋体"
Size = 12
Charset = 134
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -