【VB开源代码栏目提醒】:本文主要为网学会员提供purchase.frm,希望对需要purchase.frm网友有所帮助,学习一下!
VERSION 5.00
Object = "{BDC217C8-ED16-11CD-956C-0000C04E4C0A}#1.1#0"; "TABCTL32.OCX"
Begin VB.Form purchase
Appearance = 0 'Flat
BackColor = &H00FFFFFF&
BorderStyle = 1 'Fixed Single
Caption = "服装信息"
ClientHeight = 5640
ClientLeft = 1485
ClientTop = 2100
ClientWidth = 8820
FillColor = &H00764E10&
BeginProperty Font
Name = "Monotype Corsiva"
Size = 9.75
Charset = 0
Weight = 700
Underline = 0 'False
Italic = -1 'True
Strikethrough = 0 'False
EndProperty
ForeColor = &H00764E10&
Icon = "purchase.frx":0000
LinkTopic = "Form1"
LockControls = -1 'True
MaxButton = 0 'False
ScaleHeight = 5640
ScaleWidth = 8820
Begin TabDlg.SSTab SSTab1
Height = 3945
Left = 45
TabIndex = 9
Top = 1350
Width = 8700
_ExtentX = 15346
_ExtentY = 6959
_Version = 393216
Tabs = 2
Tab = 1
TabsPerRow = 2
TabHeight = 520
BackColor = 16777215
ForeColor = 9992024
BeginProperty Font {0BE35203-8F91-11CE-9DE3-00AA004BB851}
Name = "Arial"
Size = 9.75
Charset = 0
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
TabCaption(0) = "输入新服装信息"
TabPicture(0) = "purchase.frx":0442
Tab(0).ControlEnabled= 0 'False
Tab(0).Control(0)= "Option1(0)"
Tab(0).Control(1)= "Option1(1)"
Tab(0).Control(2)= "txtcost"
Tab(0).Control(3)= "txtqty"
Tab(0).Control(4)= "txtserial"
Tab(0).Control(5)= "cmdsave1"
Tab(0).Control(6)= "txtname"
Tab(0).Control(7)= "txtdescription"
Tab(0).Control(8)= "Command1"
Tab(0).Control(9)= "Label16"
Tab(0).Control(10)= "Line6"
Tab(0).Control(11)= "Label7"
Tab(0).Control(12)= "Label5"
Tab(0).Control(13)= "Label4"
Tab(0).Control(14)= "Label6"
Tab(0).Control(15)= "Label8"
Tab(0).Control(16)= "Label9"
Tab(0).Control(17)= "Shape1"
Tab(0).ControlCount= 18
TabCaption(1) = "修改服装信息"
TabPicture(1) = "purchase.frx":045E
Tab(1).ControlEnabled= -1 'True
Tab(1).Control(0)= "Shape2"
Tab(1).Control(0).Enabled= 0 'False
Tab(1).Control(1)= "Label10"
Tab(1).Control(1).Enabled= 0 'False
Tab(1).Control(2)= "Label11"
Tab(1).Control(2).Enabled= 0 'False
Tab(1).Control(3)= "Label12"
Tab(1).Control(3).Enabled= 0 'False
Tab(1).Control(4)= "Label13"
Tab(1).Control(4).Enabled= 0 'False
Tab(1).Control(5)= "Label14"
Tab(1).Control(5).Enabled= 0 'False
Tab(1).Control(6)= "Label15"
Tab(1).Control(6).Enabled= 0 'False
Tab(1).Control(7)= "Line5"
Tab(1).Control(7).Enabled= 0 'False
Tab(1).Control(8)= "Label17"
Tab(1).Control(8).Enabled= 0 'False
Tab(1).Control(9)= "txtcost2"
Tab(1).Control(9).Enabled= 0 'False
Tab(1).Control(10)= "txtqty2"
Tab(1).Control(10).Enabled= 0 'False
Tab(1).Control(11)= "cmdsave2"
Tab(1).Control(11).Enabled= 0 'False
Tab(1).Control(12)= "txtname2"
Tab(1).Control(12).Enabled= 0 'False
Tab(1).Control(13)= "txtdescription2"
Tab(1).Control(13).Enabled= 0 'False
Tab(1).Control(14)= "Command3"
Tab(1).Control(14).Enabled= 0 'False
Tab(1).Control(15)= "Frame1"
Tab(1).Control(15).Enabled= 0 'False
Tab(1).Control(16)= "Command4"
Tab(1).Control(16).Enabled= 0 'False
Tab(1).Control(17)= "cmbserial"
Tab(1).Control(17).Enabled= 0 'False
Tab(1).Control(18)= "cmbname"
Tab(1).Control(18).Enabled= 0 'False
Tab(1).Control(19)= "cmbdescription"
Tab(1).Control(19).Enabled= 0 'False
Tab(1).ControlCount= 20
Begin VB.ComboBox cmbdescription
BeginProperty Font
Name = "Arial"
Size = 9.75
Charset = 0
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
ForeColor = &H00987758&
Height = 360
Left = 5535
Style = 2 'Dropdown List
TabIndex = 22
Top = 825
Width = 2985
End
Begin VB.ComboBox cmbname
BeginProperty Font
Name = "Arial"
Size = 9.75
Charset = 0
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
ForeColor = &H00987758&
Height = 360
Left = 2790
Style = 2 'Dropdown List
TabIndex = 21
Top = 825
Width = 2715
End
Begin
VB.ComboBox cmbserial
BeginProperty Font
Name = "Arial"
Size = 9.75
Charset = 0
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
ForeColor = &H00987758&
Height = 360
Left = 1380
Style = 2 'Dropdown List
TabIndex = 20
Top = 825
Width = 1395
End
Begin VB.CommandButton Command4
BackColor = &H00E2D1D3&
Caption = "<< 详细信息"
BeginProperty Font
Name = "Arial"
Size = 9.75
Charset = 0
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty