Private Sub Form_Load()
MMControl1.FileName = "C:\0.wav"
MMControl1.Command = "open"
MMControl1.Command = "prev"
MMControl1.Command = "record"
Timer1.Enabled = True
End Sub

Private Sub Timer1_Timer()
Timer1.Enabled = False
MMControl1.Command = "stop"
MMControl1.Command = "save"
MMControl1.Command = "prev"
MMControl1.FileName = "C:\1.wav" 'контрол не хочет открывать новый файл для записи
MMControl1.Command = "open"
MMControl1.Command = "prev"
MMControl1.Command = "record"
Timer2.Enabled = False
End Sub

Private Sub Timer2_Timer()
Timer2.Enabled = False
MMControl1.Command = "stop"
MMControl1.Command = "save"
MMControl1.Command = "prev"
End Sub