CUENTA DINERO

BOTON ENTER: 
        TextBox2.Text = Val(TextBox1.Text) * 200
        TextBox4.Text = Val(TextBox3.Text) * 100
        TextBox6.Text = Val(TextBox5.Text) * 50
        TextBox8.Text = Val(TextBox7.Text) * 20
        TextBox10.Text = Val(TextBox9.Text) * 10
        TextBox12.Text = Val(TextBox11.Text) * 5
        TextBox14.Text = Val(TextBox13.Text) * 1
        TextBox16.Text = Val(TextBox15.Text) * 0.5
        TextBox18.Text = Val(TextBox17.Text) * 0.25
        TextBox20.Text = Val(TextBox19.Text) * 0.1
        TextBox22.Text = Val(TextBox21.Text) * 0.05
LO SIGUIENTE VA EN UNA SOLO LINEA EN EL MISMO BOTON CALCULAR (TODA LA SUMA)
TextBox23.Text = TextBox2.Text + TextBox4.Text + TextBox6.Text + TextBox8.Text + TextBox10.Text + TextBox12.Text + TextBox14.Text + TextBox16.Text + TextBox18.Text + TextBox20.Text + TextBox22.Text



BOTON LIMPIAR:
        TextBox1.Text = ""
        TextBox2.Text = ""
        TextBox3.Text = ""
        TextBox4.Text = ""
        TextBox5.Text = ""
        TextBox6.Text = ""
        TextBox7.Text = ""
        TextBox8.Text = ""
        TextBox9.Text = ""
        TextBox10.Text = ""
        TextBox11.Text = ""
        TextBox12.Text = ""
        TextBox13.Text = ""
        TextBox14.Text = ""
        TextBox15.Text = ""
        TextBox16.Text = ""
        TextBox17.Text = ""
        TextBox18.Text = ""
        TextBox19.Text = ""
        TextBox20.Text = ""
        TextBox21.Text = ""
        TextBox22.Text = ""
        TextBox23.Text = ""
        TextBox1.Focus()