Speech (XVoice) Help?

Hi, I'm trying to figure something out. I'm working with a Text to Speech engine, made by Microsoft, and I'm trying to change the voice, but whenever I try to, I get a error along the lines of:

430: Class does not support Automation or does not support expected interface.

Anyway, also, how do I change the pitch/speed/etc?

I can't find any good doc's on it.

Thanks.

Can you post the code you are having trouble with? Its hard for us to help you debug something we havnt seen

For now, I'll just make a test app.

I'm trying to get a female voice into my application. Sortof like the star trek computer :)

Private Sub Command1_Click()
tts.Speak Text1.Text
End Sub

Private Sub Form_Load()
lst.Clear 'Lst is a ListBox


Dim i As Integer
For i = 0 To tts.CountEngines
lst.AddItem tts.ModeName(i)
Next i
End Sub

Private Sub lst_Click()
tts.Select lst.ListIndex
End Sub


I think I might be doing something wrong :P

Which line are you getting the error on and what are your variables declared as?

tts.Select lst.ListIndex

430.

There are no vars, but...
lst = Listbox
tts = XVoice object
Text1 = textbox
Command1 = commandbutton

bump :P