elhacker.net cabecera Bienvenido(a), Visitante. Por favor Ingresar o Registrarse
¿Perdiste tu email de activación?.

 

 


Tema destacado: Usando Git para manipular el directorio de trabajo, el índice y commits (segunda parte)


+  Foro de elhacker.net
|-+  Programación
| |-+  Programación General
| | |-+  .NET (C#, VB.NET, ASP) (Moderador: kub0x)
| | | |-+  ayuda con visual basic URGENTE!!
0 Usuarios y 1 Visitante están viendo este tema.
Páginas: [1] Ir Abajo Respuesta Imprimir
Autor Tema: ayuda con visual basic URGENTE!!  (Leído 3,186 veces)
flames_trooper

Desconectado Desconectado

Mensajes: 2


Ver Perfil
ayuda con visual basic URGENTE!!
« en: 3 Octubre 2014, 17:25 pm »

Bueno el tema es simple , me mandaron este trabajo con nota...... no entiendo como se hace:
EJERCICIOS

I. Usaremos algunos controles nuevos.

a. Abrir VS 2010

b. Crear nuevo proyecto para Windows

c. De al proyecto un nombre apropiado.

d. En el Form1 pondrá un componente TabControl. Deberá ocupar casi

todo el formulario con él. Este se encuentra en la pestaña contenedores

del cuadro de herramientas. Veamos ahora las propiedades que

modificaremos

CONTROL PROPIEDAD VALOR

TabControl TabPages Presionar sobre los 3 puntos

TabPage1 Name tpAgregar

TabPage1 Text Agregar

TabPage1 ToolTipText Nuevo Alumno

TabPage2 Name tpNotas

TabPage2 Text Notas

TabPage2 ToolTipText Notas Alumno

En tpAgregar

Label1 Text Alumno

TextBox1 Name txtAlumno

TextBox1 MaxLength 35

Label2 Text Carrera

ComboBox1 Name cmbCarrera

ComboBox1 Items Tecnología Informática m/Redes

Label3 Text Asignatura

ComboBox2 Name cmbAsignatura

ComboBox2 Items Intro Sist Computacionales

Label4 Text Ingreso

DateTimerPicker Name dtpIngreso

DateTimerPicker Format Short

Button1 Name btnAgregar

Button1 Text Agregar

En tpNotas

Lable1 Name lblNombres

Lable1 BordeStyle FixedSingle

Label1 Text Alumno:

Lable2 Text N1:

Label3 Text N2:

Label4 Text N3

Label5 Text Promedio:

Textbox1 Name txtN1

Textbox2 Name txtN2

Textbox3 Name txtN3

Textbox4 Name txtProm

Textbox4 Enable False

TextBox1,2,3 MaxLength 3

Tecnología Informática m/Desarrollo

Algoritmo y Programación

Matemáticas I

RadioButton1 Name rdbEximido

RadioButton1 Text Eximido

RadioButton2 Name rdbExamen

RadioButton2 Text Examen

Button1 Name btnBuscar

Button1 Text Buscar

e. Agregamos un nuevo componente al proyecto. Una clase llamada

alumno. En esa clase declarará lo siguiente

Public Structure alumnos

 Dim nombres As String

 Dim asignatura As String

 Dim carrera As String

 Dim ingreso As Date

 Dim n1, n2, n3, prom As Double

 End Structure

 Public alum(5) As alumnos

f. En btnAgregar. Declare previamente la variable entera i y cree una

instancia de la clase alumno.

i = i + 1

 If i < 6 Then

 alu.alum(i).nombres = txtAlumno.Text

 alu.alum(i).carrera = cmbCarrera.SelectedItem

 alu.alum(i).asignatura = cmbAsignatura.SelectedItem

 alu.alum(i).ingreso = dtpIngreso.Text

 txtAlumno.Text = ""

 cmbCarrera.Text = ""

 cmbAsignatura.Text = ""

 txtAlumno.Focus()

 Else

 btnAgregar.Enabled = False

 End If

g. En el evento Click de btnBuscar programe. Declare previamente resp del

tipo string

resp = InputBox("Alumno: ", "Ingrese nombre del alumno")

 For i = 1 To 5

 If resp = alu.alum(i).nombres Then

 

lbnNombre.Text = lbnNombre.Text & " " & alu.alum(i).nombres

 End If

 Next

h. En el evento LostFocus de txtN1 programe

If Len(txtN1.Text) = 2 Then

txtN1.Text = Mid(txtN1.Text, 1, 1) & "," &

 Mid(txtN1.Text, 2, 1)

 Else

 txtN1.Text = Mid(txtN1.Text, 1, 1) & "," & Mid(txtN1.Text,

3, 1)

 End If

 End If

Mid(txtN3.Text, 2, 1)

Val(txtN3.Text)) / 3

 Else

Mid(txtN3.Text, 3, 1)

Val(txtN3.Text)) / 3

 End If

i. En el evento LostFocus de txtN2 programe

If Len(txtN2.Text) = 2 Then

Else

Mid(txtN2.Text, 3, 1)

j. En el evento LostFocus de txtN3 programe

Dim prom As Double

If Len(txtN3.Text) = 2 Then

 txtN3.Text = Mid(txtN3.Text, 1, 1) & "," &

 prom = (Val(txtN1.Text) + Val(txtN2.Text) +

 txtProm.Text = Format(prom, "##,##0.0")

 txtN3.Text = Mid(txtN3.Text, 1, 1) & "," &

 prom = (Val(txtN1.Text) + Val(txtN2.Text) +

 txtProm.Text = Format(prom, "##,##0.0")

k. En el evento TextChanged de txtProm programe

If Val(txtProm.Text) >= 5.5 Then

txtN2.Text = Mid(txtN2.Text, 1, 1) & "," &

Mid(txtN2.Text, 2, 1)

txtN2.Text = Mid(txtN2.Text, 1, 1) & "," &

 rdbEximido.Checked = True

 Else

 rdbExamen.Checked = True

 End If

l. l.Mejore los siguientes aspectos:

i. En la caja de texto txtAlumno no se permiten números

iii. En las cajas de texto para notas sólo se deben permitir

iv. Se debe chequear que al ingresar una nota por ejemplo 6

v. No se puede permitir el ingreso de notas bajo 1 y sobre 7

vi. Implemente, en la clase alumno, un procedimiento que

ii.Todos los datos son obligatorios. No pueden haber datos en

blanco.

números entre 0 y 9. Además del carácter “coma (,)”

se debe agregar ,0. Es decir, la nota quedaría 6,0

permita guardar las notas ingresadas para el alumno en tpNotas


En línea

El Benjo


Desconectado Desconectado

Mensajes: 392



Ver Perfil WWW
Re: ayuda con visual basic URGENTE!!
« Respuesta #1 en: 3 Octubre 2014, 20:33 pm »

Primera: aquí no se resuelven los trabajos escolares de nadie. Se supone que estás estudiando la carrera para aprender así que aprende.

Segundo: el ejercicio ya te lo dieron resuelto, no sé qué más esperas.


En línea

www.es.neftis-ai.com

Sí hay un mejor lenguaje de programación y es ese con el que puedes desarrollar tus objetivos.
Eleкtro
Ex-Staff
*
Desconectado Desconectado

Mensajes: 9.885



Ver Perfil
Re: ayuda con visual basic URGENTE!!
« Respuesta #2 en: 3 Octubre 2014, 22:59 pm »

Además de lo comentado por el compañero @El Benjo:


1) los códigos deben ir en dentro de su respectiva etiqueta, debes respetar las normas del foro.

2) Los títulos deben ser descriptivos, está pohibido los títulos de tipo "Ayuda urgente"

3) Las dudas de VisualBasic.Net se deben publicar en la sección de programación .Net


En serio, ¿te parece correcto postear de la forma que lo has echo?, no suelo cerrar un post porque alguien se salte alguna norma, pero este post lo tiene todo, podrías haber editado un poco el formato de tu publicación para que se pueda leer y entender, como mínimo.



En los ejercicios te están explicando paso a paso lo que debes hacer, como hacerlo, y el código para hacerlo, literalmente te muestran las instrucciones que debes añadir al código, ¿que es lo que no entiendes?.

Además, donde realmente podrías requerir ayuda de algún tipo has escrito las frases cortadas, y no se entiende nada:

l. l.Mejore los siguientes aspectos:

iii. En las cajas de texto para notas sólo se deben permitir

vi. Implemente, en la clase alumno, un procedimiento que

ii.Todos los datos son obligatorios. No pueden haber datos en


Te invito a que publiques un nuevo post con el formato correcto, y para formular una duda concreta y específica o también para pedir orientación, ya que como han dicho aquí no le hacemos el trabajo sucio a nadie, te ayudamos y te indicamos los pasos a seguir para que puedas hacerlo por ti mismo.

Tema Cerrado

Saludos!
« Última modificación: 3 Octubre 2014, 23:15 pm por Eleкtro » En línea



Páginas: [1] Ir Arriba Respuesta Imprimir 

Ir a:  

WAP2 - Aviso Legal - Powered by SMF 1.1.21 | SMF © 2006-2008, Simple Machines