📄 frmmain.frm
字号:
BeginProperty ListImage11 {2C247F27-8591-11D1-B16A-00C0F0283628}
Picture = "frmMain.frx":112A2
Key = ""
EndProperty
BeginProperty ListImage12 {2C247F27-8591-11D1-B16A-00C0F0283628}
Picture = "frmMain.frx":116F4
Key = ""
EndProperty
BeginProperty ListImage13 {2C247F27-8591-11D1-B16A-00C0F0283628}
Picture = "frmMain.frx":11B46
Key = ""
EndProperty
BeginProperty ListImage14 {2C247F27-8591-11D1-B16A-00C0F0283628}
Picture = "frmMain.frx":11E60
Key = ""
EndProperty
BeginProperty ListImage15 {2C247F27-8591-11D1-B16A-00C0F0283628}
Picture = "frmMain.frx":122B2
Key = ""
EndProperty
EndProperty
End
Begin VB.Menu mnuFile
Caption = "文件(&F)"
Begin VB.Menu mnuUserLogin
Caption = "用户登录(&L)"
End
Begin VB.Menu mnuUserReg
Caption = "新用户注册(&R)"
End
Begin VB.Menu compart0
Caption = "-"
End
Begin VB.Menu mnuPrint
Caption = "打印(&P)..."
End
Begin VB.Menu compart1
Caption = "-"
End
Begin VB.Menu mnuLogout
Caption = "注销(&O)"
End
Begin VB.Menu mnuExit
Caption = "退出(&X)"
End
End
Begin VB.Menu mnuEdit
Caption = "编辑(&E)"
Visible = 0 'False
Begin VB.Menu mnuCut
Caption = "剪切(&T)"
End
Begin VB.Menu mnuCopy
Caption = "复制(&C)"
End
Begin VB.Menu mnuPaste
Caption = "粘贴(&P)"
End
Begin VB.Menu compart2
Caption = "-"
End
Begin VB.Menu mnuAllChoose
Caption = "全选(&A)"
End
Begin VB.Menu mnuRev
Caption = "反向选择(&I)"
End
Begin VB.Menu compart3
Caption = "-"
End
Begin VB.Menu mnuFound
Caption = "查找(&F)..."
End
Begin VB.Menu mnuReplace
Caption = "替换(&E)..."
End
End
Begin VB.Menu mnuPersonal
Caption = "联系人(&R)"
Begin VB.Menu mnuNewPersonal
Caption = "新联系人(&N)"
End
Begin VB.Menu mnuDelPersonal
Caption = "删除(&D)"
End
Begin VB.Menu compart4
Caption = "-"
End
Begin VB.Menu mnuSavePersonal
Caption = "保存(&S)"
End
Begin VB.Menu mnuSaveAddPersonal
Caption = "保存并增加(&E)"
End
Begin VB.Menu mnuCancelPersonal
Caption = "取消(&C)"
End
Begin VB.Menu compart5
Caption = "-"
End
Begin VB.Menu mnuPersonalGroup
Caption = "新建组(&U)"
End
End
Begin VB.Menu mnuCalendar
Caption = "日历(&C)"
Begin VB.Menu mnuNewPlanCalendar
Caption = "新安排(&N)"
End
Begin VB.Menu mnuCommemoration
Caption = "纪念日(&C)"
End
Begin VB.Menu compart6
Caption = "-"
End
Begin VB.Menu mnuGotoNowCalendar
Caption = "转到今天(T)"
End
Begin VB.Menu mnuGotoDateCalendar
Caption = "转到日期(&E)..."
End
End
Begin VB.Menu mnuDiary
Caption = "日记(&Y)"
Begin VB.Menu mnuNewDiary
Caption = "新日记(&A)"
End
Begin VB.Menu mnuDelDiary
Caption = "删除(D)"
End
Begin VB.Menu compart7
Caption = "-"
End
Begin VB.Menu mnuSaveDiary
Caption = "保存(&S)"
End
Begin VB.Menu mnuCancel
Caption = "取消(&C)"
End
Begin VB.Menu compart8
Caption = "-"
End
Begin VB.Menu mnuGotoNowDiary
Caption = "转到今天(T)"
End
Begin VB.Menu mnuGotoDateDiary
Caption = "转到日期(&E)..."
End
End
Begin VB.Menu mnuPlan
Caption = "计划(&P)"
Begin VB.Menu mnuNewPlan
Caption = "新安排(&N)"
End
Begin VB.Menu mnuModifyPlan
Caption = "修改安排(&R)"
End
Begin VB.Menu mnuDelPlan
Caption = "删除(&D)"
End
Begin VB.Menu compart9
Caption = "-"
End
Begin VB.Menu mnuNewThing
Caption = "新任务(&W)"
End
Begin VB.Menu mnuModifyThing
Caption = "修改任务(&G)"
End
Begin VB.Menu mnuThingComplete
Caption = "任务完成(&F)"
End
Begin VB.Menu mnuDelThing
Caption = "删除任务(&L)"
End
Begin VB.Menu compart10
Caption = "-"
End
Begin VB.Menu mnuGotoNowPlan
Caption = "转到今天(T)"
End
Begin VB.Menu mnuGotoDatePlan
Caption = "转到日期(&E)..."
End
End
Begin VB.Menu mnuMemo
Caption = "备忘录(&N)"
Begin VB.Menu mnuNewMemo
Caption = "新备忘录(&N)"
End
Begin VB.Menu mnuDelMemo
Caption = "删除(&D)"
End
Begin VB.Menu compart11
Caption = "-"
End
Begin VB.Menu mnuSaveMemo
Caption = "保存(&S)"
End
Begin VB.Menu mnuCancelMemo
Caption = "取消(&C)"
End
Begin VB.Menu compart12
Caption = "-"
End
Begin VB.Menu mnuMemoGroup
Caption = "新建组(&U)"
End
End
Begin VB.Menu mnuView
Caption = "视图(&V)"
Begin VB.Menu mnuDefineToolBar
Caption = "自定义工具栏(&C)..."
End
Begin VB.Menu mnuStatus
Caption = "状态栏(&B)"
Checked = -1 'True
End
Begin VB.Menu mnuIconView
Caption = "-"
Index = 0
End
Begin VB.Menu mnuIconView
Caption = "大图标(&G)"
Index = 1
End
Begin VB.Menu mnuIconView
Caption = "小图标(&M)"
Index = 2
End
Begin VB.Menu mnuIconView
Caption = "列表(&L)"
Index = 3
End
Begin VB.Menu mnuIconView
Caption = "详细资枓(&D)"
Checked = -1 'True
Index = 4
End
Begin VB.Menu mnuPage
Caption = "-"
Index = 0
Visible = 0 'False
End
Begin VB.Menu mnuPage
Caption = "摘要(&S)"
Index = 1
Visible = 0 'False
End
Begin VB.Menu mnuPage
Caption = "分页显示(&P)"
Index = 2
Visible = 0 'False
End
Begin VB.Menu compart14
Caption = "-"
End
Begin VB.Menu mnuPersonalView
Caption = "联系人(&N)"
Checked = -1 'True
End
Begin VB.Menu mnuTodayView
Caption = "今日(&T)"
End
Begin VB.Menu mnuDateView
Caption = "日历(&D)"
End
Begin VB.Menu mnuDiaryView
Caption = "日记(&Y)"
End
Begin VB.Menu mnuPlanView
Caption = "计划(&P)"
End
Begin VB.Menu mnuInfoView
Caption = "信息速查(&V)"
End
End
Begin VB.Menu mnuTool
Caption = "工具(&T)"
Begin VB.Menu mnuReport
Caption = "搜索及报表(R)"
End
Begin VB.Menu mnuUserModify
Caption = "用户资枓修改(&M)"
End
Begin VB.Menu compart15
Caption = "-"
End
Begin VB.Menu mnuBrowser
Caption = "Web浏览器(&B)"
End
Begin VB.Menu mnuEmail
Caption = "电子邮件(&E)"
End
Begin VB.Menu mnuOperate
Caption = "-"
Index = 0
End
Begin VB.Menu mnuOperate
Caption = "操作(&T)"
Index = 1
Begin VB.Menu mnuSendEmail
Caption = "发邮件给选择的联系人(&E)"
End
Begin VB.Menu compart16
Caption = "-"
End
Begin VB.Menu mnuPersonalWeb
Caption = "访问联系人的个人Web页(&P)"
End
Begin VB.Menu mnuCompanyWeb
Caption = "访问联系人的单位Web页(&S)"
End
End
Begin VB.Menu compart17
Caption = "-"
End
Begin VB.Menu mnuOption
Caption = "选项(&O)"
End
End
Begin VB.Menu mnuHelp
Caption = "帮助(&H)"
Begin VB.Menu mnuDisplayHelp
Caption = "显示帮助(&H)..."
End
Begin VB.Menu compart18
Caption = "-"
End
Begin VB.Menu mnuGoldSeal
Caption = "GoldSeal 小秘书的Web页(&W)"
End
Begin VB.Menu mnuTouch
Caption = "联系作者(&T)"
End
Begin VB.Menu compart19
Caption = "-"
End
Begin VB.Menu mnuAbout
Caption = "关于GoldSeal 小秘书(&A)..."
End
End
Begin VB.Menu pmnuLVlinkman
Caption = "linkmanPopMenu"
Visible = 0 'False
Begin VB.Menu pmnuNewPersonal
Caption = "新联系人(&N)"
End
Begin VB.Menu pmnuNewGroup
Caption = "新组(&U)"
End
Begin VB.Menu compart20
Caption = "-"
End
Begin VB.Menu pmnuIconViewL
Caption = "大图标(&G)"
Index ⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -