专注于互联网--专注于架构

最新标签
网站地图
文章索引
Rss订阅
\'*************测字符串长度************** Function CheckStringLength(txt)txt=trim(txt)x = len(txt)y = 0for ii = 1 to xif asc(mid(txt,ii,1)) < 0 or asc(mid(txt,ii,1)) >255 then \'如果是汉字y = y + 2elsey = y + 1end ifnextCheckStringLength = yEnd Function\'************* 截取字符串 *********** [阅读全文] [PDF]
vb的right函数、left函数提供了从左或从右在已知字符串中截取指定数量的未知字符串的功能,不过要获取某个特定字符前面或者后面的字符串,情形就不一样了,比如我们要在字符串\"e:\\myfavourite\\001\\xxx.xxx\"中截取最后一个\"\\\"后面的字符串亦即文件名,单单用上述几个函数是难以实现的,因为文件名的字节数难以确定。这时函数instrrev就派上用场了。instrrev返回一个字符串在另一个字符串出现的位置,充分利用它可以轻而易举地截取所要的内容。 下面举个实例来加以说明,希望大家可以从中得到启示。本例仅需要一个textbo [阅读全文] [PDF]
1 共2条 分1页