ilisticollection_simple.aspx

来自「This is a book about vb.you could learn 」· ASPX 代码 · 共 29 行

<%@Page Language="VB"%>

<h3>Simple</h3>
<%

Dim authors As string()  
authors = New string() { "Richard","Alex", _
                         "Dave","Rob","Brian","Karli"}

Dim index As Integer
index = Array.IndexOf(authors,"Richard")
If index <> -1  Then
  Response.Write("<P>" & authors(index) & " is in the author list")
End If


Dim list As IList

list = CType(authors, IList)
If list.Contains("Richard") Then
  index = list.IndexOf( "Richard")
    Response.Write("<P>" & list(index) & " is in the author list")
End If



%>