";strContent=strContentsubstr(intLen,strContentlength);}strTemp+= strContent;objinnerHTML=strTemp;}调用时如下写法:这里是要应用换行的内容toBreakWord(60, "content");设置的字符为60要用<br> 就要一定设置这个属性 txtmultiline=true;
也许还要设置 wordWrap = true
“\n” 不受此限制
正确使用TextFieldhtmlText的做法
TextField可以支持一些HTML Tag,例如:
infohtmlText = "<b>Bold</b>, <i>italic</i>, <u>underline</u>";
结果:
Bold, italic, underline
但是,当利用htmlText逐步加入字段,就会自动出现换行的问题,例如:
infohtmlText = "<b>Bold</b>";
infohtmlText += ", <i>italic</i>";
infohtmlText += ", <u>underline</u>";
结果:
Bold
, italic
, underline
只要trace看看:
trace(infohtmlText);
原来Flash Player自行加了<p>:
<TEXTFORMAT LEADING="3"><P ALIGN="LEFT"><FONT FACE="Arial" SIZE="14" COLOR="#000000"><B>Bold</B></FONT></P></TEXTFORMAT> <TEXTFORMAT LEADING="3"><P ALIGN="LEFT"><FONT FACE="Arial" SIZE="14" COLOR="#000000">, <I>italic</I></FONT></P></TEXTFORMAT> <TEXTFORMAT LEADING="3"><P ALIGN="LEFT"><FONT FACE="Arial" SIZE="14" COLOR="#000000">, <U>underline</U></FONT></P></TEXTFORMAT>
因此,正确利用htmlText逐步加入字段的做法,是应该先将字段放在一个Variable里,最後传到htmlText中:
var tmpTxt = "<b>Bold</b>";
tmpTxt += ", <i>italic</i>";
tmpTxt += ", <u>underline</u>";
infohtmlText = tmpTxt;Text1的MultiLine属性 设为True
Private Sub Command1_Click()
For i = 1 To 10
a = InputBox("输入数字") '输入10个数字
Text1Text = Text1Text & a & vbCrLf
Next i
End Sub
欢迎分享,转载请注明来源:内存溢出
评论列表(0条)