Cita:
Iniciado por albersil 
Eso esta bien para un textbox, pero si tienes muchos, tienes que hacerlos uno por uno repitiendo el codigo o como se hace. En concreto yo tengo 42 textbox que se llaman TextBox1, TextBox2,... asi hasta el TextBox42. Como podria hacerlo para que valiera un solo codigo para todos los textox. Gracias y Salu2
Bueno, el tema es de hace casi cuatro años.
Poner en un mismo formulario 42 controles del mismo tipo e independientes, me parece una programación mal estructurada.
Si los TextBox los pones en un array, solamente tienes que poner este código:
Código:
Private Sub Text1_KeyPress(Index As Integer, KeyAscii As Integer)
Select Case Index
Case 1, 34, 42
If KeyAscii = Asc(".") Then KeyAscii = Asc(",")
End Select
End Sub
Suponiendo que en los TextBox que quieres controlar la tecla, sean el Text1(1), Text1(34) y Text1(42). Si fuera en todos, le quitas el Select Case.
En el caso de que no estén en un array de controles, sí tienes que poner el mismo código para cada uno de los TextBox.
