vb.net 身份验证无效castexception

vb.net authentification invalidcastexception

我正在使用 vb.net 开发桌面应用程序。我正在使用 windows 表单进行身份验证,我正在使用下面的代码,它说 "datareader(1).ToString = login.Text" 中有一个 invalidcastexception 我在文本区域 "admin" 中输入了这个错误: 字符串 "admin" 到类型 'Boolean' 的转换无效。

If datareader.HasRows Then
            While (datareader.Read())
                If (datareader(1).ToString = login.Text & datareader(2).ToString = password.Text) Then
                    Me.Close()
                    FormMenu.Show()
                End If
            End While
If datareader.HasRows Then
            While (datareader.Read())
                If datareader(1).ToString = login.Text AndAlso datareader(2).ToString = password.Text Then
                    Me.Close()
                    FormMenu.Show()
                End If
            End While