案例:ASP.NET案例     状态:不可编辑再运行    进入竖版
 运行结果 
x
 
1
2
<script  runat="server">
3
Sub submit(Sender As Object, e As EventArgs)
4
if red.Checked then
5
   Label1.Text="您选择了 " & red.Text
6
elseIf green.Checked then
7
   Label1.Text="您选择了 " & green.Text
8
elseIf blue.Checked then
9
   Label1.Text="您选择了 " & blue.Text
10
end if
11
End Sub
12
</script>
13
14
<html>
15
<body>
16
17
<form runat="server">
18
请选择您喜欢的颜色:
19
<br />
20
<asp:RadioButton id="red" Text="Red" Checked="True"
21
GroupName="colors" runat="server"/>
22
<br />
23
<asp:RadioButton id="green" Text="Green"
24
GroupName="colors" runat="server"/>
25
<br />
26
<asp:RadioButton id="blue" Text="Blue"
27
GroupName="colors" runat="server"/>
28
<br />
29
<asp:Button text="提交" OnClick="submit" runat="server"/>
30
<p><asp:Label id="Label1" runat="server"/></p>
31
</form>
32
33
</body>
34
</html>
35