Ah ok ya te entendi y si eso te iva a decir, la propiedad Text solo recibes "cadenas" por lo que tienes que ingresar los numeros como cadenas y ya te diste cuenta como, una manera de simplificar tu codigo seria algo asi
Código VB:
Ver originalPrivate Sub PonerNumero(ByVal obj As Object, ByVal e As System.EventArgs) Handles Button1.Click, Button10.Click, Button2.Click, Button3.Click, Button4.Click, Button5.Click, Button6.Click, Button7.Click, Button8.Click, Button9.Click
txtNumero.Text = DirectCast(obj, Control).Text
End Sub
Todos los botones los suscribes al mismo eventos, el objeto del evento lo casteas y extraes su text y asi queda todo bien encapsulado.
Saludos
Link de Proyecto Ejemplo
http://www.mediafire.com/?apxvw9rh7z9adnk