<%@ Page language="vb"%>
<html>
<head>
<title>Chapter 6: ASP.NET List Controls</title>
<script language="VB" runat="server" ID=Script1>
Sub RepeatLayoutList_Changed(sender As Object, e As EventArgs)
Select Case RepeatLayoutList.SelectedItem.Value
Case "Table"
RadioList.RepeatLayout = RepeatLayout.Table
Case "Flow"
RadioList.RepeatLayout = RepeatLayout.Flow
End Select
End Sub
Sub RepeatDirectionList_Changed(sender As Object, e As EventArgs)
Select Case RepeatDirectionList.SelectedItem.Value
Case "Vertical"
RadioList.RepeatDirection = RepeatDirection.Vertical
Case "Horizontal"
RadioList.RepeatDirection = RepeatDirection.Horizontal
End Select
End Sub
Sub RepeatColumnsValue_Change(sender As Object, e As EventArgs)
RadioList.RepeatColumns = RepeatColumnsValue.Text
End Sub
</script>
</head>
<body>
<form runat="server">
<h3>Changing list control layout</h3>
RepeatLayout:
<asp:dropdownlist id="RepeatLayoutList" runat="Server" autopostback="True" onselectedindexchanged="RepeatLayoutList_Changed">
<asp:listitem value="Table">Table</asp:listitem>
<asp:listitem value="Flow">Flow</asp:listitem>
</asp:dropdownlist><br>
RepeatLayout:
<asp:dropdownlist id="RepeatDirectionList" runat="Server" autopostback="True" onselectedindexchanged="RepeatDirectionList_Changed">
<asp:listitem value="Vertical">Vertical</asp:listitem>
<asp:listitem value="Horizontal">Horizontal</asp:listitem>
</asp:dropdownlist><br>
RepeatColumns:
<asp:textbox id="RepeatColumnsValue" runat="Server" ontextchanged="RepeatColumnsValue_Change" columns="1" autopostback="True"/>
<asp:radiobuttonlist id="RadioList" runat="server">
<asp:ListItem>Houston Texans</asp:ListItem>
<asp:ListItem>New Orleans Saints</asp:ListItem>
<asp:ListItem>Dallas Cowboys</asp:ListItem>
<asp:ListItem>Tennesee Titans</asp:ListItem>
</asp:radiobuttonlist>
</form>
</body>
</html>