Создание элементов формы с помощью кода - VB

Узнай цену своей работы

Формулировка задачи:

Подскажите,пожалуйста,как можно управлять элемент формы с помощью кода.Например,создать Textbox в центре сдвинув CommandButton вниз. Заранее сасибо

Решение задачи: «Создание элементов формы с помощью кода»

textual
Листинг программы
<font color="blue">Dim</font> txt <font color="blue">As</font> VB.TextBox
<font color="blue">Dim</font> btn <font color="blue">As</font> VB.CommandButton
<font color="blue">Set</font> txt = <font color="blue">Me</font>.Controls.Add(<font color="teal">"VB.TextBox"</font>, <font color="teal">"Text1"</font>, <font color="blue">Me</font>)
<font color="blue">Set</font> btn = <font color="blue">Me</font>.Controls.Add(<font color="teal">"VB.CommandButton"</font>, <font color="teal">"Button1"</font>, <font color="blue">Me</font>)
<font color="blue">With</font> txt
.<font color="blue">Width</font> = <font color="darkblue"><b>600</b></font>
.Height = <font color="darkblue"><b>285</b></font>
.Visible = True
.Left = (<font color="blue">Me</font>.<font color="blue">Width</font> / <font color="darkblue"><b>2</b></font>) - (.<font color="blue">Width</font> / <font color="darkblue"><b>2</b></font>)
<font color="blue">End</font> <font color="blue">With</font>
<font color="blue">With</font> btn
.Move (txt.Left) - (.<font color="blue">Width</font> / <font color="darkblue"><b>2</b></font>) + (txt.<font color="blue">Width</font> / <font color="darkblue"><b>2</b></font>), txt.Top + txt.Height, txt.<font color="blue">Width</font> * <font color="darkblue"><b>2</b></font>
.Visible = True
<font color="blue">End</font> <font color="blue">With</font>

ИИ поможет Вам:


  • решить любую задачу по программированию
  • объяснить код
  • расставить комментарии в коде
  • и т.д
Попробуйте бесплатно

Оцени полезность:

13   голосов , оценка 3.846 из 5
Похожие ответы