if ls_keyword="抬额头标准表情" then
li_raise_forhead=integer(strValue)
if (ole_emrpad.object.FindField("T-FGS",-1,1,true)) then
ls_aaa=this.object.GetFieldText("-1", "-1", "-1", "-1", FALSE)
//把计算的结果赋值给结果元素
ls_bbb=string(integer(ls_aaa)+integer(strValue))
messagebox("",ls_bbb)
ole_emrpad.object.SetFieldText(-1,-1,-1,-1,ls_bbb)
end if
end if
if ls_keyword="轻闭眼标准表情" then
li_close_eyes=integer(strValue)
if (ole_emrpad.object.FindField("T-FGS",-1,1,true)) then
ls_aaa=this.object.GetFieldText("-1", "-1", "-1", "-1", FALSE)
//把计算的结果赋值给结果元素
ls_bbb=string(integer(ls_aaa)+integer(strValue))
messagebox("",ls_bbb)
ole_emrpad.object.SetFieldText(-1,-1,-1,-1,ls_bbb)
end if
end if
========================================================================
代码是这样的,刚才发的图好像没上来呀