Mega Code Archive

 
Categories / ASP.Net / Asp Control
 

Setting and Retrieving the Selected Item in a RadioButton Control Group (VB net)

<%@ Page Language=VB Debug=true %> <script runat=server> Sub Page_Load(ByVal Sender as Object, ByVal E as EventArgs)     If Not IsPostBack Then         rdoColorYellow.Checked = True     End If End Sub Sub SubmitBtn_Click(Sender As Object, E As EventArgs)     Dim MyControl as Control     Dim MyRadioButton as RadioButton     For Each MyControl in frmMainForm.Controls         If MyControl.GetType().FullName = "System.Web.UI.WebControls.RadioButton" Then             MyRadioButton = MyControl             If MyRadioButton.GroupName = "rgColors" then                 If MyRadioButton.Checked = "True" Then                     lblColorSelected.Text = "You selected the color " _                         & MyRadioButton.Text                 End If             End If         End If     Next End Sub </SCRIPT> <HTML> <HEAD> <TITLE>Setting and Retrieving the Selected Item in a RadioButton Control Group</TITLE> </HEAD> <form     id="frmMainForm"     runat="server" > <BR><BR> <asp:Label      id="lblColorSelected"      runat="server" /> <BR> Select your favorite Color:<BR> <asp:radiobutton      id="rdoColorBlue"     text="Blue"      font-size="12pt"     font-name="Comic Sans MS"     groupname="rgColors"     runat="server"  /> <BR> <asp:radiobutton      id="rdoColorGreen"     text="Green"      font-size="12pt"     font-name="Comic Sans MS"     groupname="rgColors"     checked="True"     textalign="Left"     runat="server"  /> <BR> <asp:radiobutton      id="rdoColorYellow"     text="Yellow"      font-size="12pt"     font-name="Comic Sans MS"     groupname="rgColors"     textalign="Right"     runat="server"  /> <BR><BR> <asp:button      id="butOK"     text="OK"     Type="Submit"     OnClick="SubmitBtn_Click"      runat="server" /> </form> </BODY> </HTML>