rinto
Сообщений: 1
Оценки: 0
Присоединился: 2010-11-06 19:22:28.123333
|
Помогите создать массив из объектов Label и RadioButton в VB.NET 2003. Только осваиваю еще. У меня для каждого Label (их 7) вот такой код и в нем восемь радиокнопок. Смысл такой. Выбираю радиокнопку, а затем по щелчку на метку в ней появляется текст (буква) из радиокнопки. Идет сбор слова из букв. Получается очень большой код без массивов объектов.
Private Sub Label3_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Label3.Click
If RadioButton1.Checked = True Then
Label3.Text = RadioButton1.Text
RadioButton1.Enabled = False
End If
If RadioButton2.Checked = True Then
Label3.Text = RadioButton2.Text
RadioButton2.Enabled = False
End If
...
...
End Sub
в VB.6 было так:
Private Sub LblLetter_Click(Index As Integer)
For k=0 to 7
If OptLetter.Value= True Then
LblLetter(Index)Caption =OptLetter(k).Caption
OptLetter(k).Enabled = False
End If
End Sub
|