ランダム音声を取得する方法

Question

私はスピーチで簡単なプログラムを作ろうとしており、ランダムなことを言う方法を理解できません。それは私がしたことですが、それは動作しません。私はGoogleの例で見つかったが、数字だけと私はそれを行う方法がわからない。ですから、プログラムをランダムに "Hello、Hi or Hey"と発音させる方法は？

If e.KeyCode = Keys.Enter Then 
     Dim SAPI 
     Dim r As Random = New Random 
     SAPI = CreateObject("SAPI.spvoice") 
     SAPI.Speak(r.Next("Hello", "Hi", "Hey")) 
    End If 

Answer 1

呼び出されている値をランダム化します。

Dim speech() As String = {"Hello", "Hi", "Howdy"} 

If e.KeyCode = Keys.Enter Then 
    Dim SAPI 
    Dim r As Random = New Random 
    SAPI = CreateObject("SAPI.spvoice") 
    SAPI.Speak(speech(r.Next(0, speech.Length))) 
End If