Programação  
 
Conhecimento computador >> Programação >> Programação Visual Basics >> 
Como ciclo para localizar nomes duplicados em um arquivo aleatório em VB 4/5/6
nomes duplicados podem causar problemas com a entrada de dados em um aplicativo. Um exemplo típico é o lugar onde os usuários são exportados a partir de um arquivo de texto e entrou em um banco de dados . Um script pode ser escrito em Visual Basic para encontrar as entradas duplicadas e evitar que eles sejam inseridos, mais de uma vez , no banco de dados . Isto vai poupar editar os dados e removendo as duplicatas manualmente , uma vez que foi importado, para a nova aplicação. Coisas que você precisa
Visual Basic editor
Show Mais instruções
1

Abra um editor de Visual Basic.
2

Crie uma nova sub-rotina :

Private Sub Button1_Click (sender System.Object , ByVal e As System.EventArgs ) Handles Button1.Click
3

Leia as informações para um arquivo de texto aleatório e armazená-lo em uma variável :

Dim nomes as String () = IO.File.ReadAllLines ( "c: \\ usernames.txt " )
4

loop através do arquivo de texto e verifique se o nome de usuário já foi encontrado :

para cada linha no usernames

tofind = linha

Se Array.findIndex ( usernames, 0, AddressOf FindLine ) < 0 Then

MsgBox (" Dubplicate encontrado !")

Se o nome de usuário é um já armazenado na variável " a encontra ", uma duplicata foi encontrado .
5

Feche o loop que já foi aberto :

End If

Próxima

End Sub
6

Adicionar função para verificar o indivíduo linha:

FindLine Private Function ( linha ByVal As String) As Boolean

Se linha = tofind Então

return true

Else

Voltar Falso

End If End Function


Esta função é chamada em uma etapa anterior .
7

Pressione o botão F5 para executar o código . O loop de código através do arquivo de texto e uma caixa de mensagem irá mostrar se todas as duplicatas são encontrados.

Anterior :

Próximo : No
  Os artigos relacionados
·Vantagens e Desvantagens de VisualBasic 
·Como remover caracteres especiais de uma string VB 
·Como incrementar o valor de uma variável em Vb.Net 
·Como usar o QBasic escrever para Porto 
·Como parar de executar VBA 
·Como exibir um Spinner Quando uma macro VBA está funci…
·Como preencher DataSet & Bind DataGridView em diferente…
·Como usar um Matrix para transformar objetos em VB.NET 
·Como verificar se existe uma pasta em Vb.Net 
·Como verificar a existência de AppSettings em Visual B…
  Artigos em destaque
·Como escrever uma função JavaScript que calcula a tar…
·Como obter uma caixa suspensa em VBA 
·O que é um código C Fragmento 
·Como copiar e colar uma página da Web para outro site 
·Como converter System.DBNull para um Integer 
·Como ler arquivos PDF em PHP 
·Como enviar uma solicitação para um servidor Proxy em…
·Como construir SQL dinâmico no VB.net 
·Como exibir Python Código Byte 
·Como converter arquivos PY para Pyc 
Cop e direita © Conhecimento computador http://ptcomputador.com Todos os Direitos Reservados