怎么给text1.text 限制第一行输入9个字符串。然后进行换行
输入。

必须运用一个文本控件完成就行了，好心的朋友帮下忙啊！

Dim lint As Long

Private Sub Text1_Change()
lint = Len(Text1.Text)

If lint = 9 Then
Text1.Width = 等于输入9个字符所需的长度 (900)
End If
End Sub
'把文本的multiline的属性改为true
方法较烂...但是达到了你要的结果

如果非要换行，那就把把文本框的multiline的属性改为true，滚动条显示垂直的，
然后：
在9个字符（或需要换行的地方），插入一个回车符即可。

晕 有点难度!控制字符!啧啧

[此贴子已经被作者于2007-8-8 9:33:01编辑过]