ESCUELA INDUSTRIAL Y PREPARATORIA TÉCNICA ALVARO OBREGÓN.
Enviado por juanskills00 • 10 de Septiembre de 2016 • Apuntes • 1.079 Palabras (5 Páginas) • 171 Visitas
[pic 1][pic 2]UNIVERSIDAD AUTONOMA DE NUEVO LEÓN
ESCUELA INDUSTRIAL Y PREPARATORIA TÉCNICA ALVARO OBREGÓN
ACTIVIDAD NUMERO 1
Practica 1 (A1) Elaborar un programa en donde muestre un mensaje que indique si una persona es hombre o mujer, al capturar se sexo.
Maestra: Maria Ines Franco Torres
Nombre del alumno: Juan Ángel Salazar Ríos
Matrícula: 1815196
Grupo: 3L1 Aula: 129M
Unidad de Aprendizaje: Introducción a la programación
Especialidad: TIC_EPW
Lugar y fecha: Monterrey, N.L a 15 de agosto de 2016
[pic 3]Interfaz grafica
Tabla de propiedades
Objeto | Propiedades | Valor |
Label1 | Name Text | Lbltitulo Programa para verificar sexo |
Label2 | Name Text | Lblsexo Introduce tu sexo |
Textbox1 | Name ReadOnly | Txtsexo True |
Button1 | Name Text | Btnverificar Verificar |
Button2 | Name Text | Btnlimpiar Limpiar |
Button3 | Name Text | btnSalir Salir |
Frm1 | Name Text | Frmsexo Verificar el sexo |
Codigo
Public Class frmsexo
Private Sub btnverificar_Click(sender As Object, e As EventArgs) Handles btnverificar.Click
Dim sexo As String
sexo = Val(txtsexo.Text)
sexo = InputBox("Ingrese su sexo", "Verificar sexo")
txtsexo.Text = sexo
If sexo = "Masculino" Then
MessageBox.Show("Tu eres un hombre", "Captura de sexualidad", MessageBoxButtons.OKCancel, MessageBoxIcon.Information)
Else
MessageBox.Show("Tu eres una mujer", "Captura de sexualidad", MessageBoxButtons.OKCancel, MessageBoxIcon.Information)
End If
End Sub
Private Sub btnlimpiar_Click(sender As Object, e As EventArgs) Handles btnlimpiar.Click
txtsexo.Text = ""
End Sub
Private Sub btnsalir_Click(sender As Object, e As EventArgs) Handles btnsalir.Click
End
End Sub
End Class
[pic 4]Prueba de escritorio
[pic 5][pic 6]UNIVERSIDAD AUTONOMA DE NUEVO LEÓN
ESCUELA INDUSTRIAL Y PREPARATORIA TÉCNICA ALVARO OBREGÓN
ACTIVIDAD NUMERO 2
Practica 2 (A5). Elaborar un programa donde capture a través de inputbox los datos de un alumno como son matricula, nombre, grupo y las calificaciones de 3 evaluaciones, estos datos se mostraran en sus correspondientes textbox. Se debera calcular el promerio y mostrar mediante un msgbox si el alumno aprobo o reprobo la unidad de aprendizaje.
Maestra: Maria Ines Franco Torres
Nombre del alumno: Juan Ángel Salazar Ríos
Matrícula: 1815196
Grupo: 3L1 Aula: 129M
Unidad de Aprendizaje: Introducción a la programación
Especialidad: TIC_EPW
Lugar y fecha: Monterrey, N.L a 15 de agosto de 2016
Interfaz gráfica
[pic 7]
Tabla de propiedades
Objeto | Valor | Propiedad |
Label1 | Name Text | Lblnombre Nombre del alumno |
Label2 | Name Text | Lblgrupo Grupo |
Label3 | Name Text | Lblmatricula Matricula |
Label4 | Name Text | Lblcal1 Calificacion 1 |
Label5 | Name Text | Lblcal2 Calificacion 2 |
Label6 | Name Text | Lblcal3 Calificacion 3 |
Label7 | Name Text | Lblprom Promedio |
Textbox1 | Name | Txtnombre |
Textbox2 | Name | Txtgrupo |
Textbox3 | Name | Txtmatricula |
Textbox4 | Name | Txtcal1 |
Textbox5 | Name | Txtcal2 |
Textbox6 | Name | Txtcal3 |
Textbox7 | Name | Txtprom |
Button1 | Name Text | Btncapturar Capturar calificaciones |
Button2 | Name Text | Btnlimpiar Limpiar |
Button3 | Name Text | Btnsalir Salir |
Frm1 | Name Text | Frmpromedio Promedio de tres calificaciones |
...