Seleccionar Radio Button

[programadorvip]

Partial Class Default3
Inherits System.Web.UI.Page
Protected WithEvents radio As New RadioButtonList
Protected Sub Page_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load
Dim tabla As Table
Dim fila As TableRow
Dim columna As TableCell
Dim i As Integer
radio.AutoPostBack = True
' If Not Page.IsPostBack Then
tabla = New Table()

fila = New TableRow()
For i = 0 To 3
columna = New TableCell()
' radio = New RadioButton()
'radio.GroupName = "radioButton"
radio.ID = i
Dim item As New ListItem
item.Text = "HOLAAAAAA" & i
item.Value = i
radio.Items.Add(item)


columna.Controls.Add(radio)
fila.Controls.Add(columna)
Next i

tabla.Controls.Add(fila)
Label1.Controls.Add(tabla)
Label1.DataBind()
tabla.DataBind()
radio.DataBind()
' End If
End Sub

Protected Sub radio_SelectedIndexChanged1(ByVal sender As Object, ByVal e As System.EventArgs) Handles radio.SelectedIndexChanged
Label1.Text = radio.SelectedItem.Text
End Sub
Protected Sub radio_SelectedIndexChanged(ByVal sender As Object, ByVal e As System.EventArgs) Handles radio.TextChanged
Label1.Text = radio.SelectedItem.Text

End Sub