¿Por qué no puedo ingresar números en texto en la programación VB?

Subtexto privado1_Change()

Text1.Text = ""

Fin del subtexto

Subtexto privado2_Change()

Text2.Text = ""

End Sub

Elimina estos dos códigos

El cambio se activa cuando se produce un cambio en el evento del cuadro de texto, por lo que creas todo el contenido de los dos cuadros de texto Text1(2).text=""