No entiendo bien la consulta pero,
si haces esta comparacion
If TXTprecio = TXTprecio Then
en evento change siempre va a ingresar pero comparar el mismo objeto???
Creo que necesitas algo así.
Const Comparar = "HOLA"
Private Sub Text1_Change()
If UCase(Text1.Text) = Comparar Then
MsgBox "Tarea realizada: " & Text1.Text
End If
End Sub
si haces esta comparacion
If TXTprecio = TXTprecio Then
en evento change siempre va a ingresar pero comparar el mismo objeto???
Creo que necesitas algo así.
Const Comparar = "HOLA"
Private Sub Text1_Change()
If UCase(Text1.Text) = Comparar Then
MsgBox "Tarea realizada: " & Text1.Text
End If
End Sub