📄 sproduct.frm
字号:
VERSION 5.00
Object = "{5E9E78A0-531B-11CF-91F6-C2863C385E30}#1.0#0"; "MSFLXGRD.OCX"
Begin VB.Form SProduct
AutoRedraw = -1 'True
BackColor = &H00E0E0E0&
BorderStyle = 3 'Fixed Dialog
Caption = "入库单"
ClientHeight = 3600
ClientLeft = 45
ClientTop = 330
ClientWidth = 8505
Icon = "Sproduct.frx":0000
LinkTopic = "Form1"
LockControls = -1 'True
MaxButton = 0 'False
MDIChild = -1 'True
MinButton = 0 'False
ScaleHeight = 3600
ScaleWidth = 8505
ShowInTaskbar = 0 'False
Begin VB.PictureBox Report1
Height = 480
Left = 90
ScaleHeight = 420
ScaleWidth = 1140
TabIndex = 17
Top = 3045
Width = 1200
End
Begin VB.CommandButton PrintRK
Caption = "打印(&P)"
Height = 405
Left = 7140
TabIndex = 5
Top = 1095
Width = 1215
End
Begin VB.CommandButton CloseForm
Cancel = -1 'True
Caption = "关闭窗口"
Height = 405
Left = 7140
TabIndex = 4
Top = 690
Width = 1215
End
Begin VB.CommandButton ADDproduct
Caption = "添加入库"
Default = -1 'True
Enabled = 0 'False
Height = 405
Left = 7140
TabIndex = 3
Top = 300
Width = 1215
End
Begin MSFlexGridLib.MSFlexGrid Grid2
Height = 3705
Left = -30
TabIndex = 16
Top = -15
Width = 2955
_ExtentX = 5212
_ExtentY = 6535
_Version = 393216
Rows = 12
Cols = 4
ForeColor = 0
BackColorFixed = 14737632
BackColorSel = 12648384
ForeColorSel = 8388608
BackColorBkg = 14737632
GridColorFixed = 8421376
AllowBigSelection= 0 'False
FocusRect = 0
ScrollBars = 2
SelectionMode = 1
Appearance = 0
End
Begin VB.TextBox JSRtxt
Enabled = 0 'False
Height = 285
Left = 6735
TabIndex = 14
Top = 1860
Width = 1620
End
Begin VB.TextBox RQtxt
Enabled = 0 'False
Height = 285
Left = 4305
MultiLine = -1 'True
TabIndex = 12
Top = 1860
Width = 1215
End
Begin VB.PictureBox Picture1
AutoRedraw = -1 'True
BackColor = &H000000C0&
DrawStyle = 3 'Dash-Dot
FillStyle = 2 'Horizontal Line
Height = 1125
Left = 2970
ScaleHeight = 1065
ScaleWidth = 5475
TabIndex = 9
Top = 2490
Width = 5535
Begin VB.Image Image1
Height = 780
Left = 4005
Picture = "Sproduct.frx":08CA
Stretch = -1 'True
Top = 165
Width = 1335
End
Begin VB.Label Label5
AutoSize = -1 'True
BackStyle = 0 'Transparent
Caption = "产品类型:"
BeginProperty Font
Name = "幼圆"
Size = 18
Charset = 134
Weight = 700
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
ForeColor = &H0000FFFF&
Height = 360
Left = 2085
TabIndex = 11
Top = 390
Width = 1710
End
Begin VB.Label Label4
AutoSize = -1 'True
BackStyle = 0 'Transparent
Caption = "产品类型:"
BeginProperty Font
Name = "幼圆"
Size = 18
Charset = 134
Weight = 700
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
ForeColor = &H0000FF00&
Height = 360
Left = 360
TabIndex = 10
Top = 405
Width = 1710
End
End
Begin VB.ComboBox Combo1
Height = 300
Left = 4290
Style = 2 'Dropdown List
TabIndex = 0
Top = 345
Width = 2385
End
Begin VB.TextBox DanWei
Enabled = 0 'False
Height = 285
Left = 4290
MultiLine = -1 'True
TabIndex = 1
Top = 900
Width = 2370
End
Begin VB.Data Data1
Caption = "Data1"
Connect = "Access"
DatabaseName = ""
DefaultCursorType= 0 '缺省游标
DefaultType = 2 '使用 ODBC
Exclusive = 0 'False
Height = 345
Left = -1230
Options = 0
ReadOnly = 0 'False
RecordsetType = 1 'Dynaset
RecordSource = ""
Top = 1800
Visible = 0 'False
Width = 1140
End
Begin VB.TextBox ShuLiang
Height = 285
Left = 4290
MaxLength = 8
TabIndex = 2
Top = 1380
Width = 2370
End
Begin VB.Line Line2
BorderColor = &H00FFFFFF&
BorderWidth = 2
X1 = 2940
X2 = 2940
Y1 = 3675
Y2 = 0
End
Begin VB.Line Line1
BorderColor = &H00FFFFFF&
Index = 1
X1 = 2865
X2 = 8505
Y1 = 2445
Y2 = 2445
End
Begin VB.Line Line1
Index = 0
X1 = 2925
X2 = 8505
Y1 = 2430
Y2 = 2430
End
Begin VB.Label Label7
AutoSize = -1 'True
BackStyle = 0 'Transparent
Caption = "经手人："
ForeColor = &H00808000&
Height = 180
Left = 5925
TabIndex = 15
Top = 1920
Width = 720
End
Begin VB.Label Label6
AutoSize = -1 'True
BackStyle = 0 'Transparent
Caption = "日期："
ForeColor = &H00808000&
Height = 180
Left = 3645
TabIndex = 13
Top = 1920
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -