＋设为首页 ＋添加到收藏夹
<%@Page language="vb" %>
<script runat="server" language="vb">
Sub Page_Load()
Dim intCounter As Integer = -1
Dim AnimalArray(4) as string
Dim strAnimal As String
AnimalArray(0) = "Dog"
AnimalArray(1) = "Cat"
AnimalArray(2) = "Elephant"
AnimalArray(3) = "Lion"
AnimalArray(4) = "Cat"
Array.Sort(AnimalArray)
For Each strAnimal In AnimalArray
MyDropDownList.Items.Add(strAnimal)
Next
End Sub
</script>
<html>
<asp:dropdownlist id="MyDropDownList" runat=server />
</html>
Dim AnimalArray(4) as string
这一句改成：
Dim AnimalArray(5) as string
