Click here to Skip to main content
11,922,381 members (31,443 online)
Rate this:
Please Sign up or sign in to vote.
See more: VB8.0 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

PASSLINE = TextBox2.Text
userline = USERREAD.ReadLine
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
Posted 15-Mar-12 3:11am

1 solution

Rate this: bad
Please Sign up or sign in to vote.

Solution 1

Just define USERREAD at the class level. Then in your IF statement, set the value.

This content, along with any associated source code and files, is licensed under The Code Project Open License (CPOL)

  Print Answers RSS
0 OriginalGriff 453
1 Dave Kreskowiak 335
2 Sergey Alexandrovich Kryukov 263
3 Richard MacCutchan 225
4 ppolymorphe 175
0 OriginalGriff 7,231
1 KrunalRohit 4,530
2 Sergey Alexandrovich Kryukov 3,356
3 George Jonsson 2,865
4 Suvendu Shekhar Giri 2,216

Advertise | Privacy | Mobile
Web04 | 2.8.151120.1 | Last Updated 15 Mar 2012
Copyright © CodeProject, 1999-2015
All Rights Reserved. Terms of Service
Layout: fixed | fluid

CodeProject, 503-250 Ferrand Drive Toronto Ontario, M3C 3G8 Canada +1 416-849-8900 x 100