UNIVERSIDAD TECNOLÓGICA DE
PANAMÁ
CENTRO REGIONAL UNIVERSITARIO DE AZUERO
FACULTAD DE INGENIERÍA CIVIL
PROYECTO SEMESTRAL SE PROGRAMACIÓN
INTEGRANTES
Lineth Canto
José Frías
Oliver Samaniego
Yaribeth Quiroz
DOCENTE
Marcela Boyd de Cohen
ÍNDICE
INTRODUCCIÓN.............................................................................................................................3
DEFINICIÓN DE VARIABLES......................................................................................................4
EXPLICACIÓN.................................................................................................................................7
PROGRAMA EN EJECUCIÓN.......................................................................................................8
CONCLUSIONES...........................................................................................................................10
BIBLIOGRAFÍAS...........................................................................................................................11
INTRODUCCIÓN
Este proyecto intenta aplicar los conceptos y principios básicos aprendidos a lo largo del
curso de Programación, utilizando la herramienta Visual Studio .NET, para desarrollar un
programa que permita colocar ciertos datos, como el nombre, salario o departamento de
trabajo de “n” trabajadores.
Visual Studio .NET es un conjunto completo de herramientas de desarrollo para la
construcción de aplicaciones Web ASP, servicios Web XML, aplicaciones para escritorio y
aplicaciones móviles. Visual Basic .NET, Visual C++ .NET, Visual C# .NET y Visual
J# .NET utilizan el mismo entorno de desarrollo integrado (IDE), que les permite compartir
herramientas y facilita la creación de soluciones en varios lenguajes. Asimismo, dichos
lenguajes aprovechan las funciones de .NET Framework, que ofrece acceso a tecnologías
clave para simplificar el desarrollo de aplicaciones Web ASP y servicios Web XM
DEFINICIÓN DE VARIABLES
Public Class form1
Private Sub Form1_Load(sender As Object, e As EventArgs) Handles [Link]
End Sub
Private Sub Timer1_Tick(sender As Object, e As EventArgs) Handles [Link]
[Link]()
'[Link]()'
End Sub
Private Sub Label11_Click(sender As Object, e As EventArgs) Handles [Link]
End Sub
End Class
Public Class Formulario2
Private Sub DataGridView1_CellContentClick(sender As Object, e As DataGridViewCellEventArgs) Handles
[Link]
End Sub
Private Sub Button2_Click(sender As Object, e As EventArgs) Handles [Link]
'Aqui se crea un boton de limpiar'
[Link] = ""
[Link] = ("")
[Link] = ""
[Link] = ""
End Sub
Private Sub Button1_Click(sender As Object, e As EventArgs) Handles [Link]
'aqui estan las definicion de variables y todo lo demas
Dim cantfilas As Integer
Dim Elija As String
Dim CALCULOr, CALCULO As Integer
CALCULO = Val([Link])
'aqui empieza a verificar si el chechkbox esta marcado
If [Link] = True Then
CALCULO = (5 * CALCULO) / 100
Dim cont, totalinge, totalinge2 As Integer
'aqui empieza a verificar que se selecciono del combo box
If [Link] = "INGENIERIA" Then
Dim total1, total2 As Integer
Dim sumatoria As Integer = 0
sumatoria = Val([Link])
For Each row As DataGridViewRow In [Link]
sumatoria += Convert.ToInt32([Link]("Column6").Value)
Next
total2 = total1 + total2
[Link]([Link], [Link], [Link], [Link], CALCULO,
sumatoria)
End If
'aqui empezaria el de finanzas
If [Link] = "FINANZAS" Then
Dim total1, total2 As Integer
Dim sumatoria As Integer = 0
Dim sumatoria2 As Integer = 0
sumatoria2 = Val([Link])
For Each row As DataGridViewRow In [Link]
sumatoria2 += Convert.ToInt32([Link]("Column7").Value)
Next
total2 = total1 + total2
[Link]([Link], [Link], [Link], [Link], CALCULO,
sumatoria, sumatoria2)
End If
'aqui empieza el de recursos humanos
If [Link] = "RECURSOS HUMANOS" Then
Dim total1, total2 As Integer
Dim sumatoria As Integer = 0
Dim sumatoria2 As Integer = 0
Dim sumatoria3 As Integer = 0
sumatoria3 = Val([Link])
For Each row As DataGridViewRow In [Link]
sumatoria3 += Convert.ToInt32([Link]("Column8").Value)
Next
total2 = total1 + total2
[Link]([Link], [Link], [Link], [Link], CALCULO,
sumatoria, sumatoria2, sumatoria3)
End If
End If
'''''''''''''''''''''''''''''''''''''''''''''''''
'aqui empieza a verificar si el combobox en NO esta marcado
If [Link] = True Then
CALCULO = Val([Link])
Dim cont, totalinge, totalinge2 As Integer
If [Link] = "INGENIERIA" Then
Dim total1, total2 As Integer
Dim sumatoria As Integer = 0
sumatoria = Val([Link])
For Each row As DataGridViewRow In [Link]
sumatoria += Convert.ToInt32([Link]("Column6").Value)
Next
total2 = total1 + total2
[Link]([Link], [Link], [Link], [Link],
[Link], sumatoria)
End If
If [Link] = "FINANZAS" Then
Dim total1, total2 As Integer
Dim sumatoria As Integer = 0
Dim sumatoria2 As Integer = 0
sumatoria2 = Val([Link])
For Each row As DataGridViewRow In [Link]
sumatoria2 += Convert.ToInt32([Link]("Column7").Value)
Next
total2 = total1 + total2
[Link]([Link], [Link], [Link], [Link],
[Link], sumatoria, sumatoria2)
End If
If [Link] = "RECURSOS HUMANOS" Then
Dim total1, total2 As Integer
Dim sumatoria As Integer = 0
Dim sumatoria2 As Integer = 0
Dim sumatoria3 As Integer = 0
sumatoria3 = Val([Link])
For Each row As DataGridViewRow In [Link]
sumatoria3 += Convert.ToInt32([Link]("Column8").Value)
Next
total2 = total1 + total2
[Link]([Link], [Link], [Link], [Link],
[Link], sumatoria, sumatoria2, sumatoria3)
End If
End If
End Sub
End Class
EXPLICACIÓN
Para este proyecto, empezamos haciendo una pantalla de presentación, la cual debe obtener
la siguiente información:
UNIVERSIDAD TECNOLOGICA DE PANAMA
CENTRO REGIONAL DE AZUERO
FACULTAD DE INGENIERÍA CIVIL
CARRERA
MATERIA: PROGRAMACIÓN
PROFESORA: MARQUELA BOYD DE COHEN
INTEGRANTES
FECHA
Estos datos son presentados en label, los mismos se mostrarán durante 10 segundos, para
activar esta función se accede al área de componentes, luego a la función “Timer” y se
expresa el valor requerido en milisegundos.
Pasado el tiempo se debe mostrar el siguiente formulario, para este se nos presenta un
control DATAGRIDVIEW, en este se mostrará:
A) NOMBRE DEL TRABAJADOR.
B) DEPARTAMENTO.
C) SINDICALIZADO.
D) SALARIO.
E) CUOTA SINDICAL
En donde la columna para colocar el nombre de los trabajadores debe ser una celda que
contenga CHECKBOX, para indicar si el trabajador está o no sindicalizado, en el
formulario se presentará como “Sí” y como “No” para indicarlo con un gancho.
De igual manera agregamos un salario y en dado caso que el trabajador sí este sindicalizado
se calculará el 5% de su salario.
PROGRAMA EN EJECUCIÓN
CONCLUSIONES
El aprendizaje de la programación es un recurso importante que desarrolla habilidades las
cuales posteriormente nos podrían ser útiles en el campo laboral, este tipo de programas nos
ayudan a crear algoritmos de los cuales podemos obtener cálculos e información
rápidamente haciendo que algún tipo de trabajo asignado nos resulte más sencillo, en este
caso, por ejemplo, podemos calcular de forma rápida y sencilla el salario y cuota sindical
de cada trabajador dependiendo de su estatus (sindicalizado o no sindicalizado).
BIBLIOGRAFÍAS
Si... Entonces... Instrucción Else - Visual Basic | Documentos de Microsoft
Contadores y Acumuladores - Programación Visual Basic. Net con Visual Studio 2013 (14-25) -
[Link] - Desarrollando Software
Directorio de código del control DataGridView - Windows Forms .NET Framework | Microsoft Docs
[Link] (Propiedad) ([Link]) | Documentos de Microsoft
