📄 frmxskh.frm
字号:
VERSION 5.00
Object = "{D76D7128-4A96-11D3-BD95-D296DC2DD072}#1.0#0"; "Vsflex7.ocx"
Object = "{831FDD16-0C5C-11D2-A9FC-0000F8754DA1}#2.0#0"; "mscomctl.ocx"
Begin VB.Form frmXsKh
Caption = "客户资料维护"
ClientHeight = 7020
ClientLeft = 1530
ClientTop = 1365
ClientWidth = 8460
KeyPreview = -1 'True
LinkTopic = "Form1"
LockControls = -1 'True
ScaleHeight = 7020
ScaleWidth = 8460
Begin VB.Frame Frame
Height = 6015
Left = 2940
TabIndex = 12
Top = 600
Width = 6405
Begin VB.TextBox Text
BeginProperty Font
Name = "宋体"
Size = 10.5
Charset = 134
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
Height = 330
Index = 0
Left = 1470
TabIndex = 0
Tag = "TXTKHCODE"
Top = 330
Width = 3255
End
Begin VB.CheckBox Check
Caption = "停用"
BeginProperty Font
Name = "宋体"
Size = 10.5
Charset = 134
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
Height = 285
Index = 0
Left = 1470
TabIndex = 11
Tag = "CHKKHISSTOP"
Top = 5670
Width = 1965
End
Begin VB.TextBox Text
BeginProperty Font
Name = "宋体"
Size = 10.5
Charset = 134
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
Height = 330
Index = 1
Left = 1470
TabIndex = 1
Tag = "TXTKHMC"
Top = 815
Width = 3255
End
Begin VB.TextBox Text
BeginProperty Font
Name = "宋体"
Size = 10.5
Charset = 134
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
Height = 330
Index = 2
Left = 1470
TabIndex = 2
Tag = "TXTKHTEL"
Top = 1300
Width = 3255
End
Begin VB.TextBox Text
BeginProperty Font
Name = "宋体"
Size = 10.5
Charset = 134
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
Height = 330
Index = 3
Left = 1470
TabIndex = 3
Tag = "TXTKHFAX"
Top = 1785
Width = 3255
End
Begin VB.TextBox Text
BeginProperty Font
Name = "宋体"
Size = 10.5
Charset = 134
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
Height = 330
Index = 4
Left = 1470
TabIndex = 4
Tag = "TXTKHEMAIL"
Top = 2270
Width = 3255
End
Begin VB.TextBox Text
BeginProperty Font
Name = "宋体"
Size = 10.5
Charset = 134
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
Height = 330
Index = 5
Left = 1470
TabIndex = 5
Tag = "TXTKHWWW"
Top = 2755
Width = 3255
End
Begin VB.TextBox Text
BeginProperty Font
Name = "宋体"
Size = 10.5
Charset = 134
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
Height = 330
Index = 6
Left = 1470
TabIndex = 6
Tag = "TXTKHADD"
Top = 3240
Width = 3255
End
Begin VB.TextBox Text
BeginProperty Font
Name = "宋体"
Size = 10.5
Charset = 134
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
Height = 330
Index = 7
Left = 1470
TabIndex = 7
Tag = "TXTKHPCODE"
Top = 3725
Width = 3255
End
Begin VB.TextBox Text
BeginProperty Font
Name = "宋体"
Size = 10.5
Charset = 134
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
Height = 330
Index = 8
Left = 1470
TabIndex = 8
Tag = "TXTKHLINKMAN"
Top = 4210
Width = 3255
End
Begin VB.ComboBox Combo
BeginProperty Font
Name = "宋体"
Size = 10.5
Charset = 134
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
Height = 330
Index = 2
Left = 1470
TabIndex = 9
Tag = "TXTCWBZCODE"
Top = 4695
Width = 2145
End
Begin VB.ComboBox Combo
BeginProperty Font
Name = "宋体"
Size = 10.5
Charset = 134
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
Height = 330
Index = 0
Left = 1470
TabIndex = 10
Tag = "TXTCWSMCODE"
Top = 5180
Width = 2145
End
Begin VB.Label Label
Alignment = 1 'Right Justify
BorderStyle = 1 'Fixed Single
Caption = "客户代码"
BeginProperty Font
Name = "宋体"
Size = 10.5
Charset = 134
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
Height = 285
Index = 0
Left = 120
TabIndex = 23
Top = 330
Width = 1215
End
Begin VB.Label Label
Alignment = 1 'Right Justify
BorderStyle = 1 'Fixed Single
Caption = "客户全称"
BeginProperty Font
Name = "宋体"
Size = 10.5
Charset = 134
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
Height = 285
Index = 1
Left = 120
TabIndex = 22
Top = 816
Width = 1215
End
Begin VB.Label Label
Alignment = 1 'Right Justify
BorderStyle = 1 'Fixed Single
Caption = "联系电话"
BeginProperty Font
Name = "宋体"
Size = 10.5
Charset = 134
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
Height = 285
Index = 2
Left = 120
TabIndex = 21
Top = 1302
Width = 1215
End
Begin VB.Label Label
Alignment = 1 'Right Justify
BorderStyle = 1 'Fixed Single
Caption = "传真"
BeginProperty Font
Name = "宋体"
Size = 10.5
Charset = 134
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
Height = 285
Index = 3
Left = 120
TabIndex = 20
Top = 1788
Width = 1215
End
Begin VB.Label Label
Alignment = 1 'Right Justify
BorderStyle = 1 'Fixed Single
Caption = "邮箱"
BeginProperty Font
Name = "宋体"
Size = 10.5
Charset = 134
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
Height = 285
Index = 4
Left = 120
TabIndex = 19
Top = 2274
Width = 1215
End
Begin VB.Label Label
Alignment = 1 'Right Justify
BorderStyle = 1 'Fixed Single
Caption = "网址"
BeginProperty Font
Name = "宋体"
Size = 10.5
Charset = 134
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
Height = 285
Index = 5
Left = 120
TabIndex = 18
Top = 2760
Width = 1215
End
Begin VB.Label Label
Alignment = 1 'Right Justify
BorderStyle = 1 'Fixed Single
Caption = "联系地址"
BeginProperty Font
Name = "宋体"
Size = 10.5
Charset = 134
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
Height = 285
Index = 6
Left = 120
TabIndex = 17
Top = 3246
Width = 1215
End
Begin VB.Label Label
Alignment = 1 'Right Justify
BorderStyle = 1 'Fixed Single
Caption = "邮政编码"
BeginProperty Font
Name = "宋体"
Size = 10.5
Charset = 134
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
Height = 285
Index = 7
Left = 120
TabIndex = 16
Top = 3732
Width = 1215
End
Begin VB.Label Label
Alignment = 1 'Right Justify
BorderStyle = 1 'Fixed Single
Caption = "联系人"
BeginProperty Font
Name = "宋体"
Size = 10.5
Charset = 134
Weight = 400
Underline = 0 'False
Italic = 0 'False
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -