Question

vb textbox 随 它最长一行文字长度的变化而改变大小

在visual basic 中，如何让textbox随它输入文本中最长一行文本的长度而改变自己的大小？

Answer 1

和让Grid控件自适应列宽一个原理。遍历每一行，获取最长的字符串的长度。再按字号换算出行宽。最后设置。
我曾经做一个技术迁移或者叫做欺骗。就是把遍历后找到的最长的字符串放进标签控件(隐身的，哈哈~~），再把此时标签的宽度赋值给文本框……
你试下我的代码就明白了：
Private Sub Text1_Change()
Label1.AutoSize = True
Label1 = Text1
Text1.Width = Label1.Width
End Sub
你在文本框中输入内容

张志晨