以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  关于文本的代码，请教  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=145309)
--  作者：hongye
--  发布时间：2020/1/15 17:17:00
--  关于文本的代码，请教
比如我有一个文本文件，在Label中显示
我想先检查该文本的字符串长度，如果该文本大于36个字节，那么每36个字节换行
请问这个代码怎么写？
--  作者：有点蓝
--  发布时间：2020/1/15 17:26:00
--  
Dim s As String = "我想先检查该文本的字符串长度,如果该文本大于36个字节,那么每36个字节换行我想先检查该文本的字符串长度,如果该文本大于36个字节,那么每36个字节换行"

Dim sbu As new StringBuilder
Do While s.Length> 36
    sbu.AppendLine(s.SubString(0,36))
    s = s.SubString(36)
Loop
sbu.Append(s)
Output.Show(sbu.ToString)