Class SystemSounds
Public
	Static Function Asterisk() As SystemSound
		Dim ret As SystemSound(SND_ALIAS_SYSTEMASTERISK)
		Return ret
	End Function
	Static Function Beep() As SystemSound
		Dim ret As SystemSound(SND_ALIAS_SYSTEMDEFAULT)
		Return ret
	End Function
	Static Function Exclamation() As SystemSound
		Dim ret As SystemSound(SND_ALIAS_SYSTEMEXCLAMATION)
		Return ret
	End Function
	Static Function Hand() As SystemSound
		Dim ret As SystemSound(SND_ALIAS_SYSTEMHAND)
		Return ret
	End Function
	Static Function Question() As SystemSound
		Dim ret As SystemSound(SND_ALIAS_SYSTEMQUESTION)
		Return ret
	End Function

	Override Function ToString() As String
		Return "SystemSounds"
	End Function
End Class