当你打开Microsoft Word后，画面上就会出现一个Office 助手，看着孙悟空不但会不停地变换角色，而且还会根据情况，出现相应的提示。
角色动画实例（下）
加载阅读文本，也可以直接输入内容
Cfile=Getfile()
Nhandle=Fopen(Cfile)
Hend=Fseek(Nhandle,0,2)
If Hend<=0
Messagebox("文件无法打开！",16,"提示窗口")
Return
Else
=Fseek(Nhandle,0,0)
Cstring=Fread(Nhandle,Hend)
=Fclose(Nhandle)
Endif
Thisform.Txtspeak.Value=Cstring
综合演示
Ochar.Languageid=0x409
With Ochar
.Play("Greet")
.Play("Restpose")
.Speak("Hello!")
.Play("Announce")
.Speak("I Am Merlin.")
.Play("Pleased")
.Speak("It Is Nice To Meet You!")
.Moveto(250,500)
.Speak("Now,Here Is A Magic Trick.")
.Play("Domagic1")
.Play("Domagic2")
.Play("Pleased")
.Play("Restpose")
.Speak("Thank You!")
.Play("Wave")
.Speak("Goodbye")
.Play("Hide")
Endwith
关闭表单
Thisform.Release
综合演示效果
网友评论