Запись звука из Visual Basic Нашей задачей будет записать звук в пустой WAV файл. Для того, чтобы сделать пустой WAV файл можно воспользоваться стандартной Windows программой – Звукозапись. Необходимо просто зайти в неё и сохранить пустую запись с именем «01» в папку с вашим проектом. После этого откройте Visual Basic. Далее я пронумеровал задания, чтобы было легче делать.
Шаг 1 – Создайте стандартный проект
Шаг 2 – Сделайте три CommandButton’а
Шаг 3 – Щёлкните правой кнопкой мыши на панели ToolBar и в появившемся меню выберите Components…
Шаг 4 – Выберите компонент Microsoft Multimedia Control 6.0 (число 6.0 может быть и другим, оно зависит от версии Visual Basic)
Шаг 5 – Натяните этот объект на форму и придайте его значению Visible=false
Шаг 6 – Дважды щёлкните по форме
Шаг 7 – Введите ниже написанные строки
Code
Private Sub Form_Load()
MMControl1.FileName=app.path & “\01.wav”
MMControl1.Command = "open"
End Sub
Private Sub Command1_Click()
MMControl1.Command = "prev"
MMControl1.Command = "record"
Command2.Enabled = True
End Sub
Private Sub Command2_Click()
MMControl1.Command = "stop"
MMControl1.Command = "save"
MMControl1.Command = "prev"
Command3.Enabled = True
End Sub
Private Sub Command3_Click()
MMControl1.Command = "play"
MMControl1.Command = "prev"
End Sub
Шаг 8 – Задайте свойство Caption CommonButton’ам. Первый - Запись, второй - Стоп, третий - Пуск.
