投稿者 ベース  (学生) 投稿日時 2014/9/27 15:36:03
WAVEIFコントロールを使った。マイク入力とギターを接続して使うギターとベースのチューナーを作成したいと思っているのですが、マイク入力の音をスピーカーから出す方法がわかりません。よろしくお願いします。
waveout.openを入れてから、スピーカー出力を開くことはできました。
Public Class Form1
    Dim Buffer() As Byte   ' 録音されたデータを受け取るためのバッファ
    Dim fileRec As Integer ' 録音されたデータを保存する一時ファイルのファイル番号
    Dim strRecFileName As String  ' 一時ファイルのファイル名
    Dim WaveSize As Long   ' 録音されたデータのサイズ

    Private Property DataSet As Long





    Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles cmdRec.Click
        TextBox1.Text = "wavein"
        WaveIn.Open()
        WaveIn.Start()
   WaveOut.Open()
End Sub

    
   


    



   

   

    

End Class