- Wsh.sleep 1*1000
- strAgentName = "Merlin"
- strAgentPath = "c:\windows\msagent\chars\" & strAgentName & ".acs"
- ScriptComplete=0
-
- Set objAgent = WScript.CreateObject("Agent.Control.2","agent_")
- objAgent.Connected = True
- objAgent.Characters.Load strAgentName, strAgentPath
- objCharacter.MoveTo 100, 700
- objCharacter.Show
- With bln
- .backcolor=RGB(255,0,0)
- .fontsize=20
- .forecolor=vbRed
- .fontname="华文楷体"
- .visible=False
- .style=3
- .fontunderline=True
- .numberoflines=10
- End With
- wsh.sleep 1000
- objcharacter.speak "测试123!"
复制代码 为什么不能设置balloon对象的backcolor和forecolor,这里老是提示参数设置错误。
而且balloon其他一些布尔型的属性数据也不能设置,如fontbold,fontunderline。各位大侠能否帮忙看看,到底怎么回事?谢谢! |