|
|
Postada em 24/01/2007 15:56 hs
Boa Tarde. Sou ianda novato em vB e quero sabe r se podem me dar uma dica. Como eu posso fazer para um campo text numerico aceitar alafanumérico no windws XP. |
|
|
|
|
|
|
|
Postada em 24/01/2007 16:34 hs
Esse campo text que você quer, você já utilizou alguma formatação nele ? Tipo isnumeric ? Pois se vc formatar ex: isnumeric(text1.text)=false isso impede que letras sejam digitadas. Agora se você utilizar len(trim(text1.text))=false isso impede que o campo fique em branco mesmo que o usuário de espaço e enter, porém ele permite que você digite número e letra juntos Pelo que entendi, acho que era isso que você queria, se não for coloca a sua dúvida e o possível erro quando você tenta digitar número
Abraço e que DEUS te abençõe, espero poder ter te ajudado 
Eu sou o Senhor, o DEUS de vocês;
eu os seguro pela mão e lhes digo;
Não fiquem com medo, pois eu os ajudo
Isaias 41:13
|
|
|
|
|
|
Postada em 24/01/2007 16:58 hs
o q eu estou fazendo é exatamente isso: ValidaGuilhotina = True
lErro = True
For nCont = 1 To Len(txtGuilhotina.Text)
If Mid(txtGuilhotina.Text, nCont, 1) <> "," Then
If Not IsNumeric(Mid(txtGuilhotina.Text, nCont, 1)) Then
MsgBox "Tem que ser preencher com numeros e virgulas somente", vbOKOnly
ValidaGuilhotina = False
Exit For
End If
End If
Next nCont |
|
|
|
|
