📄 main.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"
Object = "{86CF1D34-0C5F-11D2-A9FC-0000F8754DA1}#2.0#0"; "MSCOMCT2.OCX"
Object = "{38911DA0-E448-11D0-84A3-00DD01104159}#1.1#0"; "COMCT332.OCX"
Begin VB.Form frmMain
BackColor = &H00C0C0C0&
Caption = "国信客户档案管理系统[温州市新科海电脑有限公司]--版本1.0"
ClientHeight = 8310
ClientLeft = 165
ClientTop = 735
ClientWidth = 11880
Icon = "Main.frx":0000
LinkTopic = "Form1"
ScaleHeight = 8310
ScaleWidth = 11880
StartUpPosition = 3 '窗口缺省
Begin MSComctlLib.ImageList imgCoolbar
Left = 180
Top = 4020
_ExtentX = 1005
_ExtentY = 1005
BackColor = -2147483643
ImageWidth = 16
ImageHeight = 32
MaskColor = 12632256
_Version = 393216
BeginProperty Images {2C247F25-8591-11D1-B16A-00C0F0283628}
NumListImages = 2
BeginProperty ListImage1 {2C247F27-8591-11D1-B16A-00C0F0283628}
Picture = "Main.frx":0CCA
Key = ""
EndProperty
BeginProperty ListImage2 {2C247F27-8591-11D1-B16A-00C0F0283628}
Picture = "Main.frx":13A6
Key = ""
EndProperty
EndProperty
End
Begin VB.PictureBox picCustomerInfo
BorderStyle = 0 'None
Height = 7935
Left = 300
ScaleHeight = 7935
ScaleWidth = 11850
TabIndex = 33
Top = 4080
Width = 11850
Begin VB.PictureBox picTabBaseInfo
Height = 5475
Left = 5370
ScaleHeight = 5415
ScaleWidth = 11565
TabIndex = 34
Top = 5400
Width = 11625
Begin VB.CommandButton cmdCIClassChose
Caption = "..."
BeginProperty Font
Name = "Arial"
Size = 9
Charset = 0
Weight = 700
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
Height = 300
Left = 3600
TabIndex = 2
Top = 510
Width = 375
End
Begin VB.TextBox txtCIClassName
BackColor = &H00FFFFFF&
Enabled = 0 'False
BeginProperty Font
Name = "宋体"
Size = 10.5
Charset = 134
Weight = 700
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
ForeColor = &H00FF0000&
Height = 315
Left = 1380
TabIndex = 31
Text = "Text1"
Top = 510
Width = 2205
End
Begin VB.TextBox txtCIWWW
Height = 300
Left = 1380
TabIndex = 11
Text = "Text11"
Top = 1950
Width = 6195
End
Begin VB.TextBox txtCIName
Height = 300
Left = 1380
TabIndex = 1
Text = "Text4"
Top = 150
Width = 6195
End
Begin VB.TextBox txtCIAddress
Height = 300
Left = 1380
TabIndex = 4
Text = "Text7"
Top = 870
Width = 3915
End
Begin VB.TextBox txtCIFax
Height = 300
Left = 1380
TabIndex = 9
Text = "Text8"
Top = 1590
Width = 2895
End
Begin VB.TextBox txtCIEMail
Height = 300
Left = 1380
TabIndex = 12
Text = "Text10"
Top = 2310
Width = 6195
End
Begin VB.TextBox txtCISourse
Height = 300
Left = 1380
TabIndex = 13
Text = "Text12"
Top = 2670
Width = 6195
End
Begin VB.ComboBox cboCIArea
Height = 300
Left = 1380
TabIndex = 6
Text = "Combo4"
Top = 1230
Width = 1665
End
Begin VB.TextBox txtCIMemo
Height = 1020
Left = 1380
TabIndex = 14
Text = "Text15"
Top = 3030
Width = 6195
End
Begin VB.ComboBox cboCICity
Height = 300
Left = 6270
TabIndex = 8
Text = "Combo5"
Top = 1230
Width = 1305
End
Begin VB.ComboBox cboCICountry
Height = 300
Left = 4170
TabIndex = 7
Text = "Combo3"
Top = 1230
Width = 1125
End
Begin VB.TextBox txtCIPostCode
Height = 300
Left = 6270
MaxLength = 6
TabIndex = 5
Text = "Text14"
Top = 870
Width = 1305
End
Begin VB.TextBox txtCITelephone
Height = 300
Left = 5310
TabIndex = 10
Text = "Text9"
Top = 1590
Width = 2265
End
Begin VB.ComboBox cboCIProductClass
Height = 300
Left = 5040
TabIndex = 3
Text = "Combo1"
Top = 510
Width = 2535
End
Begin VB.Label Label33
BackStyle = 0 'Transparent
Caption = "备 注："
Height = 345
Left = 480
TabIndex = 56
Top = 3060
Width = 1095
End
Begin VB.Label Label28
BackStyle = 0 'Transparent
Caption = "城 市："
Height = 255
Left = 5400
TabIndex = 55
Top = 1290
Width = 945
End
Begin VB.Label Label25
BackStyle = 0 'Transparent
Caption = "国 家："
Height = 375
Left = 3180
TabIndex = 54
Top = 1290
Width = 1035
End
Begin VB.Label Label24
BackStyle = 0 'Transparent
Caption = "地 区："
Height = 345
Left = 480
TabIndex = 53
Top = 1278
Width = 1095
End
Begin VB.Label Label23
BackStyle = 0 'Transparent
Caption = "邮政编码："
Height = 225
Left = 5400
TabIndex = 52
Top = 930
Width = 1065
End
Begin VB.Label Label4
BackStyle = 0 'Transparent
Caption = "传 真："
Height = 345
Left = 480
TabIndex = 43
Top = 1634
Width = 1095
End
Begin VB.Label Label6
BackStyle = 0 'Transparent
Caption = "客户类别："
Height = 345
Left = 480
TabIndex = 42
Top = 566
Width = 1095
End
Begin VB.Label Label9
BackStyle = 0 'Transparent
Caption = "客户名称："
Height = 345
Left = 480
TabIndex = 41
Top = 210
Width = 1095
End
Begin VB.Label Label10
BackStyle = 0 'Transparent
Caption = "地 址："
Height = 345
Left = 480
TabIndex = 40
Top = 922
Width = 1095
End
Begin VB.Label Label11
BackStyle = 0 'Transparent
Caption = "电 话："
Height = 225
Left = 4410
TabIndex = 39
Top = 1650
Width = 1275
End
Begin VB.Label Label12
BackStyle = 0 'Transparent
Caption = "网 址："
Height = 345
Left = 480
TabIndex = 38
Top = 1990
Width = 1095
End
Begin VB.Label Label13
BackStyle = 0 'Transparent
Caption = "电子邮件："
Height = 345
Left = 480
TabIndex = 37
Top = 2346
Width = 1095
End
Begin VB.Label Label14
BackStyle = 0 'Transparent
Caption = "来 源："
Height = 345
Left = 480
TabIndex = 36
Top = 2702
Width = 1095
End
Begin VB.Label Label15
BackStyle = 0 'Transparent
Caption = "产品类别："
Height = 225
Left = 4110
TabIndex = 35
Top = 570
Width = 1275
End
End
Begin VB.PictureBox picTabAccountInfo
Height = 4905
Left = 6450
ScaleHeight = 4845
ScaleWidth = 11565
TabIndex = 47
Top = 5190
Width = 11625
Begin VB.Frame Frame2
Caption = "增值税资料"
Height = 1935
Left = 360
TabIndex = 84
Top = 930
Width = 7305
Begin VB.TextBox txtAIAccountNo
Height = 315
Left = 4470
TabIndex = 22
Text = "Text25"
Top = 990
Width = 2625
End
Begin VB.TextBox txtAIBank
Height = 315
Left = 1080
TabIndex = 21
Text = "Text24"
Top = 990
Width = 2625
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -