Динамическое изменение размеров элементов управления вместе с формой - VB
Формулировка задачи:
Подскажите как привязать элементы управления к форме, чтобы при растягивании (изменении размера) формы элементы управления не стояли на месте. Надеюсь вы поняли
Решение задачи: «Динамическое изменение размеров элементов управления вместе с формой»
textual
Листинг программы
- Private Sub Form_Resize()
- 'form4.BorderStyle=5' --- выставить
- 'циферки можно уточнить
- Command3.Left = Me.Width - Command3.Width - 180
- Command2.Left = Command3.Left - Command2.Width - 60
- Command1.Left = Command2.Left - Command1.Width - 60
- Text2.Left = Command1.Left - Text2.Width - 60
- Text1.Width = Text2.Left - 120
- WB.Width = Me.Width - 120
- WB.Height = Me.Height - (Text1.Top + Text1.Height) - 180 - 360
- End Sub
ИИ поможет Вам:
- решить любую задачу по программированию
- объяснить код
- расставить комментарии в коде
- и т.д