Foxtable(狐表)用户栏目专家坐堂 → 求助:相隔固定位置插入字符


  共有2121人关注过本帖树形打印复制链接

主题:求助:相隔固定位置插入字符

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


加好友 发短信
等级:小狐 帖子:343 积分:3933 威望:0 精华:0 注册:2018/4/6 18:02:00
求助:相隔固定位置插入字符  发帖心情 Post By:2021/9/14 13:53:00 [显示全部帖子]

各位老师:

我想在下面的代码中实现:在字符串中,每隔25个字符插入一个换行符:

 

Dim s As String = e.Form.Controls("TextBox11").text
If s.Length > 25 And s.Chars(25) = Chr(10) Then
Else
  For bc As Integer = 25 To s.Length   Step 25  '换行符
      e.Form.Controls("TextBox11").text = s.Insert(bc,Chr(10))
  Next
End If

 

但代码只是在最后一个符合节点的位置上插入了换行符,代码那里有问题,请指教!

谢谢!


 回到顶部
帅哥哟,离线,有人找我吗?
cxmxjwlmq
  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:小狐 帖子:343 积分:3933 威望:0 精华:0 注册:2018/4/6 18:02:00
  发帖心情 Post By:2021/9/14 17:30:00 [显示全部帖子]

谢谢老师,完美解决!

再次感谢!


 回到顶部