moin moin ich wollte gern wissen wie man den lautstärke pegel anzeigen lassen kann
mein code zeigt glauge ich mikrofon pegel an
code:
was muss ich tun um den Lautstärke pegel des systems anzeigen zu lassen
mein code zeigt glauge ich mikrofon pegel an
code:
VB.NET-Quellcode
- Public Class Form1
- Private Declare Function mciSendString Lib "winmm.dll" Alias "mciSendStringA" (ByVal Command As String, Optional ByVal ReturnString As String = "", Optional ByVal ReturnLength As Integer = 0, Optional ByVal Callback As Integer = 0) As Integer
- Dim rs As String
- Dim SoundLevel, Mode As New String(" ", 20)
- Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
- Call mciSendString("Open New Type waveaudio Alias MySound", rs, 128, 0)
- Call mciSendString("record MySound", rs, 200, 0)
- Call mciSendString("Stop MySound", 200, 0)
- End Sub
- Private Sub Timer1_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Timer1.Tick
- Dim cb As Integer = 0
- Call mciSendString("status MySound level", SoundLevel, 20, cb)
- Label1.Text = Val(SoundLevel)
- ProgressBar1.Value = Val(SoundLevel)
- End Sub
- End Class
was muss ich tun um den Lautstärke pegel des systems anzeigen zu lassen