14
Январь
2009
Изменение размера TextBox вместе с формой
Изменение размера TextBox вместе с формой
Как сделать так чтобы размеры текстового поля изменялись вместе с изменением размера формы.
Удобно использовать в текстовом редакторе.
Option Explicit Private Sub Form_Load() Me.WindowState = 2 End Sub Private Sub Form_Resize() 'В режиме проектирования измените свойства TextBox 'Установим Multiline в True 'ScrollBar установите в 3 - Both Text1.Height = Form1.ScaleHeight Text1.Width = Form1.ScaleWidth End Sub