介紹ms agent控件在vb.net中的應用.
作者:黑鷹*plblackeagle
在多年以前,當我第一次使用office97時我就喜歡上了office的助手,它給人一種全新的感覺,我一直想設計一個哪樣的程序.用了agent控件,它在也不是什么困難的事了.現在，我們只要使用microsoft agent（基于com），我們就可以在自己的程序中使用這種精靈來給程序增光添彩。用這種精靈，我們可以實現語音的朗讀、表演動畫甚至還可以實現語音識別呢！
二 要求
（1）微軟公司視窗2000服務器版或視窗 xp 版
（2）.net framewrok sdk beta 2版
（3）microsoft agent核心組建
（4）microsoft agent的精靈：吉尼（genie）、么林（merlin）、羅比（robby）和皮蒂（peedy)
如果你的系統裝有office2000或officexp,也可使用它的精靈文件,文件后輟為.acs
（5）至少有一個英語的text-to-speech引擎（現在還找不到中文的）
（6）微軟運行時發音api4.0a
5),6)項沒有你可安裝<金山詞霸>,它里面裝有英語的text-to-speech引擎和發音api4.0a
選擇菜單：工具-自定義工具箱-com組件,并選擇microsoft agent control 2.0 按確定,它會添加到你的工具箱中.
將microsoft agent control控件添加到窗體上
ok,現在開始!!!
public agent as agentobjects.iagentctlcharacterex
private sub form1_load(byval sender as system.object, byval e as system.eventargs) handles mybase.load
axagent1.characters.load("pl", "g:/data/myvbfile/agent1/genie.acs")
'從文件中裝載精靈
agent = axagent1.characters("pl")
agent.languageid = &h409
'設置語言為英文,只有這樣它才可以說英文.
agent.balloon.fontname = me.font.name
'設置氣泡的字體,你還可以設置氣泡的字體大小,顏色等.
agent.show()
agent.play("wave")
agent.speak("hello,sir.")'說英文
agent.moveto(400,200)'讓精靈移動到指定位置
agent.play("restpose")
end sub
