Programação  
 
Conhecimento computador >> Programação >> Programação Visual Basics >> 
Como remover acentos em uma String VB6
Há vários personagens diferentes que representam um sotaque. As graves , til e acentos agudos são representados por um caractere especial sobre a letra na palavra. Embora não há muitas palavras em inglês com sotaque , há vários em francês e espanhol. Ao receber ou enviar dados francês ou espanhol a partir do Visual Basic para um ou outro banco de dados ou outro aplicativo escrito em outra linguagem de programação , pode ser necessário remover o sotaque antes de o outro aplicativo pode processá-lo . Instruções
1

Criar um novo programa Visual Basic Standard EXE. Adicione a capacidade de ler e processar os dados de um arquivo externo , selecionando " Project" e "Referências ". Marque a caixa ao lado de " Microsoft Scripting Runtime " e clique em "OK" para salvar. Isto dá o acesso do programa para a API do Windows para manipulação de arquivos
2

Declare duas variáveis: . Uma como um " FileSystemObject " eo outro como " TextStream " :

Dim oFSO como New Scripting.FileSystemObject

Dim oMyFile como Scripting.TextStream

Em seguida , abra o arquivo para leitura no TextStream .

Set oMyFile = oFSO.OpenTextFile ( FileName , ForReading )

declarar Também uma variável para armazenar cada linha do TextStream como " Dim sLineRead as String ".
3

processo da linha de arquivo de texto por linha dentro de um loop escrito como " While Not oMyFile.AtEndOfStream ". Defina " sLineRead " igual a uma linha de texto a partir do TextStream :

sLineRead = oMyFile.ReadLine

Se houver acentos contidas em " sLineRead ", você pode substituí-los por um outro valor com VB do " substituir" método.
4

Identificar o carácter acentuado a ser removido. Por exemplo , o texto que contém "e" pode ser substituído por "e" antes de exibir ou inserir os dados em um banco de dados :

sLineRead = Replace ( sLineRead , "e", "e") < br >

Esta linha de código substitui todas as ocorrências de "e" com "e" dentro da linha do texto lido em " sLineRead " sem alterar qualquer um dos dados originais.

Anterior :

Próximo : No
  Os artigos relacionados
·Como assistir uma pasta em VB6 
·Estrutura Código VBA 
·Como salvar todos os itens da caixa de lista para um ba…
·Como extrair RGBs em VB6 
·Como ler variáveis ​​de arquivos de texto para VBScrip…
·Como construir Dependências entre Objetos 
·Como criar um controle do MSChart para uma dispersão X…
·Como obter o tamanho da janela em VB6 
·VB6 Run Time Error 70: Permissão negada 
·Tipos VBA Dim 
  Artigos em destaque
·Como fazer um diretório no Perl com um script 
·Como girar um desenho em PictureBox 
·O que é CTS em ASP.NET 
·Como criar uma página com phpgacl 
·Como converter Inglês para MATLAB 
·Como fechar uma conexão MQ De Java 
·Como ocultar senha Personagens em STDIN Perl do Windows…
·Como escrever para o log IIS 
·Como converter uma data em UTC utilizando Java 
·Como criar colunas modelados DataGrid 
Cop e direita © Conhecimento computador http://ptcomputador.com Todos os Direitos Reservados