|
Postada em 13/08/2004 09:37 hs
Olá amigos(as), queria saber como faço pra poder estar eliminando os 2 ultimos caracteres da minha string... ela está sendo alimentada via banco de dados... supondo ... tenho uma string "10700188" por ex. e quero que esse 88 do final dela seja ignorado.. lembrando que pode ser qq numero... ficando só o "107001" ... como eu faço isso ..??? Algué poderia me ajudar ? valew...
¿? AndrePaulo ¿?
|
|
|
|
|
Postada em 13/08/2004 09:55 hs
mid(string, inicio, fim) = 0 ou = "" mid(string, 7, 9) = "" ou
_______________________ Anjo Negro anjonegro86@ibest.com.br
|
|
|
Tekki
|
UBERLÂNDIA MG - BRASIL
|
|
ENUNCIADA !
|
|
|
Postada em 13/08/2004 10:09 hs
Dim SeuCampo As String SeuCampo = "10700188" SeuCampo = Left(SeuCampo, Len(SeuCampo) - 2) MsgBox SeuCampo
|
|
|
|
Postada em 13/08/2004 10:16 hs
tanto faz eu usar o Mid ou o Left ? vi que a rotina eh a mesma só trocar essa palavra... valew as respostas...
¿? AndrePaulo ¿?
|
|
|
Tekki
|
UBERLÂNDIA MG - BRASIL
|
|
ENUNCIADA !
|
|
|
Postada em 13/08/2004 10:37 hs
No seu caso, pode usar o que você achar melhor. O Left sempre iniciará no 1º caracter (a esquerda) já o mid você pode inicializa-lo no 1, 2, 3... Ex: MsgBox Mid("123456", 1, 1) MsgBox Mid("123456", 2, 1) MsgBox Mid("123456", 3, 1) 'Ou se preferir MsgBox Mid("123456", 3, 2) 'O primeiro valor é onde irá iniciar e o segundo a quantidade de caracteres.
Só tem um detalhe, o seus regristros sempre serão preenchidos com 9 caracteres? Se não, use assim: Mid(SeuCampo, 1, Len(SeuCampo) - 2)
|
|
|
|
Postada em 13/08/2004 14:27 hs
¿? AndrePaulo ¿?
|
|
|