📄 frmbeforeadd.frm
字号:
VERSION 5.00
Object = "{4932CEF1-2CAA-11D2-A165-0060081C43D9}#2.0#0"; "Actbar2.OCX"
Object = "{86CF1D34-0C5F-11D2-A9FC-0000F8754DA1}#2.0#0"; "MSCOMCT2.OCX"
Object = "{BDC217C8-ED16-11CD-956C-0000C04E4C0A}#1.1#0"; "TABCTL32.OCX"
Begin VB.Form frmBeforeAdd
Caption = "預備工序資料添加"
ClientHeight = 4785
ClientLeft = 60
ClientTop = 345
ClientWidth = 7950
LinkTopic = "Form1"
ScaleHeight = 4785
ScaleWidth = 7950
StartUpPosition = 3 '窗口缺省
Begin ActiveBar2LibraryCtl.ActiveBar2 ActiveBar21
Height = 4755
Left = 0
TabIndex = 0
Top = 0
Width = 7935
_LayoutVersion = 1
_ExtentX = 13996
_ExtentY = 8387
_DataPath = ""
Bands = "frmBeforeAdd.frx":0000
Begin VB.CommandButton cmdOk
Caption = "确定 &Y"
Height = 375
Left = 1920
TabIndex = 33
Top = 4260
Width = 855
End
Begin VB.CommandButton cmdCancel
Caption = "关闭 &C"
Height = 375
Left = 4620
TabIndex = 32
Top = 4260
Width = 795
End
Begin TabDlg.SSTab SSTab1
Height = 4035
Left = 60
TabIndex = 1
Top = 60
Width = 7695
_ExtentX = 13573
_ExtentY = 7117
_Version = 393216
Tabs = 5
Tab = 4
TabsPerRow = 6
TabHeight = 520
BeginProperty Font {0BE35203-8F91-11CE-9DE3-00AA004BB851}
Name = "宋体"
Size = 9
Charset = 134
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
TabCaption(0) = "添加顏色"
TabPicture(0) = "frmBeforeAdd.frx":0D62
Tab(0).ControlEnabled= 0 'False
Tab(0).Control(0)= "ColorId"
Tab(0).Control(0).Enabled= 0 'False
Tab(0).Control(1)= "ComColor"
Tab(0).Control(1).Enabled= 0 'False
Tab(0).Control(2)= "txtReviewsDate"
Tab(0).Control(2).Enabled= 0 'False
Tab(0).Control(3)= "txtLabdipDate"
Tab(0).Control(3).Enabled= 0 'False
Tab(0).Control(4)= "txtOrderNo"
Tab(0).Control(4).Enabled= 0 'False
Tab(0).Control(5)= "txtLabdipNo"
Tab(0).Control(5).Enabled= 0 'False
Tab(0).Control(6)= "txtColorName"
Tab(0).Control(6).Enabled= 0 'False
Tab(0).Control(7)= "txtColorNumber"
Tab(0).Control(7).Enabled= 0 'False
Tab(0).Control(8)= "txteColorName"
Tab(0).Control(8).Enabled= 0 'False
Tab(0).Control(9)= "Label3(2)"
Tab(0).Control(9).Enabled= 0 'False
Tab(0).Control(10)= "Label11"
Tab(0).Control(10).Enabled= 0 'False
Tab(0).Control(11)= "Label3(1)"
Tab(0).Control(11).Enabled= 0 'False
Tab(0).Control(12)= "Label2(1)"
Tab(0).Control(12).Enabled= 0 'False
Tab(0).Control(13)= "Label1"
Tab(0).Control(13).Enabled= 0 'False
Tab(0).Control(14)= "Label16"
Tab(0).Control(14).Enabled= 0 'False
Tab(0).Control(15)= "Label14"
Tab(0).Control(15).Enabled= 0 'False
Tab(0).Control(16)= "Label24"
Tab(0).Control(16).Enabled= 0 'False
Tab(0).ControlCount= 17
TabCaption(1) = "添加顏色次數"
TabPicture(1) = "frmBeforeAdd.frx":0D7E
Tab(1).ControlEnabled= 0 'False
Tab(1).Control(0)= "subColor"
Tab(1).Control(1)= "subId"
Tab(1).Control(2)= "subReviewsDate"
Tab(1).Control(3)= "subLabdipDate"
Tab(1).Control(4)= "subUpdateOperator"
Tab(1).Control(5)= "subFactoryName"
Tab(1).Control(6)= "subReviews"
Tab(1).Control(7)= "subUpdateDate"
Tab(1).Control(8)= "subOrderNo"
Tab(1).Control(9)= "subColorName"
Tab(1).Control(10)= "subLabdipNo"
Tab(1).Control(11)= "Label7"
Tab(1).Control(12)= "Label10"
Tab(1).Control(13)= "Label13"
Tab(1).Control(14)= "Label15"
Tab(1).Control(15)= "Label22"
Tab(1).Control(16)= "Label3(3)"
Tab(1).Control(17)= "Label23"
Tab(1).Control(18)= "Label3(4)"
Tab(1).Control(19)= "Label40"
Tab(1).Control(20)= "Label50"
Tab(1).ControlCount= 21
TabCaption(2) = "添加花型"
TabPicture(2) = "frmBeforeAdd.frx":0D9A
Tab(2).ControlEnabled= 0 'False
Tab(2).Control(0)= "txtLayout"
Tab(2).Control(0).Enabled= 0 'False
Tab(2).Control(1)= "LayoutId"
Tab(2).Control(1).Enabled= 0 'False
Tab(2).Control(2)= "LayoutOrderNo"
Tab(2).Control(2).Enabled= 0 'False
Tab(2).Control(3)= "LayoutLabdipNo"
Tab(2).Control(3).Enabled= 0 'False
Tab(2).Control(4)= "txtLayoutName"
Tab(2).Control(4).Enabled= 0 'False
Tab(2).Control(5)= "txtLayoutNumber"
Tab(2).Control(5).Enabled= 0 'False
Tab(2).Control(6)= "txteLayoutName"
Tab(2).Control(6).Enabled= 0 'False
Tab(2).Control(7)= "LayoutLabdipDate"
Tab(2).Control(7).Enabled= 0 'False
Tab(2).Control(8)= "LayoutReviewsDate"
Tab(2).Control(8).Enabled= 0 'False
Tab(2).Control(9)= "Label3(5)"
Tab(2).Control(9).Enabled= 0 'False
Tab(2).Control(10)= "Label9"
Tab(2).Control(10).Enabled= 0 'False
Tab(2).Control(11)= "Label3(0)"
Tab(2).Control(11).Enabled= 0 'False
Tab(2).Control(12)= "Label2(0)"
Tab(2).Control(12).Enabled= 0 'False
Tab(2).Control(13)= "Label8"
Tab(2).Control(13).Enabled= 0 'False
Tab(2).Control(14)= "Label6"
Tab(2).Control(14).Enabled= 0 'False
Tab(2).Control(15)= "Label5"
Tab(2).Control(15).Enabled= 0 'False
Tab(2).Control(16)= "Label4"
Tab(2).Control(16).Enabled= 0 'False
Tab(2).ControlCount= 17
TabCaption(3) = "添加花型次數"
TabPicture(3) = "frmBeforeAdd.frx":0DB6
Tab(3).ControlEnabled= 0 'False
Tab(3).Control(0)= "Label12"
Tab(3).Control(0).Enabled= 0 'False
Tab(3).Control(1)= "Label17"
Tab(3).Control(1).Enabled= 0 'False
Tab(3).Control(2)= "Label3(6)"
Tab(3).Control(2).Enabled= 0 'False
Tab(3).Control(3)= "Label18"
Tab(3).Control(3).Enabled= 0 'False
Tab(3).Control(4)= "Label3(7)"
Tab(3).Control(4).Enabled= 0 'False
Tab(3).Control(5)= "Label19"
Tab(3).Control(5).Enabled= 0 'False
Tab(3).Control(6)= "Label20"
Tab(3).Control(6).Enabled= 0 'False
Tab(3).Control(7)= "Label21"
Tab(3).Control(7).Enabled= 0 'False
Tab(3).Control(8)= "Label25"
Tab(3).Control(8).Enabled= 0 'False
Tab(3).Control(9)= "Label26"
Tab(3).Control(9).Enabled= 0 'False
Tab(3).Control(10)= "subLayoutReviewsDate"
Tab(3).Control(10).Enabled= 0 'False
Tab(3).Control(11)= "subLayoutLabdipDate"
Tab(3).Control(11).Enabled= 0 'False
Tab(3).Control(12)= "subLayoutLabdipNo"
Tab(3).Control(12).Enabled= 0 'False
Tab(3).Control(13)= "subLayoutName"
Tab(3).Control(13).Enabled= 0 'False
Tab(3).Control(14)= "subLayoutOrderNo"
Tab(3).Control(14).Enabled= 0 'False
Tab(3).Control(15)= "subLayoutUpdateDate"
Tab(3).Control(15).Enabled= 0 'False
Tab(3).Control(16)= "LayoutReviews"
Tab(3).Control(16).Enabled= 0 'False
Tab(3).Control(17)= "subLayoutFactoryName"
Tab(3).Control(17).Enabled= 0 'False
Tab(3).Control(18)= "subLayoutUpdateoperator"
Tab(3).Control(18).Enabled= 0 'False
Tab(3).Control(19)= "subLayoutId"
Tab(3).Control(19).Enabled= 0 'False
Tab(3).Control(20)= "subLayout"
Tab(3).Control(20).Enabled= 0 'False
Tab(3).ControlCount= 21
TabCaption(4) = "添加用途"
TabPicture(4) = "frmBeforeAdd.frx":0DD2
Tab(4).ControlEnabled= -1 'True
Tab(4).Control(0)= "Label27"
Tab(4).Control(0).Enabled= 0 'False
Tab(4).Control(1)= "Label28"
Tab(4).Control(1).Enabled= 0 'False
Tab(4).Control(2)= "Label29"
Tab(4).Control(2).Enabled= 0 'False
Tab(4).Control(3)= "Label30"
Tab(4).Control(3).Enabled= 0 'False
Tab(4).Control(4)= "Label2(2)"
Tab(4).Control(4).Enabled= 0 'False
Tab(4).Control(5)= "Label3(8)"
Tab(4).Control(5).Enabled= 0 'False
Tab(4).Control(6)= "Label3(9)"
Tab(4).Control(6).Enabled= 0 'False
Tab(4).Control(7)= "RefUpdateDate"
Tab(4).Control(7).Enabled= 0 'False
Tab(4).Control(8)= "Washing"
Tab(4).Control(8).Enabled= 0 'False
Tab(4).Control(9)= "Placement"
Tab(4).Control(9).Enabled= 0 'False
Tab(4).Control(10)= "Reference"
Tab(4).Control(10).Enabled= 0 'False
Tab(4).Control(11)= "RefLabdipNo"
Tab(4).Control(11).Enabled= 0 'False
Tab(4).Control(12)= "RefOrderNo"
Tab(4).Control(12).Enabled= 0 'False
Tab(4).Control(13)= "RefUpdateOperator"
Tab(4).Control(13).Enabled= 0 'False
Tab(4).Control(14)= "refId"
Tab(4).Control(14).Enabled= 0 'False
Tab(4).ControlCount= 15
Begin VB.ComboBox txtLayout
Height = 300
Left = -73440
TabIndex = 94
Text = "0"
Top = 2400
Width = 555
End
Begin VB.TextBox ColorId
Height = 315
Left = -70200
TabIndex = 93
Top = 1320
Visible = 0 'False
Width = 615
End
Begin VB.TextBox refId
Height = 270
Left = 4740
TabIndex = 92
Top = 1200
Visible = 0 'False
Width = 555
End
Begin VB.ComboBox subLayout
Height = 300
Left = -73380
TabIndex = 91
Text = "0"
Top = 1740
Width = 675
End
Begin VB.TextBox subLayoutId
Height = 270
Left = -69300
TabIndex = 90
Top = 1320
Visible = 0 'False
Width = 735
End
Begin VB.TextBox LayoutId
Height = 315
Left = -70080
TabIndex = 89
Text = "Text1"
Top = 1140
Visible = 0 'False
Width = 795
End
Begin VB.ComboBox subColor
Height = 300
Left = -73200
TabIndex = 88
Text = "0"
Top = 1680
Width = 615
End
Begin VB.ComboBox ComColor
Height = 300
ItemData = "frmBeforeAdd.frx":0DEE
Left = -73500
List = "frmBeforeAdd.frx":0DF0
TabIndex = 87
Text = "0"
Top = 2340
Width = 615
End
Begin VB.TextBox subId
Height = 315
Left = -70260
TabIndex = 86
Top = 960
Visible = 0 'False
Width = 915
End
Begin VB.TextBox RefUpdateOperator
Height = 315
Left = 1800
TabIndex = 85
Top = 2820
Width = 1995
End
Begin VB.TextBox RefOrderNo
BackColor = &H8000000F&
Enabled = 0 'False
Height = 315
Left = 1800
TabIndex = 76
Top = 1020
Width = 1995
End
Begin VB.TextBox RefLabdipNo
BackColor = &H8000000F&
Enabled = 0 'False
Height = 315
Left = 1800
TabIndex = 75
Top = 600
Width = 1995
End
Begin VB.TextBox Reference
BackColor = &H00FFFFFF&
Height = 315
Left = 1800
TabIndex = 74
Top = 1500
Width = 1995
End
Begin VB.TextBox Placement
BackColor = &H00FFFFFF&
Height = 315
Left = 1800
TabIndex = 73
Top = 1920
Width = 1995
End
Begin VB.TextBox Washing
Height = 330
Left = 1800
TabIndex = 72
Top = 2340
Width = 1995
End
Begin VB.TextBox subLayoutUpdateoperator
Height = 315
Left = -69600
TabIndex = 59
Top = 3060
Width = 1995
End
Begin VB.TextBox subLayoutFactoryName
Height = 315
Left = -73380
TabIndex = 58
Top = 2640
Width = 1995
End
Begin VB.TextBox LayoutReviews
Height = 315
Left = -73380
TabIndex = 57
Top = 2160
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -