How would you activate animation control?

Answer Posted / cherran

First Download the Genie.acs (Microsoft Animation Character)
from MSDN. Create one VB std.Exe app. with one button and a
textbox then paste the following code, now your app. will
speek what you typed in textbox. Note: you have to install
Speach Enginee before this.

Genie.Play "Write", "read" will animate the Character.

Dim Genie As IAgentCtlCharacterEx
Const DATAPATH = "genie.acs"


Private Sub Form_Load()
Agent1.Characters.Load "Genie", DATAPATH
Set Genie = Agent1.Characters("Genie")
Genie.LanguageID = &H409
TextBox.Text = "Hello World!"
End Sub

Private Sub Button_Click()
Genie.Show
Genie.Speak TextBox.Text
Genie.Play "Write"
Genie.Play "Read"
Genie.Hide
End Sub

Is This Answer Correct ?    1 Yes 0 No



Post New Answer       View All Answers


Please Help Members By Posting Answers For Below Questions

How do I make an animated icon for my program?

947


Difference between ActiveX Exe and Dll.

1476


What are the important components of OLEDB?

2412


How to control the file?

617


What are the Differenct Types of Instancing Property in ActiveX Dll and Exe?

1627






How would you find out the value property in Slider Bar Control?

1437


Can you create a updatecascade, Deletecascade relation in Ms- Access? If no, give on eample.

1076


Is it possible to call oracle database through ADO control or Object?

1376


what are the Types of LockEdits in RDO?

1556


What is ado data control in vb?

533


How can you Navigate from the DHTML application to another DHTML application? .

1367


How do I play MID, WAV or other multimedia files?

1047


What is ActiveX Control?

1763


Explain OLE Drag and Drop.

1504


What is constructors and distructors.

1661