Ã?rnek olarak, aşağıdakileri UserForm'a yerleştirin ve TextBox1 nesnesi ekleyin.
Form'u çalıştırın ve TextBox'a bir şeyler yazın ...
Ses dosyası C:\Program Files\Messenger\Type.wav bilgisayarınızda varsa, çalışır.
Kod:
Private Declare Function sndPlaySound32 Lib "winmm.dll" _
Alias "sndPlaySoundA" (ByVal lpszSoundName As String, _
ByVal uFlags As Long) As Long
Private Sub TextBox1_KeyPress(ByVal KeyAscii As MSForms.ReturnInteger)
Call sndPlaySound32("C:\Program Files\Messenger\Type.wav", 1)
End Sub
Sizlere daha iyi bir deneyim sunabilmek icin sitemizde çerez konumlandırmaktayız, web sitemizi kullanmaya devam ettiğinizde çerezler ile toplanan kişisel verileriniz Veri Politikamız / Bilgilendirmelerimizde belirtilen amaçlar ve yöntemlerle mevzuatına uygun olarak kullanılacaktır.