📄 main.frm
字号:
Left = 630
MultiLine = -1 'True
TabIndex = 45
Text = "Main.frx":1B67
Top = 570
Width = 1005
End
End
Begin VB.PictureBox picToolbarTitle
Appearance = 0 'Flat
BackColor = &H00808080&
BorderStyle = 0 'None
ForeColor = &H80000008&
Height = 285
Left = 30
ScaleHeight = 285
ScaleWidth = 1785
TabIndex = 98
Top = 30
Width = 1785
Begin VB.Label Label47
BackStyle = 0 'Transparent
Caption = "客户资料项"
BeginProperty Font
Name = "宋体"
Size = 9
Charset = 134
Weight = 700
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
ForeColor = &H00FFFFFF&
Height = 345
Left = 420
TabIndex = 99
Top = 60
Width = 1905
End
End
Begin VB.PictureBox picTabYWPZ
Appearance = 0 'Flat
BackColor = &H80000005&
BorderStyle = 0 'None
ForeColor = &H80000008&
Height = 1275
Left = 5940
ScaleHeight = 1275
ScaleWidth = 1515
TabIndex = 50
Top = 3660
Width = 1515
Begin VB.TextBox txtYWPZ
Height = 840
Left = 240
MultiLine = -1 'True
TabIndex = 104
Text = "Main.frx":1B6D
Top = 180
Width = 1005
End
End
Begin VB.PictureBox picTabUnit
Appearance = 0 'Flat
BackColor = &H80000005&
BorderStyle = 0 'None
ForeColor = &H80000008&
Height = 1935
Left = 5970
ScaleHeight = 1935
ScaleWidth = 1875
TabIndex = 48
Top = 180
Width = 1875
Begin VB.TextBox txtUnit
Height = 1515
Left = 150
MultiLine = -1 'True
TabIndex = 58
Text = "Main.frx":1B76
Top = 150
Width = 1455
End
End
Begin VB.PictureBox picTabYS
Appearance = 0 'Flat
BackColor = &H80000005&
BorderStyle = 0 'None
ForeColor = &H80000008&
Height = 1845
Left = 2910
ScaleHeight = 1845
ScaleWidth = 1755
TabIndex = 51
Top = 1980
Width = 1755
Begin VB.TextBox txtYS
Height = 1185
Left = 150
TabIndex = 57
Text = "优势"
Top = 180
Width = 1125
End
End
Begin VB.PictureBox picTabEvaluate
Appearance = 0 'Flat
BackColor = &H80000005&
BorderStyle = 0 'None
ForeColor = &H80000008&
Height = 1695
Left = 3900
ScaleHeight = 1695
ScaleWidth = 1785
TabIndex = 49
Top = 390
Width = 1785
Begin VB.TextBox txtEvaluate
Height = 1365
Left = 150
MultiLine = -1 'True
TabIndex = 59
Text = "Main.frx":1B80
Top = 90
Width = 1305
End
End
Begin MSComctlLib.Toolbar tbCustomerInfo
Height = 525
Left = 30
TabIndex = 97
Top = 1140
Width = 1755
_ExtentX = 3096
_ExtentY = 926
ButtonWidth = 3043
ButtonHeight = 926
Style = 1
ImageList = "ImageList2"
_Version = 393216
BeginProperty Buttons {66833FE8-8583-11D1-B16A-00C0F0283628}
NumButtons = 8
BeginProperty Button1 {66833FEA-8583-11D1-B16A-00C0F0283628}
Caption = "基本资料"
Key = "tlbaseinfo"
ImageIndex = 1
Style = 2
Value = 1
EndProperty
BeginProperty Button2 {66833FEA-8583-11D1-B16A-00C0F0283628}
Caption = "联系人"
Key = "tlrelaman"
ImageIndex = 2
Style = 2
EndProperty
BeginProperty Button3 {66833FEA-8583-11D1-B16A-00C0F0283628}
Caption = "财务资料"
Key = "tlaccountinfo"
ImageIndex = 3
Style = 2
EndProperty
BeginProperty Button4 {66833FEA-8583-11D1-B16A-00C0F0283628}
Caption = "营业项目及营业状况"
Key = "tlitem"
ImageIndex = 4
Style = 2
EndProperty
BeginProperty Button5 {66833FEA-8583-11D1-B16A-00C0F0283628}
Caption = "往来单位"
Key = "tlunit"
ImageIndex = 5
Style = 2
EndProperty
BeginProperty Button6 {66833FEA-8583-11D1-B16A-00C0F0283628}
Caption = "竟争优势"
Key = "tlys"
ImageIndex = 6
Style = 2
EndProperty
BeginProperty Button7 {66833FEA-8583-11D1-B16A-00C0F0283628}
Caption = "业务人员评价"
Key = "tlevaluate"
ImageIndex = 7
Style = 2
EndProperty
BeginProperty Button8 {66833FEA-8583-11D1-B16A-00C0F0283628}
Caption = "业务抛转记录"
Key = "tlywpz"
ImageIndex = 8
Style = 2
EndProperty
EndProperty
End
Begin VB.Line lineCT
BorderColor = &H00C0C0C0&
X1 = 720
X2 = 3360
Y1 = 0
Y2 = 0
End
End
Begin VB.PictureBox picCustomerBar
BackColor = &H00808080&
BorderStyle = 0 'None
Height = 510
Left = 150
ScaleHeight = 510
ScaleWidth = 12060
TabIndex = 67
Top = 1320
Width = 12060
Begin VB.TextBox txtArchiveNo
BackColor = &H00FFFFFF&
Height = 285
Left = 960
TabIndex = 28
Text = "Text1"
Top = 90
Width = 1485
End
Begin VB.CommandButton cmdCustomerBack
Caption = "返回"
Height = 330
Left = 10860
TabIndex = 70
Top = 90
Width = 1095
End
Begin VB.CommandButton cmdSaveExit
Caption = "保存并返回"
Height = 330
Left = 9750
TabIndex = 69
Top = 90
Width = 1095
End
Begin VB.CommandButton cmdSaveNew
Caption = "保存并新建"
Height = 330
Left = 8640
TabIndex = 68
Top = 90
Width = 1095
End
Begin MSComCtl2.DTPicker dtpArchiveDate
Height = 285
Left = 3390
TabIndex = 29
Top = 90
Width = 1665
_ExtentX = 2937
_ExtentY = 503
_Version = 393216
Format = 30146560
CurrentDate = 37632
End
Begin VB.TextBox txtArchiveCreater
Height = 285
Left = 5790
TabIndex = 30
Text = "Text2"
Top = 90
Width = 915
End
Begin VB.Label Label3
BackStyle = 0 'Transparent
Caption = "档案编号："
ForeColor = &H00FFFFFF&
Height = 255
Left = 60
TabIndex = 74
Top = 150
Width = 1275
End
Begin VB.Label Label2
BackStyle = 0 'Transparent
Caption = "建档人："
ForeColor = &H00FFFFFF&
Height = 225
Left = 5130
TabIndex = 73
Top = 120
Width = 855
End
Begin VB.Label Label1
BackStyle = 0 'Transparent
Caption = "建档日期："
ForeColor = &H00FFFFFF&
Height = 255
Left = 2520
TabIndex = 72
Top = 120
Width = 1215
End
End
Begin VB.PictureBox picArchiveBar
BackColor = &H00808080&
BorderStyle = 0 'None
Height = 510
Left = 150
ScaleHeight = 510
ScaleWidth = 12060
TabIndex = 63
Top = 630
Width = 12060
Begin VB.CommandButton cmdDelArchives
Caption = "删除档案"
Height = 330
Left = 9750
TabIndex = 103
Top = 90
Width = 1035
End
Begin VB.CommandButton cmdModifyArchives
Caption = "修改档案"
Height = 330
Left = 8640
TabIndex = 101
Top = 90
Width = 1095
End
Begin VB.CommandButton cmdAddArchives
Caption = "新增档案"
Height = 330
Left = 7530
TabIndex = 100
Top = 90
Width = 1095
End
Begin VB.TextBox txtChoseClass
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 = 255
Left = 990
TabIndex = 65
Text = "Text1"
Top = 150
Width = 2205
End
Begin VB.CommandButton cmdClassChose
Caption = "..."
BeginProperty Font
Name = "Arial"
Size = 9
Charset = 0
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -