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 many types of API functions are available in VB?

1882


Where can I get good up-to-date information about VB?

907


What are the properties of datacontrol?

1518


What is ado data control in vb6 0?

617


What are the tools in visual basic?

504






How do I create controls dynamically (at run-time)?

955


Can any one please suggest which institute is providing Advance Excel & VBA Macros in Excel training in Hyderabad.

1732


Parts of ODBC?

1451


Explain about Caturing Baseline.

622


How do I tell when an application executed using the SHELL command is finished?

1087


what are the Parts of ODBC?

1407


How would you create properties by using class Builder Wizard?

1481


___ is the control used to call a windows application.

1071


What is meant by Establish Connection in RDO?

1830


Explain Types of DBCombo boxes?

592