Cita:
Iniciado por Kroy Creo que esto es lo mas facil, y perdonad por la lata que estoy dando
Private Sub cmdLimpiar_Click()
TxtR500 = "": TxtR200 = "": TxtR100 = "": TxtR50 = ""
TxtR20 = "": TxtR10 = "": TxtR5 = "": txtR2 = "": TxtR1 = ""
TxtR050 = "": TxtR020 = "": txtR010 = "": txtR005 = ""
TxtR002 = "": txtR001 = ""
TxtDe500 = "": txtDe200 = "": txtDe100 = "": txtDe50 = ""
txtDe20 = "": txtDe10 = "": txtDe5 = "": txtDe2 = "": txtDe1 = ""
txtDe050 = "": txtDe020 = "": txtDe010 = "": txtDe005 = ""
txtDe002 = "": txtDe001 = ""
TxtTotal = ""
End Sub
Esto es lo que he hecho, el caso es que solo me borra los "TXTde..." y no los TXTr, ya es raro NO??
Bueno, no se si solucionará, pero agregale los .text a cada uno, es decir TxtR500.text = "", TxtR20.text = "", etc
Saludos. Lucas