frmcustomerupdate.frm
来自「很好！ 很实用！ 免费！」· FRM 代码 · 共 706 行 · 第 1/2 页
FRM
706 行
VERSION 5.00
Begin VB.Form frmCustomerUpdate
Caption = "修改客户"
ClientHeight = 7665
ClientLeft = 60
ClientTop = 345
ClientWidth = 11325
LinkTopic = "Form1"
ScaleHeight = 7665
ScaleWidth = 11325
StartUpPosition = 3 'Windows Default
Begin VB.CommandButton cmdOK
Caption = "确定"
Height = 495
Left = 8010
TabIndex = 57
Top = 6960
Width = 1575
End
Begin VB.CommandButton cmdCancel
Caption = "取消"
Height = 495
Left = 9780
TabIndex = 56
Top = 6960
Width = 1335
End
Begin VB.Frame Frame1
Caption = "公司属性"
Height = 6735
Left = 60
TabIndex = 0
Top = 90
Width = 11175
Begin ClassSystem.InputNumber intBackRate
Height = 405
Left = 4560
TabIndex = 58
Top = 5550
Width = 2055
_ExtentX = 3625
_ExtentY = 714
BorderStyle = 1
End
Begin VB.TextBox txtBackProfile
Height = 375
Left = 1080
TabIndex = 20
Top = 2280
Width = 2295
End
Begin VB.TextBox txtBack
Height = 375
Left = 1080
TabIndex = 19
Top = 4920
Width = 2295
End
Begin VB.TextBox txtHttp
Height = 375
Left = 4560
TabIndex = 18
Top = 5040
Width = 5775
End
Begin VB.TextBox txtEmail
Height = 375
Left = 1110
TabIndex = 17
Top = 3840
Width = 2295
End
Begin VB.TextBox txtFax
Height = 375
Left = 8640
TabIndex = 16
Top = 4590
Width = 2295
End
Begin VB.TextBox txtTelephone
Height = 375
Left = 4560
TabIndex = 15
Text = "Text13"
Top = 4560
Width = 3255
End
Begin VB.TextBox txtPostCode
Height = 375
Left = 1080
TabIndex = 14
Top = 3360
Width = 2295
End
Begin VB.TextBox txtAddress
Height = 375
Left = 4560
TabIndex = 13
Top = 3960
Width = 6375
End
Begin VB.TextBox txtAreaID
Height = 375
Left = 1080
TabIndex = 12
Top = 2880
Width = 2295
End
Begin VB.TextBox txtFinanceMan
Height = 375
Left = 8550
TabIndex = 11
Top = 3390
Width = 1725
End
Begin VB.TextBox txtSaleMan
Height = 375
Left = 4590
TabIndex = 10
Top = 3360
Width = 1935
End
Begin VB.TextBox txtPurchaseMan
Height = 375
Left = 8550
TabIndex = 9
Top = 2730
Width = 1695
End
Begin VB.TextBox txtFictitiousMan
Height = 375
Left = 4590
TabIndex = 8
Top = 2760
Width = 1935
End
Begin VB.TextBox txtService
Height = 855
Left = 4590
TabIndex = 7
Top = 1200
Width = 2775
End
Begin VB.TextBox txtManagement
Height = 855
Left = 1080
TabIndex = 6
Top = 1200
Width = 2295
End
Begin VB.TextBox txtSynopsis
Height = 855
Left = 8520
TabIndex = 5
Top = 1200
Width = 2535
End
Begin VB.TextBox txtName
Height = 405
Left = 4560
TabIndex = 4
Top = 240
Width = 2775
End
Begin VB.TextBox txtNo
Height = 405
Left = 1110
TabIndex = 3
Top = 240
Width = 2295
End
Begin ClassSystem.GCombo gcbStatus
Height = 315
Left = 1110
TabIndex = 1
Top = 720
Width = 2295
_ExtentX = 4048
_ExtentY = 556
BeginProperty Font {0BE35203-8F91-11CE-9DE3-00AA004BB851}
Name = "MS Sans Serif"
Size = 8.25
Charset = 0
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
FontSize = 8.25
FontName = "MS Sans Serif"
ListIndex = -1
Text = ""
End
Begin ClassSystem.GCombo gcbType
Height = 315
Left = 8520
TabIndex = 2
Top = 690
Width = 2415
_ExtentX = 4260
_ExtentY = 556
BeginProperty Font {0BE35203-8F91-11CE-9DE3-00AA004BB851}
Name = "MS Sans Serif"
Size = 8.25
Charset = 0
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
FontSize = 8.25
FontName = "MS Sans Serif"
ListIndex = -1
Text = ""
End
Begin ClassSystem.InputNumber intContributeRate
Height = 375
Left = 1110
TabIndex = 21
Top = 5520
Width = 1215
_ExtentX = 2143
_ExtentY = 661
BorderStyle = 1
End
Begin ClassSystem.GCombo gcbCredit
Height = 315
Left = 1080
TabIndex = 22
Top = 4440
Width = 2295
_ExtentX = 4048
_ExtentY = 556
BeginProperty Font {0BE35203-8F91-11CE-9DE3-00AA004BB851}
Name = "MS Sans Serif"
Size = 8.25
Charset = 0
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
FontSize = 8.25
FontName = "MS Sans Serif"
ListIndex = -1
Text = ""
End
Begin ClassSystem.InputNumber intTaking
Height = 375
Left = 8520
TabIndex = 23
Top = 2160
Width = 1695
_ExtentX = 2990
_ExtentY = 661
BorderStyle = 1
End
Begin ClassSystem.InputNumber intCapital
Height = 375
Left = 4590
TabIndex = 24
Top = 2250
Width = 1935
_ExtentX = 3413
_ExtentY = 661
BorderStyle = 1
End
Begin ClassSystem.InputNumber intManNumber
Height = 375
Left = 8700
TabIndex = 25
Top = 5580
Width = 2325
_ExtentX = 4101
_ExtentY = 661
BorderStyle = 1
End
Begin ClassSystem.GCombo gcbOwnerShip
Height = 315
Left = 4560
TabIndex = 26
Top = 720
Width = 2775
_ExtentX = 4895
_ExtentY = 556
BeginProperty Font {0BE35203-8F91-11CE-9DE3-00AA004BB851}
Name = "MS Sans Serif"
Size = 8.25
Charset = 0
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
FontSize = 8.25
FontName = "MS Sans Serif"
ListIndex = -1
Text = ""
End
Begin ClassSystem.GCombo gcbPatentID
Height = 315
Left = 8520
TabIndex = 27
Top = 240
Width = 2415
_ExtentX = 4260
_ExtentY = 556
BeginProperty Font {0BE35203-8F91-11CE-9DE3-00AA004BB851}
Name = "MS Sans Serif"
Size = 8.25
Charset = 0
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
FontSize = 8.25
FontName = "MS Sans Serif"
ListIndex = -1
Text = ""
End
Begin VB.Label Label27
AutoSize = -1 'True
Caption = "银行帐号"
Height = 195
Left = 180
TabIndex = 55
Top = 2370
Width = 720
End
Begin VB.Label Label26
AutoSize = -1 'True
Caption = "开户行"
Height = 195
Left = 360
TabIndex = 54
Top = 5040
Width = 540
End
Begin VB.Label Label25
AutoSize = -1 'True
Caption = "退货率"
Height = 195
Left = 3810
TabIndex = 53
Top = 5640
Width = 540
End
Begin VB.Label Label24
AutoSize = -1 'True
Caption = "贡献率"
Height = 195
Left = 360
⌨️ 快捷键说明
复制代码Ctrl + C
搜索代码Ctrl + F
全屏模式F11
增大字号Ctrl + =
减小字号Ctrl + -
显示快捷键?