📄 form1.frm
字号:
Top = 15
Width = 330
End
Begin VB.Image ImageL3
Height = 330
Left = 4050
Picture = "Form1.frx":5602
ToolTipText = " 打开控制面板 "
Top = 1215
Visible = 0 'False
Width = 330
End
Begin VB.Image ImageL2
Height = 330
Left = 4065
Picture = "Form1.frx":5C1C
ToolTipText = " 打开控制面板 "
Top = 840
Visible = 0 'False
Width = 330
End
Begin VB.Image ImageL1
Height = 330
Left = 4020
Picture = "Form1.frx":6236
ToolTipText = " 打开控制面板 "
Top = 465
Visible = 0 'False
Width = 330
End
Begin VB.Image ImageL
Height = 330
Left = 3960
Picture = "Form1.frx":6850
ToolTipText = " 上一幅图像 "
Top = 15
Width = 330
End
Begin VB.Image ImageO3
Height = 330
Left = 3045
Picture = "Form1.frx":6E6A
ToolTipText = " 打开控制面板 "
Top = 1215
Visible = 0 'False
Width = 330
End
Begin VB.Image ImageO2
Height = 330
Left = 3015
Picture = "Form1.frx":7484
ToolTipText = " 打开控制面板 "
Top = 825
Visible = 0 'False
Width = 330
End
Begin VB.Image ImageO1
Height = 330
Left = 3030
Picture = "Form1.frx":7A9E
ToolTipText = " 打开控制面板 "
Top = 465
Visible = 0 'False
Width = 330
End
Begin VB.Image ImageO
Height = 330
Left = 2970
Picture = "Form1.frx":80B8
ToolTipText = " 缩小区域 "
Top = 15
Width = 330
End
Begin VB.Image ImageI3
Height = 330
Left = 2535
Picture = "Form1.frx":86D2
ToolTipText = " 打开控制面板 "
Top = 1215
Visible = 0 'False
Width = 330
End
Begin VB.Image ImageI2
Height = 330
Left = 2535
Picture = "Form1.frx":8CEC
ToolTipText = " 打开控制面板 "
Top = 810
Visible = 0 'False
Width = 330
End
Begin VB.Image ImageI1
Height = 330
Left = 2550
Picture = "Form1.frx":9306
ToolTipText = " 打开控制面板 "
Top = 435
Visible = 0 'False
Width = 330
End
Begin VB.Image ImageI
Height = 330
Left = 2610
Picture = "Form1.frx":9920
ToolTipText = " 放大选择区域 "
Top = 15
Width = 330
End
Begin VB.Line Line1
BorderColor = &H00808080&
BorderStyle = 6 'Inside Solid
Index = 1
X1 = -180
X2 = 5384
Y1 = 375
Y2 = 375
End
Begin VB.Image ImageK3
Height = 330
Left = 1830
Picture = "Form1.frx":9F3A
Top = 1200
Visible = 0 'False
Width = 330
End
Begin VB.Image ImageK2
Height = 330
Left = 1815
Picture = "Form1.frx":A554
Top = 810
Visible = 0 'False
Width = 330
End
Begin VB.Image ImageK1
Height = 330
Left = 1815
Picture = "Form1.frx":AB6E
Top = 435
Visible = 0 'False
Width = 330
End
Begin VB.Image ImageK
Height = 330
Left = 1800
Picture = "Form1.frx":B188
ToolTipText = " 打开控制面板 "
Top = 15
Width = 330
End
Begin VB.Image ImageC3
Height = 330
Left = 1125
Picture = "Form1.frx":B7A2
Top = 1200
Visible = 0 'False
Width = 330
End
Begin VB.Image ImageC2
Height = 330
Left = 1125
Picture = "Form1.frx":BDBC
Top = 825
Visible = 0 'False
Width = 330
End
Begin VB.Image ImageC1
Height = 330
Left = 1125
Picture = "Form1.frx":C3D6
Top = 450
Visible = 0 'False
Width = 330
End
Begin VB.Image ImageC
Height = 330
Left = 1170
Picture = "Form1.frx":C9F0
ToolTipText = " 清除画面 "
Top = 15
Width = 330
End
Begin VB.Image ImageS3
Height = 360
Left = 675
Picture = "Form1.frx":D00A
Top = 1200
Visible = 0 'False
Width = 360
End
Begin VB.Image ImageS2
Height = 360
Left = 675
Picture = "Form1.frx":D6F4
Top = 825
Visible = 0 'False
Width = 360
End
Begin VB.Image ImageS1
Height = 360
Left = 675
Picture = "Form1.frx":DDDE
Top = 450
Visible = 0 'False
Width = 360
End
Begin VB.Image ImageS
Height = 360
Left = 720
Picture = "Form1.frx":E4C8
ToolTipText = " 停止绘图 "
Top = 0
Width = 360
End
Begin VB.Image ImageP3
Height = 360
Left = 225
Picture = "Form1.frx":EBB2
Top = 1200
Visible = 0 'False
Width = 360
End
Begin VB.Image ImageP2
Height = 360
Left = 225
Picture = "Form1.frx":F29C
Top = 825
Visible = 0 'False
Width = 360
End
Begin VB.Image ImageP1
Height = 360
Left = 225
Picture = "Form1.frx":F986
Top = 450
Visible = 0 'False
Width = 360
End
Begin VB.Image ImageP
Height = 360
Left = 270
Picture = "Form1.frx":10070
ToolTipText = " 开始绘图 "
Top = 0
Width = 360
End
Begin VB.Line Line1
BorderColor = &H00FFFFFF&
BorderWidth = 2
Index = 0
X1 = -180
X2 = 5369
Y1 = 375
Y2 = 375
End
Begin VB.Menu wenjian
Caption = " 文件(&F) "
Begin VB.Menu conglai
Caption = "重来(&T)"
Shortcut = ^N
End
Begin VB.Menu hen7853
Caption = "-"
End
Begin VB.Menu dakai
Caption = "打开 HTXT 文件..."
Shortcut = ^O
End
Begin VB.Menu henidf
Caption = "-"
End
Begin VB.Menu MsaveHTXT
Caption = "保存为 HTXT 文件..."
Shortcut = ^H
End
Begin VB.Menu baocun
Caption = "保存为 BMP 文件..."
Shortcut = ^S
End
Begin VB.Menu henhgtrh
Caption = "-"
End
Begin VB.Menu SetBMPW
Caption = "设置为桌面图片"
End
Begin VB.Menu aaa
Caption = "-"
End
Begin VB.Menu colo
Caption = "颜色锁定(&C)"
End
Begin VB.Menu suiji
Caption = "随机颜色(&J)"
Checked = -1 'True
End
Begin VB.Menu hang
Caption = "-"
End
Begin VB.Menu tuichu
Caption = "退出(&X)"
End
End
Begin VB.Menu bianji
Caption = "编辑(&E)"
Begin VB.Menu Mstart
Caption = "开始绘制"
End
Begin VB.Menu Mend
Caption = "停止绘图"
End
Begin VB.Menu MClease
Caption = "清除图像"
End
Begin VB.Menu hennhgbst
Caption = "-"
End
Begin VB.Menu umCopy
Caption = "复制图像"
End
Begin VB.Menu hengjnjrege
Caption = "-"
End
Begin VB.Menu fangda2
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -