音声合成でHello, world!
Posted feedbacks - VB.net
Microsoft Agent を使ってます。 AxAgent1がAgentコンポーネントオブジェクトです。 Visual Studioでの操作は、Windowsアプリケーションを作り COMコンポーネントの追加で Microsoft Agent Control 2.0を選択、 そしてFormにコンポーネントを貼り付けというふうになります。 ' .NET Frameworkにも音声合成用の抽象クラスだけはあるのね。
see: Microsoft Agent
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 | Private Sub MainForm_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
AxAgent1.Connected = True
AxAgent1.Characters.Load("A")
End Sub
Private Sub MainForm_FormClosed(ByVal sender As Object, ByVal e As System.Windows.Forms.FormClosedEventArgs) Handles Me.FormClosed
AxAgent1.Characters.Unload("A")
AxAgent1.Connected = False
End Sub
Sub Say(ByVal message As String)
Dim chr As AgentObjects.IAgentCtlCharacter = AxAgent1.Characters("A")
chr.Show()
chr.Speak(message)
End Sub
|
にしお
#3415()
Rating4/4=1.00
使用したライブラリはタグでつけてください。またOSに依存する場合もタグでつけてください。日本語文字列も発音できることが好ましいですが、必須ではありません。
以下はサンプルです。
>>> say("Hello, world!") >>> say("con nitch were") # 「こんにちは」 >>> say("daw cat coo org, sole what program mar know tum yen know Colosseum death")[ reply ]