Scribd
Upload
77 views10 pages

Acarreo: Using Using Using Using Using Using Using Using Using Namespace Public Partial Class Public

This document contains code for a Windows Forms application in C# for mining activities. It includes classes for various forms like the login screen, main menu, and forms for processes like drilling, blasting, loading, hauling, and cost calculations. The code sets up the user interface elements and includes event handler methods for buttons to navigate between forms.

Uploaded by

ZWilfredo Gonzales
Copyright
© © All Rights Reserved
We take content rights seriously. If you suspect this is your content, claim it here.
Available Formats
Download as DOCX, PDF, TXT or read online on Scribd
77 views10 pages

Acarreo: Using Using Using Using Using Using Using Using Using Namespace Public Partial Class Public

This document contains code for a Windows Forms application in C# for mining activities. It includes classes for various forms like the login screen, main menu, and forms for processes like drilling, blasting, loading, hauling, and cost calculations. The code sets up the user interface elements and includes event handler methods for buttons to navigate between forms.

Uploaded by

ZWilfredo Gonzales
Copyright
© © All Rights Reserved
We take content rights seriously. If you suspect this is your content, claim it here.
Available Formats
Download as DOCX, PDF, TXT or read online on Scribd
You are on page 1/ 10

ACARREO

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

namespace MIneria_Superficial
{
public partial class Acarreo : Form
{
public Acarreo()
{
InitializeComponent();
}
double Camion = 0.0, nop = 0.0, suop = 0.0, ng = 0.0, costg = 0.0, sueldoop
= 0.0, costac = 0.0, gastcomb = 0.0;

private void Acarreo_Load(object sender, EventArgs e)


{

private void btnVprinc_Click(object sender, EventArgs e)


{
PantallaPrincipal pp = new PantallaPrincipal();
pp.Show();
this.Hide();
}

private void btnCalc_Click(object sender, EventArgs e)


{
if (txtCostoGal.Text == "" || txtNgalCOm.Text == "" || txtNumHaulp.Text
== ""
|| txtNumTrab.Text == "" || txtSueldOp.Text == "")
MessageBox.Show("No deje campos vacíos");
else
{
Camion = Convert.ToDouble(txtNumHaulp.Text);
nop = Convert.ToDouble(txtNumTrab.Text);
suop = Convert.ToDouble(txtSueldOp.Text);

sueldoop = nop * suop;


txtSuelPersonal.Text = Math.Round(sueldoop,2).ToString();

ng = Convert.ToDouble(txtNgalCOm.Text);
costg = Convert.ToDouble(txtCostoGal.Text);
txtGastCombs.Text = (ng * costg).ToString();

costac = sueldoop + ng * costg;

txtCostoAcarr.Text = Math.Round(costac,2).ToString();
}
}

private void btnVprinc_Click_1(object sender, EventArgs e)


{
PantallaPrincipal pp = new PantallaPrincipal();
pp.Show();
this.Hide();
}
}
}

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

namespace MIneria_Superficial
{
public partial class Carguio : Form
{
public Carguio()
{
InitializeComponent();
}
double ng = 0.0, costgal = 0.0, costcomb = 0.0, ntrab = 0.0, sueldo = 0.0,
palas = 0.0, costocar = 0.0;
private void btnVprinc_Click(object sender, EventArgs e)
{
PantallaPrincipal pp = new PantallaPrincipal();
pp.Show();
this.Hide();
}

private void btnCalc_Click(object sender, EventArgs e)


{
if (txtCostoGal.Text == "" || txtNgalCOm.Text == "" ||
txtNumPal.Text == "" || txtNumTrab.Text == "" || txtSueldOp.Text ==
"")
MessageBox.Show("No deje campos vacíos");
else
{
ng = Convert.ToDouble(txtNumTrab.Text);
costgal = Convert.ToDouble(txtCostoGal.Text);
costcomb = ng * costgal;
txtGastCombs.Text = costcomb.ToString();
ntrab = Convert.ToDouble(txtNumTrab.Text);
sueldo = Convert.ToDouble(txtSueldOp.Text);
palas = Convert.ToDouble(txtNumPal.Text);

costocar = costcomb + ntrab * sueldo;


txtCostoCarg.Text = Math.Round(costocar,2).ToString();
}
}

}
}

COSTO DE PRODUCCION
using System;
using System.Collections.Generic;
using System.ComponentModel;
using System.Data;
using System.Drawing;
using System.Linq;
using System.Text;
using System.Threading.Tasks;
using System.Windows.Forms;

namespace MIneria_Superficial
{
public partial class Costo_de_Producción_y_Ganancia_Total : Form
{
public Costo_de_Producción_y_Ganancia_Total()
{
InitializeComponent();
}
double ton = 0.0, ley = 0.0, ponza = 0.0, cospq = 0.0, ncol = 0.0, sueldodia
= 0.0, inpro=0.0,
qoro = 0.0, onzoro = 0.0, supers = 0.0, costmin = 0.0, ganan = 0.0,
nonzas = 0.0;
private void btnVprinc_Click(object sender, EventArgs e)
{
PantallaPrincipal pp = new PantallaPrincipal();
pp.Show();
this.Hide();
}

private void btnCalc_Click(object sender, EventArgs e)


{
if (txtNumColab.Text == "" || txtSueldDi.Text == "" || txtTon.Text == ""
|| txtLey.Text == "" ||
txtCostPQ.Text == "" || txtPonza.Text == "")
MessageBox.Show("No deje campos vacíos antes del boton calcular");
else
{
ton = Convert.ToDouble(txtTon.Text);
ley = Convert.ToDouble(txtLey.Text);
ponza = Convert.ToDouble(txtPonza.Text);
cospq = Convert.ToDouble(txtCostPQ.Text);
ncol = Convert.ToDouble(txtNumColab.Text);
sueldodia = Convert.ToDouble(txtSueldDi.Text);

supers = ncol * sueldodia;


txtSpersonal.Text = Math.Round(supers, 2).ToString();

qoro = ton * ley;


txtCantOro.Text = Math.Round(qoro, 2).ToString();

onzoro = qoro * (1 / 28.35);


txtOnzoro.Text = Math.Round(onzoro, 2).ToString();

nonzas = Convert.ToDouble(txtOnzoro.Text);
costmin = nonzas * ponza;
txtCostMin.Text = Math.Round(costmin, 2).ToString();

inpro = supers + cospq;


ganan = costmin - inpro;
txtGanancia.Text = Math.Round(ganan, 2).ToString();
}
}
}
}

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

namespace MIneria_Superficial
{
public partial class Integrantes : Form
{
public Integrantes()
{
InitializeComponent();
}

private void Integrantes_Load(object sender, EventArgs e)


{
btnNext.Focus();
}

private void btnNext_Click(object sender, EventArgs e)


{
PantallaPrincipal pp = new PantallaPrincipal();
pp.Show();
this.Hide();
}

private void textBox1_TextChanged(object sender, EventArgs e)


{

private void textBox2_TextChanged(object sender, EventArgs e)


{

private void label2_Click(object sender, EventArgs e)


{

}
}
}

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

namespace MIneria_Superficial
{
public partial class Login : Form
{
public Login()
{
InitializeComponent();
}
string user = "MINAS", pass = "2018";
private void Login_Load(object sender, EventArgs e)
{
txtUser.Focus();
this.btnIngresa.DialogResult = System.Windows.Forms.DialogResult.Yes;
}

private void btnIngresa_Click(object sender, EventArgs e)


{
if (txtUser.Text == user && txtPass.Text == pass)
{
Integrantes integra = new Integrantes();
integra.Show();
this.Hide();
}
else
MessageBox.Show("Datos Incorrectos Intente Nuevamente!");
}

private void btnLimpia_Click(object sender, EventArgs e)


{
txtPass.Text = "";
txtUser.Text = "";
}

private void btnCancela_Click(object sender, EventArgs e)


{
this.Close();
}

private void txtUser_TextChanged(object sender, EventArgs e)


{

private void pictureBox1_Click(object sender, EventArgs e)


{

}
}
}

PANTALLA PRINCIPAL
using System;
using System.Collections.Generic;
using System.ComponentModel;
using System.Data;
using System.Drawing;
using System.Linq;
using System.Text;
using System.Threading.Tasks;
using System.Windows.Forms;

namespace MIneria_Superficial
{
public partial class PantallaPrincipal : Form
{
public PantallaPrincipal()
{
InitializeComponent();
}

private void btnPerf_Click(object sender, EventArgs e)


{
Perforacion per = new Perforacion();
per.Show();
this.Hide();
}

private void btnVolad_Click(object sender, EventArgs e)


{
Voladura vola = new Voladura();
vola.Show();
this.Hide();
}

private void btnCarg_Click(object sender, EventArgs e)


{
Carguio carg = new Carguio();
carg.Show();
this.Hide();
}

private void btnAcarr_Click(object sender, EventArgs e)


{
Acarreo ac = new Acarreo();
ac.Show();
this.Hide();
}

private void btnCostPGT_Click(object sender, EventArgs e)


{
Costo_de_Producción_y_Ganancia_Total cpgt = new
Costo_de_Producción_y_Ganancia_Total();
cpgt.Show();
this.Hide();
}

private void btnExit_Click(object sender, EventArgs e)


{
this.Close();
}
}
}

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

namespace MIneria_Superficial
{
public partial class Perforacion : Form
{
TextBox[,] ct_A;
TextBox[,] ct_B;
TextBox[,] ct_C;
public Perforacion()
{
InitializeComponent();
ct_A = new TextBox[3, 1] {
{txtNumOp,},
{txtNumPerf},
{txtNumTal}
};
ct_B = new TextBox[3, 1] { {txtSuelOp}, { txtGastPerf}, { txtGastTal} };
ct_C = new TextBox[3, 1] { { gaop}, { gaper}, {gatal} };
}

private void button2_Click(object sender, EventArgs e)


{
Int32[,] A = new Int32[3, 1];
Int32[,] B = new Int32[3, 1];
Int32[,] C = new Int32[3, 1];

int i, j;

//Lectura de la Matriz A
for (i = 0; i < 3; i++)
for (j = 0; j < 1; j++)
A[i, j] = Convert.ToInt32(ct_A[i, j].Text);

//Lectura de la Matriz B
for (i = 0; i < 3; i++)
for (j = 0; j < 1; j++)
B[i, j] = Convert.ToInt32(ct_B[i, j].Text);

//calculando la multiplicacion de A*B


for (i = 0; i < 3; i++)
for (j = 0; j < 1; j++)
C[i, j] = A[i, j] * B[i, j];

//Mostranso resultado de la multiplicacion


for (i = 0; i < 3; i++)
for (j = 0; j < 1; j++)
ct_C[i, j].Text = C[i, j].ToString();
}

private void button1_Click(object sender, EventArgs e)


{
double n1, n2, n3,st;
n1 = Convert.ToDouble(gaop.Text);
n2 = Convert.ToDouble(gaper.Text);
n3 = Convert.ToDouble(gatal.Text);
st=n1+n2+n3;
textBox1.Text = st.ToString();
}

private void button3_Click(object sender, EventArgs e)


{
PantallaPrincipal pp = new PantallaPrincipal();
pp.Show();
this.Hide();
}
}
}
VOLADURA
using System;
using System.Collections.Generic;
using System.ComponentModel;
using System.Data;
using System.Drawing;
using System.Linq;
using System.Text;
using System.Threading.Tasks;
using System.Windows.Forms;

namespace MIneria_Superficial
{
public partial class Voladura : Form
{
public Voladura()
{
InitializeComponent();
}

private void btnVprinc_Click(object sender, EventArgs e)


{
PantallaPrincipal pp = new PantallaPrincipal();
pp.Show();
this.Hide();
}

private void btnCalc_Click(object sender, EventArgs e)


{
double ntrab = 0.0, sdiario = 0.0, explo = 0.0, fulmin = 0.0, mechSeg =
0.0, spersonal = 0.0,
subtotal = 0.0, igv = 0.0;
if (txtFulminantes.Text == "" || txtTrabaj.Text == "" || txtSuelDia.Text
== ""
|| txtMseg80.Text == "" || txtExplosiv.Text == "")
MessageBox.Show("Llene todos lo campos que tienen *");
else
{
ntrab = Convert.ToDouble(txtTrabaj.Text);
sdiario = Convert.ToDouble(txtSuelDia.Text);
explo = Convert.ToDouble(txtExplosiv.Text) * 30;
fulmin = Convert.ToDouble(txtFulminantes.Text);
mechSeg = Convert.ToDouble(txtMseg80.Text) * 0.80;
spersonal = ntrab * sdiario;
subtotal = (explo + fulmin + mechSeg);
igv = ((explo + fulmin + mechSeg) * 0.18);

txtSueldPers.Text = Math.Round(spersonal, 2).ToString();


txtSubt.Text = subtotal.ToString();
txtIGV.Text = igv.ToString();
txtCostoAcc.Text = Math.Round((subtotal + igv), 2).ToString();
txtCostoVol.Text = Math.Round((subtotal + igv + spersonal),
2).ToString();
}
}
private void button1_Click(object sender, EventArgs e)
{

txtFulminantes.Text = "";
txtTrabaj.Text = "";
txtSuelDia.Text = "";
txtMseg80.Text ="";
txtExplosiv.Text = "";
txtSueldPers.Text = "";
txtSubt.Text = "";
txtIGV.Text = "";
txtCostoAcc.Text = "";
txtCostoVol.Text = "";
}

private void Voladura_Load(object sender, EventArgs e)


{

}
}
}

You might also like