📄 form1.frm
字号:
Caption = "图形 1(&1)"
Index = 0
Begin VB.Menu Lev1
Caption = "初级(&B)"
Index = 0
End
Begin VB.Menu Lev1
Caption = "中级(&I)"
Index = 10
End
Begin VB.Menu Lev1
Caption = "高级(&E)"
Index = 20
End
Begin VB.Menu Lev1
Caption = "-"
Index = 30
End
Begin VB.Menu Lev1
Caption = "自定义(&C)..."
Index = 40
End
End
Begin VB.Menu Photo
Caption = "图形 2(&2)"
Index = 10
Begin VB.Menu Lev2
Caption = "初级(&B)"
Index = 0
End
Begin VB.Menu Lev2
Caption = "中级(&I)"
Index = 10
End
Begin VB.Menu Lev2
Caption = "高级(&E)"
Index = 20
End
Begin VB.Menu Lev2
Caption = "-"
Index = 30
End
Begin VB.Menu Lev2
Caption = "自定义(&C)..."
Index = 40
End
End
End
Begin VB.Menu Interface
Caption = "数字界面(&N)"
Index = 10
Begin VB.Menu Number
Caption = "数字 1(&1)"
Index = 0
Begin VB.Menu Lev3
Caption = "初级(&B)"
Index = 0
End
Begin VB.Menu Lev3
Caption = "中级(&I)"
Checked = -1 'True
Index = 10
End
Begin VB.Menu Lev3
Caption = "高级(&E)"
Index = 20
End
Begin VB.Menu Lev3
Caption = "-"
Index = 30
End
Begin VB.Menu Lev3
Caption = "自定义(&C)..."
Index = 40
End
End
Begin VB.Menu Number
Caption = "数字 2(&2)"
Index = 10
Begin VB.Menu Lev4
Caption = "初级(&B)"
Index = 0
End
Begin VB.Menu Lev4
Caption = "中级(&I)"
Index = 10
End
Begin VB.Menu Lev4
Caption = "高级(&E)"
Index = 20
End
Begin VB.Menu Lev4
Caption = "-"
Index = 30
End
Begin VB.Menu Lev4
Caption = "自定义(&C)..."
Index = 40
End
End
End
End
Begin VB.Menu Sys
Caption = "-"
Index = 30
End
Begin VB.Menu Sys
Caption = "模式(&M)"
Index = 40
Begin VB.Menu Model
Caption = "练习模式(&E)"
Checked = -1 'True
Index = 0
End
Begin VB.Menu Model
Caption = "挑战模式(&C)"
Index = 10
Begin VB.Menu Lev5
Caption = "初级(&B)"
Index = 0
End
Begin VB.Menu Lev5
Caption = "中级(&I)"
Index = 10
End
Begin VB.Menu Lev5
Caption = "高级(&E)"
Index = 20
End
Begin VB.Menu Lev5
Caption = "-"
Index = 30
End
Begin VB.Menu Lev5
Caption = "自定义(&C)..."
Index = 40
End
End
End
Begin VB.Menu Sys
Caption = "-"
Index = 50
End
Begin VB.Menu Sys
Caption = "退出(&X)"
Index = 60
Shortcut = ^Q
End
End
Begin VB.Menu System
Caption = "游戏设置(&O)"
Index = 1
Begin VB.Menu Opt
Caption = "重置(&R)"
Index = 0
Shortcut = ^{F2}
End
Begin VB.Menu Opt
Caption = "后退(&B)"
Index = 10
Shortcut = {F5}
End
Begin VB.Menu Opt
Caption = "前进(&F)"
Index = 20
Shortcut = {F6}
End
Begin VB.Menu Opt
Caption = "暂停(&P)"
Index = 30
Shortcut = {F7}
End
Begin VB.Menu Opt
Caption = "-"
Index = 40
End
Begin VB.Menu Opt
Caption = "电脑辅助功能(目前还不完善)(&A)"
Index = 50
Shortcut = {F8}
End
Begin VB.Menu Opt
Caption = "背景音乐(&M)"
Index = 60
Begin VB.Menu BackgroundMusic
Caption = "暂停(&P)"
Index = 0
Shortcut = {F3}
End
Begin VB.Menu BackgroundMusic
Caption = "停止(&S)"
Index = 10
Shortcut = ^{F3}
End
Begin VB.Menu BackgroundMusic
Caption = "上一曲(&U)"
Index = 20
Shortcut = ^{F11}
End
Begin VB.Menu BackgroundMusic
Caption = "下一曲(&D)"
Index = 30
Shortcut = ^{F12}
End
End
Begin VB.Menu Opt
Caption = "背景音效(&E)"
Checked = -1 'True
Index = 70
Shortcut = {F4}
End
Begin VB.Menu Opt
Caption = "背景音乐播放模式设置(&O)"
Index = 80
Begin VB.Menu Play
Caption = "单曲顺序播放(&P)"
Index = 1
End
Begin VB.Menu Play
Caption = "单曲循环播放(&C)"
Index = 2
End
Begin VB.Menu Play
Caption = "全部顺序播放(&S)"
Index = 3
End
Begin VB.Menu Play
Caption = "全部循环播放(&A)"
Checked = -1 'True
Index = 4
End
Begin VB.Menu Play
Caption = "全部随机播放(&R)"
Index = 5
End
End
Begin VB.Menu Opt
Caption = "音量设置(&V)"
Index = 90
Begin VB.Menu Volume
Caption = "增大(&U)"
Index = 0
Shortcut = {F11}
End
Begin VB.Menu Volume
Caption = "减小(&D)"
Index = 10
Shortcut = {F12}
End
Begin VB.Menu Volume
Caption = "静音(&M)"
Index = 20
Shortcut = {F9}
End
Begin VB.Menu Volume
Caption = "-"
Index = 30
End
Begin VB.Menu Volume
Caption = "自定义(&C)..."
Index = 40
End
End
Begin VB.Menu Opt
Caption = "-"
Index = 100
End
Begin VB.Menu Opt
Caption = "速度设置(&S)..."
Index = 110
Shortcut = ^O
End
End
Begin VB.Menu System
Caption = "视图(&V)"
Index = 2
Begin VB.Menu Other
Caption = "排行榜(&T)..."
Index = 0
Shortcut = ^T
End
Begin VB.Menu Other
Caption = "-"
Index = 10
End
Begin VB.Menu Other
Caption = "工具栏(&B)"
Checked = -1 'True
Index = 20
End
Begin VB.Menu Other
Caption = "状态栏(&S)"
Checked = -1 'True
Index = 30
End
Begin VB.Menu Other
Caption = "最终图形(&F)"
Checked = -1 'True
Index = 40
End
Begin VB.Menu Other
Caption = "时间(&T)"
Checked = -1 'True
Index = 50
End
Begin VB.Menu Other
Caption = "步数(&P)"
Checked = -1 'True
Index = 60
End
Begin VB.Menu Other
Caption = "统计(&A)"
Checked = -1 'True
Index = 70
End
End
Begin VB.Menu System
Caption = "状态栏右键"
Index = 3
Visible = 0 'False
Begin VB.Menu ClickStatusRight
Caption = "游戏开始时间(&S)"
Index = 0
End
Begin VB.Menu ClickStatusRight
Caption = "游戏运行时间(&R)"
Index = 10
End
Begin VB.Menu ClickStatusRight
Caption = "-"
Index = 20
End
Begin VB.Menu ClickStatusRight
Caption = "隐藏(&H)"
Index = 30
End
End
Begin VB.Menu System
Caption = "图形右键"
Index = 4
Visible = 0 'False
Begin VB.Menu ClickImageRight
Caption = "隐藏(&H)"
End
End
Begin VB.Menu System
Caption = "统计右键"
Index = 5
Visible = 0 'False
Begin VB.Menu ClickStaRight
Caption = "更换标签字体颜色...(&L)"
Index = 0
End
Begin VB.Menu ClickStaRight
Caption = "更换内容字体颜色...(&C)"
Index = 10
End
Begin VB.Menu ClickStaRight
Caption = "更换边框字体颜色...(&F)"
Index = 15
End
Begin VB.Menu ClickStaRight
Caption = "默认颜色(&D)"
Checked = -1 'True
Index = 20
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -