📄 frmset.frm
字号:
Text = "FrmSet.frx":1278
Top = 2160
Width = 4215
End
Begin VB.TextBox Text15
Appearance = 0 'Flat
DataField = "数量"
DataSource = "Data3"
ForeColor = &H00FF8080&
Height = 270
Left = -71160
TabIndex = 36
Text = "Text15"
Top = 1680
Width = 1695
End
Begin VB.TextBox Text13
Appearance = 0 'Flat
DataField = "产品"
DataSource = "Data3"
ForeColor = &H00FF8080&
Height = 270
Left = -73680
TabIndex = 35
Text = "Text13"
Top = 1680
Width = 1575
End
Begin VB.TextBox Text12
Appearance = 0 'Flat
DataField = "电话"
DataSource = "Data3"
ForeColor = &H00FF8080&
Height = 270
Left = -71160
TabIndex = 34
Text = "Text12"
Top = 1200
Width = 1695
End
Begin VB.TextBox Text11
Appearance = 0 'Flat
DataField = "联系人"
DataSource = "Data3"
ForeColor = &H00FF8080&
Height = 270
Left = -73680
TabIndex = 33
Text = "Text11"
Top = 1200
Width = 1575
End
Begin VB.TextBox Text10
Appearance = 0 'Flat
DataField = "地址"
DataSource = "Data3"
ForeColor = &H00FF8080&
Height = 270
Left = -73680
TabIndex = 32
Text = "Text10"
Top = 720
Width = 4215
End
Begin VB.TextBox Text9
Appearance = 0 'Flat
DataField = "名称"
DataSource = "Data3"
ForeColor = &H00FF8080&
Height = 270
Left = -73680
TabIndex = 31
Text = "Text9"
Top = 240
Width = 4215
End
Begin VB.Data Data2
Caption = "Data2"
Connect = "Access"
DatabaseName = "C:\WINDOWS\Desktop\通用库管\库存管理.mdb"
DefaultCursorType= 0 '缺省游标
DefaultType = 2 '使用 ODBC
Exclusive = 0 'False
Height = 285
Left = -73920
Options = 0
ReadOnly = 0 'False
RecordsetType = 1 'Dynaset
RecordSource = "供应商表"
Top = 2760
Width = 1740
End
Begin VB.TextBox Text8
Appearance = 0 'Flat
DataField = "备注"
DataSource = "Data2"
ForeColor = &H00FF8080&
Height = 615
Left = -73440
MultiLine = -1 'True
ScrollBars = 2 'Vertical
TabIndex = 22
Text = "FrmSet.frx":127F
Top = 2040
Width = 3735
End
Begin VB.ComboBox Combo2
DataField = "级别"
DataSource = "Data2"
ForeColor = &H00FF8080&
Height = 300
Left = -70534
TabIndex = 20
Text = "Combo2"
Top = 480
Width = 855
End
Begin VB.TextBox Text7
Appearance = 0 'Flat
DataField = "电话"
DataSource = "Data2"
ForeColor = &H00FF8080&
Height = 270
Left = -71130
TabIndex = 19
Text = "Text7"
Top = 1560
Width = 1455
End
Begin VB.TextBox Text6
Appearance = 0 'Flat
DataField = "联系人"
DataSource = "Data2"
ForeColor = &H00FF8080&
Height = 270
Left = -73440
TabIndex = 18
Text = "Text6"
Top = 1560
Width = 1695
End
Begin VB.TextBox Text5
Appearance = 0 'Flat
DataField = "地址"
DataSource = "Data2"
ForeColor = &H00FF8080&
Height = 270
Left = -73440
TabIndex = 17
Text = "Text5"
Top = 960
Width = 3735
End
Begin VB.TextBox Text4
Appearance = 0 'Flat
DataField = "名称"
DataSource = "Data2"
ForeColor = &H00FF8080&
Height = 270
Left = -73440
TabIndex = 16
Text = "Text4"
Top = 480
Width = 2055
End
Begin VB.ComboBox Combo1
Appearance = 0 'Flat
DataField = "职务"
DataSource = "Data1"
ForeColor = &H00FF8080&
Height = 300
Left = -72934
TabIndex = 10
Text = "Combo1"
Top = 1080
Width = 1455
End
Begin VB.TextBox Text3
Appearance = 0 'Flat
DataField = "密码"
DataSource = "Data1"
ForeColor = &H00FF8080&
Height = 270
Left = -72934
TabIndex = 9
Text = "Text3"
Top = 2040
Width = 1455
End
Begin VB.TextBox Text2
Appearance = 0 'Flat
DataField = "电话"
DataSource = "Data1"
ForeColor = &H00FF8080&
Height = 270
Left = -72934
TabIndex = 8
Text = "Text2"
Top = 1560
Width = 1455
End
Begin VB.TextBox Text1
Appearance = 0 'Flat
DataField = "姓名"
DataSource = "Data1"
ForeColor = &H00FF8080&
Height = 270
Left = -72934
TabIndex = 7
Text = "Text1"
Top = 600
Width = 1455
End
Begin VB.Data Data1
Caption = "Data1"
Connect = "Access"
DatabaseName = "C:\Documents and Settings\LeeKing\桌面\通用库管\库存管理.mdb"
DefaultCursorType= 0 '缺省游标
DefaultType = 2 '使用 ODBC
Exclusive = 0 'False
Height = 315
Left = -73054
Options = 0
ReadOnly = 0 'False
RecordsetType = 1 'Dynaset
RecordSource = "员工表"
Top = 2520
Width = 2295
End
Begin MSComctlLib.Toolbar Toolbar1
Height = 570
Left = -73894
TabIndex = 2
Top = 2880
Width = 3825
_ExtentX = 6747
_ExtentY = 1005
ButtonWidth = 1032
ButtonHeight = 1005
Appearance = 1
Style = 1
ImageList = "ImageList1"
_Version = 393216
BeginProperty Buttons {66833FE8-8583-11D1-B16A-00C0F0283628}
NumButtons = 8
BeginProperty Button1 {66833FEA-8583-11D1-B16A-00C0F0283628}
Object.ToolTipText = "向前"
ImageIndex = 1
EndProperty
BeginProperty Button2 {66833FEA-8583-11D1-B16A-00C0F0283628}
Object.ToolTipText = "后退"
ImageIndex = 2
EndProperty
BeginProperty Button3 {66833FEA-8583-11D1-B16A-00C0F0283628}
Style = 4
EndProperty
BeginProperty Button4 {66833FEA-8583-11D1-B16A-00C0F0283628}
Object.ToolTipText = "增加"
ImageIndex = 3
EndProperty
BeginProperty Button5 {66833FEA-8583-11D1-B16A-00C0F0283628}
Object.ToolTipText = "确定"
ImageIndex = 4
EndProperty
BeginProperty Button6 {66833FEA-8583-11D1-B16A-00C0F0283628}
Object.ToolTipText = "取消"
ImageIndex = 5
EndProperty
BeginProperty Button7 {66833FEA-8583-11D1-B16A-00C0F0283628}
Object.ToolTipText = "删除"
ImageIndex = 6
EndProperty
BeginProperty Button8 {66833FEA-8583-11D1-B16A-00C0F0283628}
Style = 4
EndProperty
EndProperty
Begin MSComctlLib.ImageList ImageList2
Left = 2760
Top = 0
_ExtentX = 1005
_ExtentY = 1005
BackColor = -2147483643
ImageWidth = 32
ImageHeight = 32
MaskColor = 12632256
_Version = 393216
BeginProperty Images {2C247F25-8591-11D1-B16A-00C0F0283628}
NumListImages = 8
BeginProperty ListImage1 {2C247F27-8591-11D1-B16A-00C0F0283628}
Picture = "FrmSet.frx":1285
Key = ""
EndProperty
BeginProperty ListImage2 {2C247F27-8591-11D1-B16A-00C0F0283628}
Picture = "FrmSet.frx":15A1
Key = ""
EndProperty
BeginProperty ListImage3 {2C247F27-8591-11D1-B16A-00C0F0283628}
Picture = "FrmSet.frx":18BD
Key = ""
EndProperty
BeginProperty ListImage4 {2C247F27-8591-11D1-B16A-00C0F0283628}
Picture = "FrmSet.frx":2599
Key = ""
EndProperty
BeginProperty ListImage5 {2C247F27-8591-11D1-B16A-00C0F0283628}
Picture = "FrmSet.frx":3275
Key = ""
EndProperty
BeginProperty ListImage6 {2C247F27-8591-11D1-B16A-00C0F0283628}
Picture = "FrmSet.frx":3F51
Key = ""
EndProperty
BeginProperty ListImage7 {2C247F27-8591-11D1-B16A-00C0F0283628}
Picture = "FrmSet.frx":4C2D
Key = ""
EndProperty
BeginProperty ListImage8 {2C247F27-8591-11D1-B16A-00C0F0283628}
Picture = "FrmSet.frx":4F49
Key = ""
EndProperty
EndProperty
End
Begin MSComctlLib.ImageList ImageList1
Left = 6000
Top = 120
_ExtentX = 1005
_ExtentY = 1005
BackColor = -2147483643
ImageWidth = 32
ImageHeight = 32
MaskColor = 12632256
_Version = 393216
BeginProperty Images {2C247F25-8591-11D1-B16A-00C0F0283628}
NumListImages = 8
BeginProperty ListImage1 {2C247F27-8591-11D1-B16A-00C0F0283628}
Picture = "FrmSet.frx":539D
Key = ""
EndProperty
BeginProperty ListImage2 {2C247F27-8591-11D1-B16A-00C0F0283628}
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -