请教各位高手！怎么样控制单元格里文字的个数？？？？？ 150分重奖！

wzq8848 2001-12-03 05:53:09

...全文

168 15 打赏收藏转发到动态举报

写回复

用AI写文章

15 条回复

切换为时间正序

请发表友善的回复…

发表回复

wzq8848 2001-12-04

打赏
举报

lanying(蓝鹰):
我想控制单元格（td）内写入字符的数量...........

julyclyde 2001-12-03

打赏
举报

现在的中文和英文占据的空间一样吧？

lanying 2001-12-03

打赏
举报

你到底什么意思,说清楚协

wzq8848 2001-12-03

打赏
举报

在加100分！

wzq8848 2001-12-03

打赏
举报

flyingghost(游魂)：
你那段程序怎么控制长度？？

i_need_mana 2001-12-03

打赏
举报

用maxlength
<input type="text" name="t1" size="10" maxlength="15">

flyingghost 2001-12-03

打赏
举报

对字串取长度，截取，然后写到单元格里。
字串注意中文字符。
Function FormatStr(String)
on Error resume next
String= "  " + String
String=Replace(String,CHR(32)," ")
String = Replace(String, CHR(13), "")
String = Replace(String, CHR(10) & CHR(10), "</P><P>  ")
String = Replace(String, CHR(10), "<BR>  ")
FormatStr = String
End Function

截取同理，注意不要把中文字符截成两半。
写进去就不用说了吧？^_^

wzq8848 2001-12-03

打赏
举报

zcflion(土匪):你好！
能给个例子么？

zcflion 2001-12-03

打赏
举报

取子串啊MID（string,begin,count），然后把取到的子串write出来就行了

wzq8848 2001-12-03

打赏
举报

jhysky(尘土御风)：
我说的是单元格阿 td.....

jhysky 2001-12-03

打赏
举报

中文的个数是英文的二倍，如果文本框中能输入四个汉字，则可输入8个英文字母。
如果是单行文本框可以有两种约束方法：一、限制文本框的输入长度，可以在客户端进行限制在文框的属性中加入maxlength="4"；二、用len函数截取如：
Dim sStr
sStr=Request.form("text1") 'text1为表单文本输入框的name
If len(sStr)>100 Then
sStr=left(sStr,100)&"…" '截取前100个字符
End If

longj 2001-12-03