Dim ds As DataSet
Dim i As
ds.ReadXml(Server.MapPath("data\\会员.xml"))
For i = 0 To ds.Tables(0).Rows.Count - 1
If (ds.Tables(0).Rows(i).Item(0) = TextBox1.Text) Then
Session("帐号") = Me.TextBox1.Text
TextBox1.Visible = False
TextBox2.Visible = False
End If
Next
中的i要定义成什么