Public Sub Button1_Click()
TextBoxMuestra.Text &= "1"
End
Public Sub Button2_Click()
TextBoxMuestra.Text &= "2"
End
Public Sub Button3_Click()
TextBoxMuestra.Text &= "3"
End
Public Sub Button4_Click()
TextBoxMuestra.Text &= "4"
End
Public Sub Button5_Click()
TextBoxMuestra.Text &= "5"
End
Public Sub Button6_Click()
TextBoxMuestra.Text &= "6"
End
Public Sub Button7_Click()
TextBoxMuestra.Text &= "7"
End
Public Sub Button8_Click()
TextBoxMuestra.Text &= "8"
End
Public Sub Button9_Click()
TextBoxMuestra.Text &= "9"
End
Public Sub Button0_Click()
TextBoxMuestra.Text &= "0"
End
Public Sub ButtonPunto_Click()
TextBoxMuestra.Text &= "."
End