 |
|
|
 首页 |
名片设计 CorelDRAW Illustrator AuotoCAD Painter 其他软件 Photoshop Fireworks Flash |
|
rem 显示左边的n个字符(自动识别汉字) Function LeftTrue(str,n) If len(str)<=n/2 Then LeftTrue=str Else Dim TStr Dim l,t,c Dim i l=len(str) t=l TStr="" t=0 for i=1 to l c=asc(mid(str,i,1)) If c<0 then c=c+65536 If c>255 then t=t+2 Else t=t+1 End If If t>n Then exit for TStr=TStr&(mid(str,i,1)) next LeftTrue = TStr End If End Function 返回类别: 教程 上一教程: 聊天室实现私聊(四) 下一教程: 经典实用的基础ASP代码整理 您可以阅读与"显示左边的N个字符(自动识别汉字)函数"相关的教程: · 显示左边的n个字符函数（自动识别汉字） · 显示左边的N个字符函数(自动识别汉字) · 用正则表达式突出显示字符串中查询到的单词的函数 · 两个控制显示格式的函数(自动换行、自动省略) · ASP实现网址的自动识别 |
  |
| 快精灵印艺坊 版权所有 |
首页 会员中心在线印刷在线编辑付款方式索取样品设计指南连锁门店
|
||
