各位大侠,帮帮忙 label.ToolTipText的字体可以变大不?
程序代码:
FOR i =1 TO 32 j=TRANSFORM(i) b=THISform.label&j..caption a=chrtran(b,'0123456789.','') d=chrtran(a,'abcdefghijklmnopqrstuvwxyz.','') C=ALLTRIM(d) SELECT 单词 FROM aq WHERE 汉意=C INTO ARRAY go thisform.label&j..ToolTipText=go(1) thisform.Refresh endfor