Foxtable(狐表)用户栏目专家坐堂 → 格式化账号型字符


  共有24672人关注过本帖平板打印复制链接

主题:格式化账号型字符

帅哥哟,离线,有人找我吗?
程兴刚
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信 一级勋章
等级:超级版主 帖子:7235 积分:40550 威望:0 精华:16 注册:2008/8/31 23:23:00
  发帖心情 Post By:2011/5/10 9:07:00 [只看该作者]

27楼已经满足绝大多数人的使用,但字符串长度过长的时候,会导致最后一段字符串超过指定个数不能分割,再修改一下,确保字符型列255个字符串都能完全分割,个中缘由望大家来思考,不为别的,只求多一种思路和技巧:

 

If e.Col.Name = "账号"
    Dim s As String = "," & e.Text
    For i As Integer = 1 To (len(s)\5+(len(s)\5)\5+((len(s)\5)\5)\5)
        s = s.Insert(i*5," ")
    Next
    e.Text = s.Replace(",","")
End If

 

原理和27楼一样

[此贴子已经被作者于2011-5-10 9:08:16编辑过]

 回到顶部
总数 60 1 2 3 4 5 6 下一页