hi, and welcome to VBWORLD
to accomplish what you need, you will have to add a MS Agent Control to your program.
then put this code in the declerations:
Code:
Dim al As IAgentCtlCharacterEx
Const DATAPATH = "clippit.acs"
and this on the form load event:
Code:
Agent1.Characters.Load "clippit", DATAPATH
Set al = Agent1.Characters("clippit")
al.LanguageID = &H409
now add 1 text box and a button to the form
code for button:
Code:
clippit.Show
clippit.Speak Text1.Text
now run your program, and if you have ms office installed the clip will appear and say what's in the text box when you click the button