[リストへもどる]
一括表示
投稿時間：2004/07/21(Wed) 15:23
投稿者名：pissam
Ｅメール：
ＵＲＬ　：
タイトル：Voice Textを使用可能にするには？
TextToSpeechを使って、文章を読み上げようとしたのですが、
「実行エラー430 クラスはオートメーションまたは予測したインターフェースをサポートしていませ
ん。」
と出てきて実行できません。
何をどうなおしたら使えるようになるのでしょうか？

投稿時間：2004/07/21(Wed) 15:31
投稿者名：花ちゃん
Ｅメール：
ＵＲＬ　：
タイトル：Re: Voice Textを使用可能にするには？
エラー等に関することは、まず、なにをどのようにしているのか？　開発環境等を詳しく書かないと
誰も適切な判断はできないと思いますよ！

この掲示板のNo.9564からの一連のスレッドはお読みになられたのですか？

投稿時間：2004/07/21(Wed) 16:35
投稿者名：pissam
Ｅメール：
ＵＲＬ　：
タイトル：Re^2: Voice Textを使用可能にするには？
> エラー等に関することは、まず、なにをどのようにしているのか？　開発環境等を詳しく書かないと
> 誰も適切な判断はできないと思いますよ！
WindowsXP、VB6.0です。
ソースは
Private Sub Command1_Click()
    TextToSpeech1.Speak (Text1.Text)
End Sub
です。
ソースには間違いはないはずなんですが…

> この掲示板のNo.9564からの一連のスレッドはお読みになられたのですか？
一応読んだんですが、ダウンロードその他を試してみてもだめでした…

投稿時間：2004/07/21(Wed) 18:27
投稿者名：花ちゃん
Ｅメール：
ＵＲＬ　：
タイトル：Re^3: Voice Textを使用可能にするには？
１．TextToSpeech1 コントロールをFormに貼り付けていますか？
２．C:\WINDOWS\speech フォルダーはありますか？
３．CreateObject("Excel.Application").Speech.Speak Text1.Text　これもだめですか？
４．コントロールパネルの音声認識で LH Naokoの声をコンピュータの規定の声に選択しました。を
読み上げできますか？
５．下記でもだめですか？
    Dim Voic As Object
    Set Voic = CreateObject("SAPI.SpVoice")
    Voic.Speak Text1.Text
    Set Voic = Nothing

投稿時間：2004/07/21(Wed) 19:19
投稿者名：pissam
Ｅメール：
ＵＲＬ　：
タイトル：Re^4: Voice Textを使用可能にするには？
ありがとうございました！
１、２、４は確認済でしたが３、５は試していませんでした。
（Excel2002が入っていないため）
反応速度が遅くなってしまうようですが、とりあえず解決です。
本当にありがとうございました。

投稿時間：2004/07/21(Wed) 19:36
投稿者名：花ちゃん
Ｅメール：
ＵＲＬ　：
タイトル：Re^5: Voice Textを使用可能にするには？
> 反応速度が遅くなってしまうようですが、とりあえず解決です。

エラーの原因は何だったのでしょうか？

投稿時間：2004/07/21(Wed) 19:40
投稿者名：pissam
Ｅメール：
ＵＲＬ　：
タイトル：Re^6: Voice Textを使用可能にするには？
> エラーの原因は何だったのでしょうか？
よく分かりません。VText.dllも入っていますし、何の問題もないと思うんですが…

投稿時間：2004/07/21(Wed) 20:19
投稿者名：花ちゃん
Ｅメール：
ＵＲＬ　：
タイトル：Re^7:VoiceTextを使用可能に
> > エラーの原因は何だったのでしょうか？
> よく分かりません。VText.dllも入っていますし、何の問題もないと思うんですが…

音声読み上げができるようになったのですよね。
知らない内に直ったという事ですか？

投稿時間：2004/07/21(Wed) 20:49
投稿者名：pissam
Ｅメール：
ＵＲＬ　：
タイトル：Re^8:VoiceTextを使用可能に
> 音声読み上げができるようになったのですよね。
> 知らない内に直ったという事ですか？
そうみたいです。