lunes, 22 de abril de 2013

Devolución de Vueltos En Visual Basic




using System;
using System.Collections.Generic;
using System.ComponentModel;
using System.Data;
using System.Drawing;
using System.Linq;
using System.Text;
using System.Windows.Forms;

namespace WindowsFormsApplication1
{
    public partial class Form5 : Form
    {
        public Form5()
        {
            InitializeComponent();
        }

        private void button1_Click(object sender, EventArgs e)
        {
            double monto, cant, cambio, x;
            int d20=0, d10=0, d5=0, d1=0, m50=0, m25=0, m10=0, m5=0, m1=0;
            monto = Convert.ToDouble(textBox1.Text);
            cant = Convert.ToDouble(textBox2.Text);
            cambio = cant - monto;
            x = cambio;
            label12.Text = Convert.ToString(x);
            
            //do
            //{
                while (x >= 20)
                {
                    d20 = d20 + 1;
                    x = x - 20.00;
                }
                while (x >= 10)
                {
                    d10 = d10 + 1;
                    x = x - 10.00;
                }
                while (x >= 5)
                {
                    d5 = d5 + 1;
                    x = x - 5.00;
                }
                while (x >= 1)
                {
                    d1 = d1 +1;
                    x = x - 1.00;
                }
                while (x >= 0.50)
                {
                    m50 = m50 + 1;
                    x = x - 0.50;
                }
                while (x >= 0.25)
                {
                    m25 = m25 + 1;
                    x = x - 0.25;
                }
                while (x >= 0.10)
                {
                    m10 = m10 + 1;
                    x = x - 0.10;
                }
                while (x >= 0.05)
                {
                    m5 = m5 + 1;
                    x = x - 0.05;
                }
                x = Convert.ToDouble(System.Math.Round(Convert.ToDecimal(x), 2));
                while (x >= 0.01)
                {
                    m1 = m1 + 1;
                    x = x - 0.01;
                    x = Convert.ToDouble(System.Math.Round(Convert.ToDecimal(x), 2));
                }
                

            //}
            //while (x > 0);

            label3.Text = Convert.ToString(d20);
            label4.Text = Convert.ToString(d10);
            label5.Text = Convert.ToString(d5);
            label6.Text = Convert.ToString(d1);
            label7.Text = Convert.ToString(m50);
            label8.Text = Convert.ToString(m25);
            label9.Text = Convert.ToString(m10);
            label10.Text = Convert.ToString(m5);
            label11.Text = Convert.ToString(m1);

            label12.Text = Convert.ToString(x);
        }

        private void Form5_Load(object sender, EventArgs e)
        {

        }

    }
}

No hay comentarios.:

Publicar un comentario