PDA

Archiv verlassen und diese Seite im Standarddesign anzeigen : [VB 2008]- Brauche Hilfe bei Beep töne



Funmappa
30.04.2010, 14:36
Hallo fhler,

wenn man den pc hochfährt kommt ja immer ein beepton und ich möchte jetzt mit vb was schreiben dass ich auch frequezen und so einstellen kann... aber nicht, dass ein beepen übers headset/boxen kommt, sondern so wie beim hochfahren halt..
kann mir da jemand helfen?

mfg Funmappa

woppel
30.04.2010, 14:46
Windows XP, Windows Vista oder Windows 7?

Geht meines Wissens nur bei Windows XP, weil Windows Vista und 7 den Beep Sound über die Boxen ausgibt.

Der Befehl währe:

Console.Beep()

Kripther
30.04.2010, 15:05
Das ist mal sowas von einfach zu prgrammieren :D

Funmappa
30.04.2010, 15:19
1. hab xp
2. ich weiß dass es einfach is deswegen hab ich oben geschrieben dass ich des programm schreiben und net programmieren will :D aber wie ich des gemacht hatte kam es aus dem headset...

Edit:
3. danke woppel es geht :D kann ich da trotzdem frequenz ändern?

c2x
30.04.2010, 15:24
Crap, hab falsch gelesen:
entweder:

My.Computer.Audio.PlaySystemSound(Media.SystemSoun ds.Asterisk)

oder:

My.Computer.Audio.PlaySystemSound(Media.SystemSoun ds.Beep)

oder:

My.Computer.Audio.PlaySystemSound(Media.SystemSoun ds.Exclamation)

oder:

My.Computer.Audio.PlaySystemSound(Media.SystemSoun ds.Hand)

oder:

My.Computer.Audio.PlaySystemSound(Media.SystemSoun ds.Question)

Richtig:

Declare Function Beep Lib "kernel32.dll" _
(ByVal Frequenz As Long, ByVal Dauer As Long) As Long 'Funktion derklarieren (kernel32.dll wird benötigt)
Die Frequenz wird in Herz angegeben, die Dauer in Milisekunden. (1000 ms = 1 s)

In deiner Button (etc.) Klasse, legst du das Ereignis fest:

Beep(700, 1000)
Frequenz wäre in diesem Fall 700 Hz, Dauer: 1s.

Edit:
bei Console.Beep() kannst du den Frequenzwert und Dauer in der "()" ändern, z.B. Console.Beep(700, 1000)

Aufsteigende Töne z.B.:


Console.Beep(100, 500)
Threading.Thread.Sleep(50)
Console.Beep(200, 500)
Threading.Thread.Sleep(50)
Console.Beep(300, 500)
Threading.Thread.Sleep(50)
Console.Beep(400, 500)
Threading.Thread.Sleep(50)
Console.Beep(500, 500)
Threading.Thread.Sleep(50)
Console.Beep(600, 500)
Threading.Thread.Sleep(50)
Console.Beep(700, 500)
Threading.Thread.Sleep(50)
Console.Beep(800, 500)
Threading.Thread.Sleep(50)
Console.Beep(900, 500)
Threading.Thread.Sleep(50)
Console.Beep(1000, 500)
Threading.Thread.Sleep(50)

Viel Spaß ;)