<%@Page language="vb" %>
Sub Page_Load(Source As Object, E as EventArgs)
Dim AnimalArray(4) as string
AnimalArray(0) = "Dog"
AnimalArray(1) = "Cat"
AnimalArray(2) = "Elephant"
AnimalArray(3) = "Lion"
AnimalArray(4) = "Cat"
MyLabel.Text = AnimalArray.GetValue(2)
End Sub