📄 module.bas
字号:
Attribute VB_Name = "Module1"
Public current_Dsb As Byte
Public Const Buf_Size = 15000
Public ds As DirectSound
Public dsb As DirectSoundBuffer
Public dsd As DSBUFFERDESC
Public dsc As DirectSoundCapture
Public dscb As DirectSoundCaptureBuffer
Public dscd As DSCBUFFERDESC
Public CaptureWave As WAVEFORMATEX
Public capCURS As DSCURSORS
Public ByteBuffer() As Byte
Public buffer1(Buf_Size) As Byte
Public cCaps As DSCCAPS
Public gfPlay As Boolean
Public dsb_Ready As Boolean
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -