how to declare something in vb 8

See more:

VB8

VB

"USERREAD" is not declared

code is:
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
If My.Computer.FileSystem.DirectoryExists(" C:\ACCOUNTS" + TextBox1.Text + "\") Then Dim USERREAD As System.IO.StreamReader = New System.IO.StreamReader("C:\ACCOUNTS" + TextBox1.Text + "\" + "USERNAME.TXT")
Dim userline As String
Dim PASSREAD As System.IO.StreamReader = New System.IO.StreamReader("C:\ACCOUNTS" + TextBox1.Text + "\" + "PASSWORD.TXT")
Dim PASSLINE As String
Do

PASSLINE = TextBox2.Text
userline = USERREAD.ReadLine
Console.WriteLine(PASSLINE)
Console.WriteLine(userline)
Loop Until (userline Is Nothing) 'Imput Form You want to show when login is right here as 'FormNameHere.ShowDialog' If TextBox2.Text = "" Then MsgBox("Please imput both a username and a password to login.", MsgBoxStyle.Critical) Else If PASSLINE = PASSREAD.ReadLine() = True Then End If End If Else MsgBox("The Username or Password was incorrect. Please try again.", MsgBoxStyle.Critical) End If
End Sub
End Class