请问我在VB中怎样才能让文本框的大小随窗体大小改变？
我在窗体上建了一个TEXTBOX控件，里面用于显示多行文本，请问怎样才能让文本框的大小随窗体大小的改变而改变？...
我在窗体上建了一个TEXTBOX控件，里面用于显示多行文本，请问怎样才能让文本框的大小随窗体大小的改变而改变？
展开
1个回答
展开全部
Dim tx As Single, ty As Single
Private Sub Form_Load()
tx = Text1.Width / Me.Width
ty = Text1.Height / Me.Height
End Sub
Private Sub Form_Resize()
If Me.WindowState <> vbMinimized Then
Text1.Width = tx * Me.Width
Text1.Height = ty * Me.Height
End If
End Sub
已赞过
已踩过<
评论
收起
你对这个回答的评价是？
推荐律师服务：
若未解决您的问题，请您详细描述您的问题，通过百度律临进行免费专业咨询
