用VB怎样每行打出固定个数的字符

Option Explicit

Private Sub Command1_Click()
Dim A As String * 10 '楼主将"10"改为你要的长度.
'###测试用(开始)
Dim I As Integer
For I = 0 To 10
A = "jk" '楼主将jk改成你要赋值的值
Print A
Next
'###测试用(结束)
End Sub

不知道您的"字符"有什么要求,您看这个行不行?不行请补充您的描述,说说字符都是些什么数据.

用个循环输出啊
比如一个数组a(60)在text1输出,10个字符换一行
定义一个a来代替text1
加个if i mod 10 = 0 then a & chr (10) & chr(13)