|
<%@ Page Language=VB Debug=true %>
<script runat=server>
Sub SubmitBtn_Click(Source As Object, E as EventArgs)
MyMessage.InnerHTML = "You selected as your " _
& "favorite meal: " & Meal.Value
End Sub
</SCRIPT>
<HTML>
<HEAD>
<TITLE>Allowing Input through the HTMLInputRadioButton Control</TITLE>
</HEAD>
<BODY>
<form runat="server">
<Span id="MyMessage" runat=server>
</Span>
<BR>
Which is your favorite meal?
<BR>
<select
id="meal"
runat="Server"
multiple="False"
size=1
>
<option>Breakfast</option>
<option>Lunch</option>
<option>Dinner</option>
</select>
<BR>
<button
id="Button1"
runat="server"
onserverclick="SubmitBtn_Click"
>
Submit
</button>
</Form>
</BODY>
</HTML>
|