Breadcrumbs

[jtlusco]

I have 5 Functions setup and I want to randomize what one is triggered when any key is pressed on a keyboard.
Any assistance would be appreciated.

[CodenStuff]

A simple random with a select may do the job.

On your keydown or keypress event (whatever you're using) do something like:

Code: Select all

        Dim r As New Random
        Select Case r.Next(0, 5)
            Case 0
                function1
            Case 1
                function2
            Case 2
                function3
            Case 3
                function4
            Case 4
                function5
        End Select

[jtlusco]

Thanks I forgot all about using a case statement. Now I just need to get the background music to keep playing when the other sounds play.
Other then that this works great. It is an application that I am making for my 11 month old so he can smack the keyboard on an old netbook and have fun with animals popping up and making sounds.

So if anyone knows how to get the sound to work correctly I would love an answer as I have been unable to find an answer.