write a program that maintains two parallel arrays. after th arrays have been loaded the program should behave as a login screen prompting for username and password. the program should respond three output messages. if username does not match one of the values in the username array, then the message should be "username not found". if the user name is found in the username array, but the password does not equal the parallel value in the password array then message should read "username and password do not match". if username is found and the password matches the message should read "access granted"
here is the code i have so far right now im stuck and not sure how to get the arrays to match up. I also don't know how to clear the screen after i have the username and passwords stored.
Dim user(0 To 4) As String
Dim password(0 To 4) As String
Dim input As String
For x As Integer = 0 To 4
Console.Write(" Please enter a username: ")
user(x) = Console.ReadLine()
input = user(x)
Next
Dim input2 As String
For y As Integer = 0 To 4
Console.Write(" Please enter a password: ")
password(y) = Console.ReadLine()
input2 = password(y)
Next
Console.Write(" Please enter in your login ")
Console.Write(" User name ")
Console.ReadLine()
Console.Write(" Password ")
Console.ReadLine()
Write a program that reads 10 username and password values into parallel arrays. After the arrays have been loaded, the program should behave like a login screen, prompting for a username and a password. Based on the data read and stored in the arrays, the program should respond appropriately with one of three output messages: “Username not found.”, “Username and password does not match.” or “Access granted.” in visual logic
To match the entered username and password with the arrays, you need to loop through the arrays and compare each element with the entered values. Here's an updated version of your code that includes the matching logic:
```vb
Dim user(0 To 4) As String
Dim password(0 To 4) As String
Dim input As String
For x As Integer = 0 To 4
Console.Write("Please enter a username: ")
user(x) = Console.ReadLine()
input = user(x)
Next
Dim input2 As String
For y As Integer = 0 To 4
Console.Write("Please enter a password: ")
password(y) = Console.ReadLine()
input2 = password(y)
Next
Console.Write("Please enter your login username: ")
Dim enteredUsername As String = Console.ReadLine()
Console.Write("Please enter your login password: ")
Dim enteredPassword As String = Console.ReadLine()
Dim loggedIn As Boolean = False
For i As Integer = 0 To 4
If enteredUsername = user(i) Then
If enteredPassword = password(i) Then
loggedIn = True
Exit For
Else
Console.WriteLine("Username and password do not match")
Exit For
End If
End If
Next
If loggedIn Then
Console.WriteLine("Access granted")
Else
Console.WriteLine("Username not found")
End If
' To clear the screen after login, you can add the following line of code:
' Console.Clear()
```
In the above code, the arrays `user` and `password` are filled with user-entered values. Then, the code prompts the user to enter their login username and password. It then compares the entered values with the arrays using a loop. If a match is found, it sets the `loggedIn` variable to true and exits the loop. Otherwise, it displays the appropriate messages for username not found or mismatched password. Finally, you can use `Console.Clear()` to clear the console screen after the login process if desired.
To get the arrays to match up in your code and implement the login functionality, you can use a loop and conditional statements. Here's an updated version of your code with explanations:
```vb
Dim user(0 To 4) As String
Dim password(0 To 4) As String
' Load usernames
For x As Integer = 0 To 4
Console.Write("Please enter a username: ")
user(x) = Console.ReadLine()
Next
' Load passwords
For y As Integer = 0 To 4
Console.Write("Please enter a password: ")
password(y) = Console.ReadLine()
Next
' Login prompt
Console.Write("Please enter your username: ")
Dim enteredUsername As String = Console.ReadLine()
Console.Write("Please enter your password: ")
Dim enteredPassword As String = Console.ReadLine()
' Check username and password
Dim isValidUser As Boolean = False
Dim isValidPassword As Boolean = False
For i As Integer = 0 To 4
If enteredUsername = user(i) Then
isValidUser = True
If enteredPassword = password(i) Then
isValidPassword = True
Exit For
End If
End If
Next
' Output
If Not isValidUser Then
Console.WriteLine("Username not found")
ElseIf Not isValidPassword Then
Console.WriteLine("Username and password do not match")
Else
Console.WriteLine("Access granted")
End If
```
Explanation:
1. The code begins with loading the usernames and passwords into the arrays using two separate loops.
2. After loading the arrays, the program prompts the user to enter their username and password.
3. The `isValidUser` and `isValidPassword` variables are used to track whether the entered username and password are valid or not.
4. The loop checks each username in the `user` array. If a match is found, it checks the corresponding password in the `password` array.
5. If both the username and password match, the loop is exited early using `Exit For`.
6. Finally, based on the values of `isValidUser` and `isValidPassword`, appropriate messages are displayed to the user.
To clear the screen after the username and password inputs, you can use `Console.Clear()`:
```vb
Console.Clear()
```
You can place this line of code after the password is read. This will clear the console screen before displaying the login result.
Note: For a proper login implementation, it is recommended to store the username-password pairs securely, like in a database or hashed format.