⭐ 欢迎来到虫虫下载站! | 📦 资源下载 📁 资源专辑 ℹ️ 关于我们
⭐ 虫虫下载站

📄 form1.frm

📁 本人早先用vb写的脚本解释器,功能不是很多,支持分支循环的嵌套.
💻 FRM
字号:
VERSION 5.00
Begin VB.Form Form1 
   Caption         =   "Form1"
   ClientHeight    =   3075
   ClientLeft      =   60
   ClientTop       =   465
   ClientWidth     =   4680
   LinkTopic       =   "Form1"
   ScaleHeight     =   3075
   ScaleWidth      =   4680
   StartUpPosition =   3  '窗口缺省
End
Attribute VB_Name = "Form1"
Attribute VB_GlobalNameSpace = False
Attribute VB_Creatable = False
Attribute VB_PredeclaredId = True
Attribute VB_Exposed = False
Dim rwi As New ReadWrite
Dim ana As New XHMScriptM

Private Sub Form_KeyDown(KeyCode As Integer, Shift As Integer)
    ana.键盘操作入口 CLng(KeyCode)
End Sub

Private Sub Form_KeyUp(KeyCode As Integer, Shift As Integer)
    ana.键盘消除入口 CLng(KeyCode)
End Sub

Private Sub Form_Load()
ana.初始化图形 Me.hWnd, 640, 480, False
ana.初始化声音音乐 Me.hWnd
ana.初始化鼠标 Me.hWnd
ana.分析脚本 rwi.ReadInformation(App.Path & "\1.scp"), App.Path
End
End Sub

⌨️ 快捷键说明

复制代码 Ctrl + C
搜索代码 Ctrl + F
全屏模式 F11
切换主题 Ctrl + Shift + D
显示快捷键 ?
增大字号 Ctrl + =
减小字号 Ctrl + -