valores numericos , simbolos e letras.

[willsellan]

Boa tarde

Gostaria de saber como posso fazer para que uma caixa de texto , só complete o processo quando o usuario digitar uma senha contento , letras , simbolos e numeros..

O Programa faz o seguinte

Private Sub cmdAtualizar_Click()
Dim senha As String
Dim forte As String
    forte = "select Senhaforte from Senhas where login='" & frmLogin.txtID.Text & "'"
Set Senhas = conexão.Execute(forte)
If Senhas.EOF Then
    MsgBox "usuario não encontrado"
Else

If Senhas("Senhaforte") = True Then
    MsgBox "senha forte"
Unload Me

SE a senha for forte, permitir completar o processo apenas com letra,numeros e simbolos

obrigado

Editado Março 28, 2011 por kuroi
Adicionar tag CODE

[willsellan]

alguém poderia responder?

é urgente

[kuroi]

pode fazer usando expressoes regulares: http://www.macoratti.net/vb_regex.htm

mas não posso dar mtas dicas porque não tenho nenhuma experiencia no assunto.

quanto a outras alternativas, eu ia dar mais um tempo pra pensar pra ver se eu tinha alguma ideia, mas como é "urgente" a unica coisa em q pensei é um poco trabalhosa, mas não sei se teria alguma outra forma melhor.

a ideia seria você fazer um for e percorrer os codigos ascii, usando InStr() e a funcao Chr().

exemplo, faca um for de 97 a 122 (97 = "a" e 122 = "z", minusculos), pegando o Chr() do contador e procurando-o com o InStr(). se encontrar alguma coisa, significa q tem um caracter minusculo no meio.

a parte mais complicada seria a dos simbolos. você teria q prever todos os simbolos q ele poderia digitar e preencher um array com eles.

[willsellan]

nooooooooosssa é meio complicado não é??

[kuroi]

é, acho q é mais trabalhoso do q complicado.

[willsellan]

você poderia pensar em uma solução, e me mandar por e-mail??