noms dupliqués peuvent provoquer des problèmes avec la saisie des données dans une application. Un exemple typique est celui où les utilisateurs sont exportés à partir d'un fichier texte et saisies dans une base . Un script peut être écrit en Visual Basic pour trouver les entrées en double et empêcher qu'ils soient entrés, plus d'une fois , dans la base de données. Cela vous évitera de modifier les données et supprimer les doublons manuellement , une fois qu'il a été importé , dans la nouvelle application. Choses que vous devez
Visual Basic éditeur
Afficher plus Instructions
1
Ouvrez un éditeur Visual Basic.
2
Créer un nouveau sous-programme : Photos
Private Sub Button1_Click ( expéditeur de ByVal comme System.Object , ByVal e As System.EventArgs ) Handles Button1.Click
3
Lire l'information d'un fichier de texte aléatoire et le stocker dans une variable: Photos
pseudo As String () = IO.File.ReadAllLines ( "c: \\ usernames.txt " )
4
boucle à travers le fichier texte et de vérifier si le nom a déjà été trouvé :
pour chaque ligne de pseudo
AChercher = ligne
Si Array.FindIndex ( noms d'utilisateur , 0, AddressOf FindLine ) < 0 Then
MsgBox (" Dubplicate trouvé! " )
Si le nom d'utilisateur est déjà stocké dans la variable " AChercher », un double a été trouvé.
5 < p> Fermer la boucle qui a déjà été ouvert :
End If
Suivant
End Sub
6
Ajoutez fonction pour vérifier l'individu ligne :
Private Function FindLine ( ligne ByVal As String ) As Boolean
Si la ligne = AChercher Puis
retourner vrai
Else
< p > return false
End If End Function
Cette fonction est appelée dans une étape précédente .
7
Appuyez sur la touche F5 pour exécuter le code. Le code en boucle le fichier texte et une boîte de message s'affiche si des doublons sont trouvés .