📄 module2.bas
字号:
Attribute VB_Name = "Module2"
Option Explicit
Public Const TEST_START = &H20 ' 测试过程开始
Public Const TEST_DATA = &H21 ' 测试数据正确性
Public Const TEST_UPLOAD = &H22 ' 测试上传数据块
Public Const TEST_DOWNLOAD = &H23 ' 测试下传数据块
Type mBuf
mBuff(4099) As Byte
End Type
Public Declare Function GetTickCount Lib "kernel32" () As Long
Public Declare Function LoadLibrary Lib "kernel32" Alias "LoadLibraryA" (ByVal lpLibFileName As String) As Long
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -