📄 frmmain.frm
字号:
VERSION 5.00
Object = "{831FDD16-0C5C-11D2-A9FC-0000F8754DA1}#2.0#0"; "MSCOMCTL.OCX"
Object = "{D071B9D6-B434-4D40-8261-B8128A506688}#7.0#0"; "NFButton.ocx"
Object = "{9BE280A9-AFC9-4478-AE95-242AB1402CFC}#9.0#0"; "ImageButton.ocx"
Object = "{F9043C88-F6F2-101A-A3C9-08002B2F49FB}#1.2#0"; "COMDLG32.OCX"
Object = "{ABDBC15D-90F6-4DE8-89BA-460F9CB03411}#7.0#0"; "GoldSealCanlendar.ocx"
Object = "{BDC217C8-ED16-11CD-956C-0000C04E4C0A}#1.1#0"; "TABCTL32.OCX"
Object = "{38911DA0-E448-11D0-84A3-00DD01104159}#1.1#0"; "COMCT332.OCX"
Begin VB.Form frmMain
BackColor = &H80000004&
Caption = "Form1"
ClientHeight = 3195
ClientLeft = 165
ClientTop = 450
ClientWidth = 4680
Icon = "frmMain.frx":0000
LinkTopic = "Form1"
ScaleHeight = 3195
ScaleWidth = 4680
StartUpPosition = 2 'CenterScreen
WindowState = 2 'Maximized
Begin ComCtl3.CoolBar CoolBar1
Align = 1 'Align Top
Height = 390
Left = 0
TabIndex = 107
Top = 0
Width = 4680
_ExtentX = 8255
_ExtentY = 688
BandCount = 1
_CBWidth = 4680
_CBHeight = 390
_Version = "6.7.8988"
Child1 = "Toolbar1"
MinHeight1 = 330
Width1 = 4560
NewRow1 = 0 'False
Begin MSComctlLib.Toolbar Toolbar1
Height = 330
Left = 30
TabIndex = 108
Top = 30
Width = 4560
_ExtentX = 8043
_ExtentY = 582
ButtonWidth = 609
ButtonHeight = 582
Wrappable = 0 'False
Style = 1
ImageList = "TBimage"
_Version = 393216
BeginProperty Buttons {66833FE8-8583-11D1-B16A-00C0F0283628}
NumButtons = 19
BeginProperty Button1 {66833FEA-8583-11D1-B16A-00C0F0283628}
Key = "print"
Object.ToolTipText = "打印"
ImageIndex = 1
EndProperty
BeginProperty Button2 {66833FEA-8583-11D1-B16A-00C0F0283628}
Style = 4
MixedState = -1 'True
EndProperty
BeginProperty Button3 {66833FEA-8583-11D1-B16A-00C0F0283628}
Key = "new"
ImageIndex = 2
EndProperty
BeginProperty Button4 {66833FEA-8583-11D1-B16A-00C0F0283628}
Key = "del"
Object.ToolTipText = "删除"
ImageIndex = 3
EndProperty
BeginProperty Button5 {66833FEA-8583-11D1-B16A-00C0F0283628}
Key = "save"
Object.ToolTipText = "保存"
ImageIndex = 4
EndProperty
BeginProperty Button6 {66833FEA-8583-11D1-B16A-00C0F0283628}
Key = "saveadd"
Object.ToolTipText = "保存并增加"
ImageIndex = 5
EndProperty
BeginProperty Button7 {66833FEA-8583-11D1-B16A-00C0F0283628}
Key = "cancel"
Object.ToolTipText = "取消"
ImageIndex = 6
EndProperty
BeginProperty Button8 {66833FEA-8583-11D1-B16A-00C0F0283628}
Key = "complete"
Object.ToolTipText = "任务完成"
ImageIndex = 7
EndProperty
BeginProperty Button9 {66833FEA-8583-11D1-B16A-00C0F0283628}
Key = "documentscompart"
Style = 4
EndProperty
BeginProperty Button10 {66833FEA-8583-11D1-B16A-00C0F0283628}
Key = "documents"
Object.ToolTipText = "详细资料"
ImageIndex = 8
Style = 5
EndProperty
BeginProperty Button11 {66833FEA-8583-11D1-B16A-00C0F0283628}
Style = 4
EndProperty
BeginProperty Button12 {66833FEA-8583-11D1-B16A-00C0F0283628}
Key = "search"
Object.ToolTipText = "搜索及报表"
ImageIndex = 9
EndProperty
BeginProperty Button13 {66833FEA-8583-11D1-B16A-00C0F0283628}
Key = "operation"
Object.ToolTipText = "操作"
ImageIndex = 10
EndProperty
BeginProperty Button14 {66833FEA-8583-11D1-B16A-00C0F0283628}
Key = "calendarcompart"
Style = 4
EndProperty
BeginProperty Button15 {66833FEA-8583-11D1-B16A-00C0F0283628}
Key = "prevyear"
Object.ToolTipText = "上一年"
ImageIndex = 11
EndProperty
BeginProperty Button16 {66833FEA-8583-11D1-B16A-00C0F0283628}
Key = "prevmonth"
Object.ToolTipText = "上一月"
ImageIndex = 12
EndProperty
BeginProperty Button17 {66833FEA-8583-11D1-B16A-00C0F0283628}
Key = "today"
Object.ToolTipText = "今天"
ImageIndex = 13
EndProperty
BeginProperty Button18 {66833FEA-8583-11D1-B16A-00C0F0283628}
Key = "nextmonth"
Object.ToolTipText = "下一月"
ImageIndex = 14
EndProperty
BeginProperty Button19 {66833FEA-8583-11D1-B16A-00C0F0283628}
Key = "nextyear"
Object.ToolTipText = "下一年"
ImageIndex = 15
EndProperty
EndProperty
End
End
Begin MSComDlg.CommonDialog CommonDialog1
Left = 5715
Top = 2025
_ExtentX = 847
_ExtentY = 847
_Version = 393216
End
Begin VB.PictureBox VerPict
BackColor = &H00808080&
Height = 7620
Left = 0
ScaleHeight = 7560
ScaleWidth = 1845
TabIndex = 2
Top = 450
Width = 1905
Begin MSComctlLib.TreeView TVmemo
Height = 600
Left = 90
TabIndex = 3
Top = 1485
Width = 1590
_ExtentX = 2805
_ExtentY = 1058
_Version = 393217
Style = 7
Appearance = 0
End
Begin GoldSealImageButton.ImageButton ImageButton1
Height = 1185
Index = 0
Left = 45
TabIndex = 4
Top = 1935
Visible = 0 'False
Width = 1590
_ExtentX = 2805
_ExtentY = 2090
BackColor = 8421504
ForeColor = 16777215
Picture = "frmMain.frx":030A
Caption = "今日"
End
Begin GoldSealNFButton.NFButton NFButton1
Height = 285
Index = 0
Left = 0
TabIndex = 5
Top = 0
Width = 1815
_ExtentX = 3201
_ExtentY = 503
Caption = "联系人"
End
Begin MSComctlLib.TreeView TVlinkman
Height = 465
Left = 90
TabIndex = 6
Top = 855
Width = 1635
_ExtentX = 2884
_ExtentY = 820
_Version = 393217
HideSelection = 0 'False
Indentation = 354
LabelEdit = 1
Style = 7
Appearance = 0
BeginProperty Font {0BE35203-8F91-11CE-9DE3-00AA004BB851}
Name = "宋体"
Size = 9
Charset = 134
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
End
Begin GoldSealNFButton.NFButton NFButton1
Height = 285
Index = 1
Left = 0
TabIndex = 7
Top = 270
Width = 1815
_ExtentX = 3201
_ExtentY = 503
Caption = "日历"
End
Begin GoldSealNFButton.NFButton NFButton1
Height = 285
Index = 2
Left = 0
TabIndex = 8
Top = 540
Width = 1815
_ExtentX = 3201
_ExtentY = 503
Caption = "信息速查"
End
Begin GoldSealImageButton.ImageButton ImageButton1
Height = 1185
Index = 1
Left = 45
TabIndex = 9
Top = 3240
Width = 1590
_ExtentX = 2805
_ExtentY = 2090
BackColor = 8421504
ForeColor = 16777215
Picture = "frmMain.frx":0BE4
Caption = "日历"
End
Begin GoldSealImageButton.ImageButton ImageButton1
Height = 1185
Index = 2
Left = 0
TabIndex = 10
Top = 4410
Width = 1770
_ExtentX = 3122
_ExtentY = 2090
BackColor = 8421504
ForeColor = 16777215
Picture = "frmMain.frx":3396
Caption = "日记"
End
Begin GoldSealImageButton.ImageButton ImageButton1
Height = 1185
Index = 3
Left = 0
TabIndex = 11
Top = 5760
Width = 1680
_ExtentX = 2963
_ExtentY = 2090
BackColor = 8421504
ForeColor = 16777215
Picture = "frmMain.frx":43E8
Caption = "计划"
End
Begin VB.Image imgTV
Height = 480
Left = 0
Picture = "frmMain.frx":5B7A
Top = 0
Visible = 0 'False
Width = 480
End
End
Begin VB.PictureBox WorkPict
Height = 7620
Left = 1920
ScaleHeight = 7560
ScaleWidth = 9855
TabIndex = 0
Top = 450
Width = 9915
Begin GoldSealCalendar.GScalendar largeCalendar
Height = 690
Left = 45
TabIndex = 21
Top = 2205
Visible = 0 'False
Width = 2310
_ExtentX = 4075
_ExtentY = 1217
CellWidth = 20.857
CellHeight = 3.833
End
Begin MSComctlLib.TreeView TVdiary
Height = 960
Left = 6885
TabIndex = 20
Top = 2835
Visible = 0 'False
Width = 2940
_ExtentX = 5186
_ExtentY = 1693
_Version = 393217
Style = 7
Appearance = 1
End
Begin MSComctlLib.ListView LVplan
Height = 870
Left = 6885
TabIndex = 19
Top = 3870
Visible = 0 'False
Width = 2940
_ExtentX = 5186
_ExtentY = 1535
View = 3
LabelWrap = -1 'True
HideSelection = -1 'True
_Version = 393217
Icons = "ImageList32"
SmallIcons = "ImageList16"
ForeColor = -2147483640
BackColor = -2147483643
Appearance = 1
NumItems = 1
BeginProperty ColumnHeader(1) {BDD1F052-858B-11D1-B16A-00C0F0283628}
Key = "plan"
Text = "日程安排"
Object.Width = 8820
EndProperty
End
Begin GoldSealCalendar.GScalendar smallCalendar
Height = 2085
Left = 6885
TabIndex = 18
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -