O Visual Basic possui várias funções para manipulação de strings (sequência de caracteres: letras, números e símbolos). Cada string é representada por um código ASCII (American Standard Code for Information Interchange) que é uma codificação de 8 bits baseada no alfabeto inglês, criada nos anos 60. A faixa de valores é de 0 a 255, onde os valores de 0 a 127 pertencem a primeira tabela ASCII, e os valores de 128 a 255 à segunda tabela ASCII.
A tabela abaixo é muito utilizada no Visual Basic, juntamente com as funções de manipulação de strings.
Tabela ASCII - 1
Algumas funções retornam strings e outras números.
1) Len:
A função Len retorna o comprimento da string.
Sintaxe: Len(string)
Exemplo: Len("Visual Basic Land") = 17
2) Mid:
Retorna a string da posição inicial até a posição final, especificada no código.
Sintaxe: Mid("String", n, n)
Exemplo: Mid("Esse animal é o caracól", 5, 14) = "animal é o cara"
3) Left:
Retorna o conteúdo da esquerda da string.
Sintaxe: Left("String", n)
Exemplo: Left("Maria gosta de amarelo", 19) = "Maria gosta de amar"
4) Right:
Retorna o conteúdo da direita da string.
Sintaxe: Right("String", n)
Exemplo: Right("Contabilidade estuda o patrimônio", 22) = "idade estuda o patrimônio"
5) UCase:
Converte todas as strings em minúsculo em letras maiúsculas.
Sintaxe: UCase(string)
Exemplo: UCase("visual basic land") = "VISUAL BASIC LAND"
6) LCase:
Converte todas as strings em maiúculo em letras minúsculas.
Sintaxe: LCase(string)
Exemplo: LCase("VISUAL BASIC LAND") = "visual basic land"
7) InStr:
Retorna a posição da string, a partir da posição indicada pelo código.
Sintaxe: (n, "String", "palavra/frase à procurar")
Exemplo: InStr(1, "Visual Basic Land", "Land") = 14
8) InStrRev:
Retorna a posição da string a ser procurada.
Sintaxe: InStrRev("String", "letra/palavra à procurar")
Exemplo: InStrRev("Visual Basic Land", "B")
9) String:
Converte um número em uma string.
Sintaxe: String(n, n)
Exemplo: String(5, 98) = "bbbbb"
10) Space:
Retorna uma string com determinado número de espaços.
Sintaxe: Space(n)
Exemplo: Space(5) & "Visual" & Space(5) & "Basic" = " Visual Basic"
11) Replace:
Substitui uma string por outra.
Sintaxe: Replace(expressão, procurar, trocar por[, inicio[, contador[, comparar]]])
* contador, comparar = são opcionais.
Exemplo: Replace("24/06/2012", "/", "-") = 24-06-2012
12) StrReverse:
Retorna uma string ao contrário.
Sintaxe: StrReverse("String")
Exemplo: StrReverse("Visual Basic Land") = "dnaL cisaB lausiV"
13) LTrim:
Remove os espaços em branco do lado esquerdo da string.
Sintaxe: LTrim(string)
Exemplo: LTrim(" Visual Basic Land") = "Visual Basic Land"
14) RTrim:
Remove os espaços em branco do lado direito da string.
Sintaxe: RTrim(string)
Exemplo: RTrim ("Visual Basic Land ")
15) Trim:
Remove os espaços em branco de ambos os lados da string.
Sintaxe: Trim(string)
Exemplo: Trim(" Visual Basic ")
16) Asc:
Converte o ASCII da string para o código ASCII correspondente.
Sintaxe: Asc(string)
Exemplo: Asc("*") = 42
17) Chr:
Retorna a string do código ASCII correspondente.
Sintaxe: Chr(string)
Exemplo: Chr(122) = z
http://pt.wikipedia.org/wiki/ASCII
http://www.macoratti.net/strings.htm
http://www.vb6.us/tutorials/vb6-string-functions
http://www.vbtutor.net/vb6/lesson13.html
1 comentários:
Como eu consigo separar o digito de uma conta? Ela podendo variar de tamanho.
Ex: 0009595-8 (quero eliminar o 'tracinho', gravar o '0009595' na coluna CONTA da minha tabela e o '8' na coluna DIGITO da mesma tabela)
Ex2: 1234567890-5 (quero eliminar o 'tracinho', gravar o '1234567890' na coluna CONTA da minha tabela e o '5' na coluna DIGITO da mesma tabela)
Estou fazendo importação do access para Sql Server usando o VB.NET.
Obrigado
Postar um comentário