| Вопрос: VB.NET 2005 Load? | Добавлено: 08.05.06 14:11 |
Автор вопроса:  Billi Gates | ICQ: 242-026-281 |
|
Здравствуйте! В vb 6.0 есть фенкция load, она загружает обьекты с индексом, а как такое сделать на vb.net 2005?
P.S. Точно не помню, может такого небыло в vb 6.0, но смысл в том, чтобы можно было загружать объекты(кнопки, лейблы и.т.д.!) допустим у меня сть на форме кнопка с именем "Button" позиция на форме top=50 left=50 height=100 width=400 (индекса в vb 2005 нет "т.е. button1.index=1" такого нет!) И мне нужно сделать так, чтобы на форме появилась ещё одна кнопка с именем "Button2" и позиция её должна быть button2.left=button1.left and button2.top=button1.top+button2.height как это сделать? |
| Ответы | Всего ответов: 1 |
|
Номер ответа: 1 Автор ответа:  EROS Вопросов: 58 Ответов: 4255  |
Профиль | | #1 | Добавлено: 09.05.06 03:03 |
|
Public Class Form1
Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load For I As Integer = 0 To 2 Dim MyButton As New Button With MyButton .Size = New Size(75, 25) .Location = New Point((I * 80) + 10, 10) .Name = "Button " & I + 1 .Text = "Кнопка " & I + 1 AddHandler MyButton.Click, AddressOf MyButtonClick Me.Controls.Add(MyButton) End With Next End Sub Private Sub MyButtonClick(ByVal sender As System.Object, ByVal e As System.EventArgs) Dim MyBtn As Button = CType(sender, Button) MessageBox.Show("Button '" & MyBtn.Text & "' was pressed", "Test", MessageBoxButtons.OK, MessageBoxIcon.Information) End Sub End Class |
||
Страница: 1 |