如何獲得隨機發言

-1

我正在試圖用簡單的程序來演講，並且無法弄清楚如何讓它說隨機的東西。這就是我做的，但它不起作用。我發現谷歌的例子，但只有數字，我不知道如何做到這一點。那麼，如何讓程序隨機發出「你好，你好還是嘿」？如何獲得隨機發言

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

來源

2017-07-03 西奧多

首先向我們展示你有什麼作品，什麼不作用。我建議從代碼中取出隨機功能，直到你能說出_something_然後添加功能爲止。 – TomServo

您在「System.Speech」程序集中沒有使用類的任何特定原因？ –

創建一個字符串數組並隨機調用正在調用的值。

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

來源

2017-07-03 16:39:05

如何獲得隨機發言

回答

相關問題