pape0
Messages postés132Date d'inscriptionmercredi 18 février 2004StatutMembreDernière intervention 1 septembre 2014 10 sept. 2007 à 20:33
Essai cela.
Public
Class Form1
Private
Declare
Function mciSendString
Lib
"winmm.dll"
Alias
"mciSendStringA" (
ByVal lpstrCommand
As
String,
ByVal lpstrReturnString
As
String,
ByVal uReturnLength
As
Integer,
ByVal hwndCallback
As
Integer)
As
Integer
Private
Sub Button1_Click(
ByVal sender
As System.Object,
ByVal e
As System.EventArgs)
Handles Button1.Click
' record from microphonemciSendString(
"open new Type waveaudio Alias recsound", vbNullString, 0, 0)mciSendString(
"record recsound", vbNullString, 0, 0)
End
Sub
Private
Sub Button2_Click(
ByVal sender
As System.Object,
ByVal e
As System.EventArgs)
Handles Button2.Click