ESERCIZIO
AIUTO è URGENTE
Inserisci da input un elenco di N Nomi utenti - Password e memorizzarli due strutture parallele.
Si consideri che la password deve rispettare le seguenti regole:
-Lunghezza >= 8 caratteri
-Almeno 2 caratteri maiuscoli
-Almeno 1 cifra numerica
-Non pi? di 2 caratteri consecutivi uguali
Si visualizzi l'elenco Nome utente - Password ordinato alfabeticamente per N.
questo è l'esercizio
questo è il mio codice voglio sapere come fare il controllo sulla password
DEVO FARE UN CONTROLLO PRIMA CHE INSERISCO IL LA PASSWORD
Public Class Form1
Const L = 50
Dim nomi(L - 1) As String
Dim password(L - 1) As String
Dim n As Integer
Dim i As Integer
Private Sub btncarica_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btncarica.Click
Dim i As Integer
Do
n = InputBox(" numero di studenti")
Loop Until n <= L
For i = 0 To n - 1
nomi(i) = InputBox("inserisci l'utente")
password(i) = InputBox("inserisci la password")
Next
For i = 0 To n - 1
lstutente.Items.Add(nomi(i))
lstpassword.Items.Add(password(i))
Next
End Sub
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
Dim i, j As Integer
Dim salvan As String
Dim salvat As String
For i = 0 To ((n - 1) - 1)
For j = i + 1 To (n - 1)
If nomi(i) > nomi(j) Then
salvan = nomi(i)
nomi(i) = nomi(j)
nomi(j) = salvan
salvat = password(i)
password(i) = password(j)
password(j) = salvat
End If
Next
Next
i = 0
lstutente.Items.Clear()
lstpassword.Items.Clear()
Do While i < n
lstutente.Items.Add(nomi(i))
lstpassword.Items.Add(password(i))
i = i + 1
Loop
End Sub
End Class