Visual Basic 6.0
windows API函数
一、打开录音设备waveinopen（）函数注意，调用之前要填写好wav头信息（包含采样率、采样位数等）；还要定义好回调函数等，回调函数的解释后面讲。
二、准备好录音缓存空间waveinprepareheader（）函数 这一步为了准备好将要送入录音设备的缓存，以便之后可以供之使用。一般至少需要准备两块缓存。因为录音不能间断，当一块填满时没有时间等待你去送入下一块缓存，所以必须提前就准备好。
三、将缓存送入录音设备waveinaddbuffer（）函数将缓存送入录音设备，供之存入已录下的音频。开始录音时，应至少送入两块不同的缓存，即调用两次这个函数。之后为了不致录音产生间断，应保证至少有一块缓存在录音时为空，以备衔接。
四、开始录音waveinstart（）函数 当以上的工作都准备好时，便可调用此函数开始录音了。一旦调用，录音设备便立即录音并存入已经送来的缓存块内，当被送来的有多个缓存块时，按照FIFO的原则向缓存块内存入录音数据。此函数执行之后可以执行一个while（）循环，来等待录音设备录音。为了减少cpu使用率，可以在循环中加人sleepex（x，TRUE），x单位ms，TRUE必须要有。
每个缓冲块存满时，会产生一个回调信号，并调用回调函数（或回调窗口等，具体定义在waveinopen函数内，这里只讲回调函数的情况）；回调信号自动被回调函数接收，回调函数根据回调信号来执行各种相应的操作。回调函数执行完后，程序跳回到原来执行位置继续执行。回调函数的具体如下：回调信号一般有三个，对应着三种回调函数被调用的情况：1、 WIM_OPEN当执行waveinopen（）函数时，会调用回调函数，并产生这个回调信号。代表录音设备已经打开。在这次回调函数的调用中，可以自己设定一些操作，也可以没有操作。 2、 WIM_DATA当每块缓存块填满时，产生这个回调信号，并调用回调函数。在这次调用中，回调函数应当完成这样的工作，以便录音连续进行： 将存满的缓存块处理，例如存入文件，或送入其他设备； 向录音设备送入新的缓存块；录音设备任何时刻应当拥有不少于2个的缓存块，以保证录音不间断性。3、 WIM_CLOSE当调用waveinclose函数时，会产生这个回调信号，代表录音设备关闭成功。这次回调函数调用中，可以执行相应的一些关闭文件保存信息等等的操作，自定义
五、停止录音，关闭设备waveinstop（）停止录音waveinreset（）复位waveinclose（）关闭设备 依次调用这些函数，来结束录音。
注意在代码开头要包含windows.h和mmsystem.h两个头文件，还要加人库winmm.lib，用#pragma comment(lib,”winmm.lib”)即可。
注意每一步要完成的工作，一旦没有按顺序执行或者没有把每步应当完成的工作做完，录音是不能够启动的