Dos dudas. TextBox

Iniciado por ‭lipman, 8 Noviembre 2006, 13:13 PM

0 Miembros y 1 Visitante están viendo este tema.

‭lipman

Tengo un textbox.

Bueno, en el aparecen unas letras, y quiero que cuando se haga click dentro del textbox se borren todas las letras automaticamente.

Tambien necesito saber como puedo hacer que no se puedan introducir caracteres numericos o caracteres de estos: ), (, [, ], =, /, -, %, ¬, etc.., (es que no me acuerdo que nombre tienen estos).

Gracias, Saludos 

Private Sub Text1_Click()
Text1.Text = ""
End Sub

easy.
el tiempo pondrá a cada uno en su lugar

WarGhost

#2
te dejo un ejemplo de como hacer un filtro:

Private Sub Text1_KeyPress(KeyAscii As Integer)
Dim Char(1 To 8) As String

Char(1) = "(": Char(2) = ")": Char(3) = "[": Char(4) = "]"
Char(5) = "=": Char(6) = "/": Char(7) = "-": Char(8) = "%"

Dim i As Long
For i = 1 To 8
If Chr(KeyAscii) = Char(i) Then KeyAscii = 0
Next i
End Sub


;D Salu2, David
¿Qué culpa tengo yo de tener la sangre roja y el corazón a la izquierda?

ReViJa

Otra manera:
Private Sub Text1_KeyPress(KeyAscii As Integer)

Select Case KeyAscii
   Case 65 To 90                  'Caracteres May
   Case 97 To 122                'Casracteres Mim
   Case 241                         'Letra ñ
   Case 209                         'Letra Ñ
   Case Else
      KeyAscii = 0 
End Select

End Sub

Hans el Topo

ninguno de los filtros es bueno.... porque si pulsa control+v puede pegar varias cosas y con eso solamente detectas la v xD

el filtro debes aplicarlo sobre todo el valor del txt

sería mismamente lo que warghost dijo (en un while no en for) añadiendole otro while que recorra toda la cadena del text1.text y el evento seria el text1_change

menuo lio de explicación que he dao, nose si se entendera
 

‭lipman

Cita de: Hans el Topo en  8 Noviembre 2006, 16:49 PM

menuo lio de explicación que he dao, nose si se entendera

Te responderé si me he enterado con la pregunta de que, crees que alguien que entendiera algo de VB sin un codigo preguntaria lo que he preguntado yo? (xD)

De verdad que no me he enterao ^^.

Ponme algun ejemplo con un poco de codigo así me entero tambien por medio de la practica.

Gracias.

Por cierto, no quisiera abrir otro post para preguntar otra cosa que tendrá facil solucion así que aprovecho.

¿Como puedo poner un botón tipo de estos de arriba de muchos programas, que tienen por ejemplo de nombre, file, o de nombre tools?

Ya me entienden, los botons de la barra de herramientas de arriba.

Gracias de nuevo.

Saludos

WarGhost

Private Sub Text1_Change()
Dim Char(1 To 8) As String
Char(1) = "(": Char(2) = ")": Char(3) = "[": Char(4) = "]"
Char(5) = "=": Char(6) = "/": Char(7) = "-": Char(8) = "%"

Dim i As Long
For i = 1 To 8
If InStr(1, Text1.Text, Char(i)) <> 0 Then
    Text1.Text = Replace(Text1.Text, Char(i), "")
End If
Next i
End Sub
¿Qué culpa tengo yo de tener la sangre roja y el corazón a la izquierda?

‭lipman

Si eso es para quitar todas las letras no me ha funcionado  :-\.

Bueno, además de eso tambien sigo preguntando, como puedo crear un botón de esos despegables de la barra de herramientas de arriba de cualquier programa.

Gracias de nuevo

byebye

CitarTe responderé si me he enterado con la pregunta de que, crees que alguien que entendiera algo de VB sin un codigo preguntaria lo que he preguntado yo? (xD)

bueno vale ya llevo mucho tiempo mordiendome la lengua pero tengo que decirlo pq teneis una cara que ya es inaguantable. si no sabes lees pq estas preguntando cosas basicas que antes de empezar a instalar vb deberias saber, si no quieres leer es tu problema pero deja de preguntar cosas que molestan.

‭lipman

Cita de: - en  8 Noviembre 2006, 19:37 PM
CitarTe responderé si me he enterado con la pregunta de que, crees que alguien que entendiera algo de VB sin un codigo preguntaria lo que he preguntado yo? (xD)

bueno vale ya llevo mucho tiempo mordiendome la lengua pero tengo que decirlo pq teneis una cara que ya es inaguantable. si no sabes lees[size=9],[/size] pq estas preguntando cosas basicas que antes de empezar a instalar vb deberias saber, si no quieres leer es tu problema pero deja de preguntar cosas que molestan.

No creo que deba de saber antes de empezar a instalar VB como poder poner un filtro de letras ^^, no tienes porque morderte la lengua ^^.

Antes de postear, busqué "filtrar", y solo me venían 3 posts en los que ninguno era.

Y bueno, si no se hacer eso, tendré que preguntarlo...,

Yo y quien más? :S

Os he molestado?: WarGhost, Hans el topo, Tesis y 8========D~.~??

Si es así, lo siento


Creo que por ahí, va una coma