Easy PlaySound Function

[Darkhaos]

I made this function for my bot, i share this with you guys.

This functions Speak what you write (So with this, i don't need a PlayerAttack alarm or something.)

Function PlaySound(ByVal text As String)
	If text Is Nothing Then
		Exit Function
	End If
	Dim speaker = CreateObject("sapi.spvoice")
	speaker.Speak(text)
End Function

How to use?

PlaySound("player attack")

[Blaster_89]

Why not just use a SpeechSynthesizer object?

[Veritias]

I remember back in the old days programming VB6. I made myself a homemade alarmclock. Those were the days..