TextBox Change Event HELP

If the above 3 requirements are not able to met, then I'm willing to take out the '%' sign. Which means point 1 and 2 has to be met

Public oldvalue As Double

Private Sub TextBox1_Exit(ByVal Cancel As MSForms.ReturnBoolean)

temp = TextBox1.Value
If Not IsNumeric(temp) Then temp = oldvalue
oldvalue = temp

TextBox1.Value = Format(oldvalue / 100, "0.00%")

End Sub

Private Sub UserForm_Activate()
If IsNumeric(TextBox1.Value) Then
oldvalue = TextBox1.Value
Else
oldvalue = 0: TextBox1.Value = Format(0, "0.00%")
End If
End Sub