andre
|
DIVINÓPOLIS
MG - BRASIL
|
|
Postada em 23/03/2006 11:22 hs
como faço para "contar" a quantidade de digitos numa caixa de texto. Ex: "574985445". Como faço pra que ele conte 9 (no caso nove digitos). "ds4fd56" (7 digitos). |
|
|
|
|
|
Donkey
|
PRESIDENTE PRUDENTE
SP - BRASIL
|
|
Postada em 23/03/2006 11:40 hs
LEN(CAMPO) RETORNA QUANTOS DIGITOS TEM OU LEN(TRIM(CAMPO)) PARA CASO TENHA ESPAÇOS VAZIOS NO INICIO E FIM DA STRING... T+ |
|
|
|
|
|
Postada em 23/03/2006 12:14 hs
me.label1.caption = len(me.txtNome.text) |
|
|
|
andre
|
DIVINÓPOLIS
MG - BRASIL
|
|
Postada em 23/03/2006 18:07 hs
Muito obrigado, resolvi meu problema... mas acabou surgindo outra duvida. Preciso apagar todos os espaços que estiverem antes do texto. Ex: " andre" => "andre". Como faço para contar somente os espaços e apagalos na caixa de texto "text1", com botao "cmd1"? Obrigado |
|
|
|
|
|
Postada em 23/03/2006 18:32 hs
No evento LostFocus Text1.text = LTrim(Text1.text) ' apaga espaços da esquerda RTrim ' apaga espaços da direita Trim ' apaga espaços de qualquer posição vlu// |
|
|
|
|
|
Postada em 23/03/2006 18:46 hs
Para ficar melhor:
use o método REPLACE (para VB6)
No FORMULÁRIO
Crie:
(.) Textbox
(.) CommandButton
Private Sub Command1_Click()
Dim Trocar
Trocar = Replace(Text1.Text, " ", "")
Text1.Text = Trocar
End sub
obs: Ele irá verificar no TEXT1 se há algum espaço entre o TEXTO e etc.. (e irá remove-los..)
T+
______________________________
Resolveu ? Tópico Trancado!
|
|
|
|
