您所在位置：主题：请大家帮忙看看
chenzhiyi99
[专家分：30] 发布于 2006-03-07 18:07:00
Dim s As Boolean = True
Dim r As Boolean = False
Dim sr As New StreamReader("c:\person.txt", Encoding.GetEncoding("gb2312"))
Dim hqhs As String = sr.ReadLine()
Dim arr As Array = hqhs.Split(",")
If (Me.TextBox1.Text.Trim = arr(0).ToString And Me.TextBox2.Text.Trim = arr(2).ToString) = True Then
Return s
'MsgBox("密码错误")
End If
Return r
未处理的“System.IndexOutOfRangeException”类型的异常出现在 mscorlib.dll 中。
其他信息: 索引超出了数组界限。
程序“[212] sy.exe”已退出，返回值为 0 (0x0)。
Dim r As Boolean = False
Dim sr As New StreamReader("c:\person.txt", Encoding.GetEncoding("gb2312"))
Dim hqhs As String = sr.ReadLine()
Dim arr As Array = hqhs.Split(",")
If (Me.TextBox1.Text.Trim = arr(0).ToString And Me.TextBox2.Text.Trim = arr(2).ToString) = True Then
Return s
'MsgBox("密码错误")
End If
Return r
未处理的“System.IndexOutOfRangeException”类型的异常出现在 mscorlib.dll 中。
其他信息: 索引超出了数组界限。
程序“[212] sy.exe”已退出，返回值为 0 (0x0)。
