Anonymous

Private Sub Button9_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button9.Click
        totalMoney = totalMoney + 0.05
        MoneyIn.text = totalMoney.ToString("C2")
    End Sub

    Private Sub Button10_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button10.Click
        totalMoney = totalMoney + 0.1
        MoneyIn.Text = totalMoney.ToString("C2")
    End Sub

    Private Sub Button11_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button11.Click
        totalMoney = totalMoney + 0.25
        MoneyIn.Text = totalMoney.ToString("C2")
    End Sub

    Private Sub Button12_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button12.Click
        totalMoney = totalMoney + 1.0
        MoneyIn.Text = totalMoney.ToString("C2")
    End Sub