📄 module1.bas
字号:
Attribute VB_Name = "Module1"
Public Declare Function mciSendString Lib "winmm.dll" Alias "mciSendStringA" (ByVal lpstrCommand As String, ByVal lpstrReturnString As String, ByVal uReturnLength As Long, ByVal hwndCallback As Long) As Long
Public Midi As String
Public CmdStr As String
Public ReturnVal As String
Public Char_X As Single
Public Char_Y As Single
Public Char_Face As Single
Public Draw_Position As Single
Public Map(50) As String
Public Newline As String
Public Answers(30) As String
Public Y As Single
Public X As Single
Public look_at As String
Public Found_Scroll As Boolean
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -