VB怎样用mmcontrol录音 代码和说明

Multimedia MCI 控件管理媒体控制接口 (MCI) 设备上的多媒体文件的记录与回放。从概念上说，这种控件就是一组按钮，它被用来向诸如声卡、MIDI 序列发生器、CD-ROM 驱动器、视频 CD 播放器和视频磁带记录器及播放器等设备发出 MCI 命令。MCI 控件还支持 Windows (*.avi) 视频文件的回放。

在设计时，将 Multimedia MCI 控件加到一个窗体上.

按钮被分别定义为 Prev、 Next、 Play、 Pause、 Back、 Step、 Stop、 Record 和 Eject。

说明

在允许用户从 Multimedia MCI 控件选取按钮之前，应用程序必须先将 MCI 设备打开，并在 Multimedia MCI 控件上启用适当的按钮。在 Visual Basic 中，应将 MCI Open 命令放到 Form_Load 事件中。

在使用 Multimedia MCI 控件记录音频信号之前，应打开一个新的文件。这样就可以保证记录声音的数据文件格式与系统记录格式完全兼容。在关闭 MCI 设备之前，还应该发出 MCI Save 命令，把记录的数据保存到文件中去。伍游

Multimedia MCI 控件可以通过多种方法编程：

在运行时，控件可以是可见的或不可见的。

可以增加或完全重新定义控件中按钮的功能。

可以在一个窗体中控制多台设备。

如果想使用 Multimedia MCI 控件中的按钮，要将 Visible 和 Enabled 属性设置为 True。如果不想使用控件中的按钮，而只是想用 Multimedia MCI 控件的多媒体功能，可将 Visible 和 Enabled 属性设置为 False。无论有没有用户交互，应用程序均可控制 MCI 设备。

Multimedia MCI 控件的事件（按钮定义）是可编程的。通过开发按钮事件代码，可以增加甚至完全重新定义按钮的功能。

MCI 能在单个窗体中支持多个 Multimedia MCI 控件实例，这样就可以同时控制多台 MCI 设备。每台设备需要一个控件。

发行注意 在创建和发布使用 Multimedia MCI 控件的应用程序时，应该在用户的 Microsoft Windows System 或 System32 目录中安装并注册相应的文件。Visual Basic 的Package and Deployment向导提供了一些工具，可以帮您编写安装程序，以正确安装。

Visual Basic 示例

下面的示例演示了打开一台使用兼容数据茄首文件的 MCI 设备的过程。将这些代码放到 Form_Load 过程，应用程序就腔纳销可以使用 Multimedia MCI 控件来对文件 Gong.wav 进行 播放、记录和倒带。在试运行这个示例之前，首先应创建一个包含 Multimedia MCI 控件的窗体。

Private Sub Form_Load ()

' Set properties needed by MCI to open.

MMControl1.Notify = FALSE

MMControl1.Wait = TRUE

MMControl1.Shareable = FALSE

MMControl1.DeviceType = "WaveAudio"

MMControl1.FileName = "C:\WINDOWS\MMDATA\GONG.WAV"

'打开 MCI WaveAudio 设备。

MMControl1.Command = "Open"

End Sub

为了正确管理多媒体资源，在退出应用程序之前，应该关闭那些已经打开的 MCI 设备。将下面的语句放到 Form_Unload 过程，那么在退出包含 Multimedia MCI 控件的窗体之前，就可以关闭那些已经打开的 MCI 设备。

Private Sub Form_Unload (Cancel As Integer)

MMControl1.Command = "Close"

End Sub

还有,鼠标右键点这个控件,选属性,可以把里面的按钮的"有效"都打上勾,就能按了

mci 控件有录音的功能的。用mci *** 作的api也宴颤行。

以前见过用 waveinwaveout 等底层音频api函数晌迹败做的例子。

可以去找一下。

DirectSound可以录音，不过不知道vb中能不能调用。

如果要求不高州庆的话，用第一第二中方法就可以了。

提供各思路吧：

首先必弯数须实现录音功能，不管有没有声音都录音

声控部分：在内存中开个缓冲区，纪录很短时间比如说5秒的声音数据，如果这5s声音的电平值小于某个临界值，则认为没有声音，不予存盘，同时清空缓冲存放下5s的声音，如果大于临界，则认为需要录音，数据存盘伏闹咐，晴空缓冲存放下5s

临界根据环境噪音情况可以自己设缺纯定

---