léee
|
OURINHOS
SP - BRASIL
|
|
ENUNCIADA !
|
|
|
Postada em 13/11/2004 13:16 hs
Beleza?
Tenho o codigo:
Function Cliq_Tecla(index)
If (index Like "[48-57]") Then
MsgBox index
ElseIf (index = 43 Or index = 45) Then
End If
End Function
Private Sub Txtdig_KeyPress(KeyAscii As Integer)
Cliq_Tecla (KeyAscii) ' Joga na funçao
End Sub
Quando uso a linha abaixo, apresenta o erro "invalid Pattern String: ":
If (index Like "[48-57]") Then
Sendo que este deveria fazer a mesma coisa que :
If index >= 48 And index <= 57 Then
Mas nao está fazendo. O que será que está havendo????
Valeu
|
|
|
|
|
|
|
|
Postada em 13/11/2004 16:53 hs
Simples, você está usando um pattern de string para verificar um número! O ideal é que vc mudasse para # assim: Function Cliq_Tecla(index)
If (index Like "#") Then
MsgBox index
ElseIf (index = 43 Or index = 45) Then
End If
End Function
Abraços, Sidnei |
|
|
|
léee
|
OURINHOS
SP - BRASIL
|
|
|
ENUNCIADA !
|
|
|
Postada em 13/11/2004 22:43 hs
Beleza ?
Mas o que significa "pattern de string"?
E o que o " # " representa ?
Valeu
|
|
|
|
Sandro
não registrado
|
|
|
ENUNCIADA !
|
|
|
Postada em 14/11/2004 00:33 hs
Vou me intrometer... Patern String é um padrão de string, ou melhor uma máscara, você está dizendo para ele que deseja procurar um valor em um campo que obedeça ao padrão que você definiu (lembra do *.* do DOS? é a mesma coisa). Quanto ao " # ", ele normalmente é usado para representar números (ou datas, no caso de um banco de dados Access), mas eu sugiro que ao invés de usar comparações IF, use Select Case, assim: Select case Index Case 48 To 57 MsgBox Index Case 43, 45 ...... End Select É mais prático e eficiente. Um Abraço, Sandro. |
|
|
|
