Top Ad unit 728 × 90

Recientes

recent

if else Estructura Condicional Doble - Programación Visual Basic. Net con Visual Studio 2013 (6-32)

Curso tutorial completo de Visual Basic.Net , algoritmos y programación en Visual Basic .Net utilizando Microsoft Visual Studio, en este Artículo se explica las estructuras condicionales dobles con la estructura If else en Visual Basic.Net con Microsoft Visual Studio.
Desarrollaremos un ejemplo para calcular el área y perímetro de un cuadrilátero además determinar si es un cuadrado o un rectángulo.

Pueden consultar toda la documentación respectiva (Diapositiva, textos, videos, códigos, fuentes, librerías,etc,) de este conjunto de 32 posts.

Pueden ver los vídeos directamente en youtube:

https://www.youtube.com/watch?v=DgR922BxK3s&list=PLZPrWDz1MoloGD4irFB-YMIKvUYNu1i3m&index=6

Visita nuestro canal en youtube y revisa cursos de Desarrollo de software y aprende a diseñar sistemas informáticos totalmente gratis:

www.youtube.com/jcarlosad7

Estructuras Condicionales IF – Else

Evalúa una expresión lógica (Condición), si es verdadero el resultado ejecuta una determinada instrucción o instrucciones; y si es falso ejecuta otro grupo de Instrucciones.


Problema 4:  Promedio

Hacer un programa que permita ingresar tres notas para un alumno, la nota A que tiene una importancia de 3 créditos, la nota B tiene 4 Créditos, y la nota C tiene sólo 2 créditos; se debe de calcular el promedio teniendo en cuenta las notas y al final si el alumno tiene un promedio igual o mayor a 10.5 mostrar “Aprobado”, en caso contrario “Desaprobado”.


Diagrama de Flujo

Código Botón btncalcular

Private Sub btncalcular_Click(sender As Object, e As EventArgs) Handles btncalcular.Click
        'Declaración de Variables
        Dim notaa As Byte, notab As Byte, notac As Byte
        Dim prom As Single
        Dim situacion As String
        'Entrada de Datos
        notaa = Val(txtnotaa.Text)
        notab = Val(txtnotab.Text)
        notac = Val(txtnotac.Text)
        'Proceso
        prom = (notaa * 3 + notab * 4 + notac * 2) / 9
        'Evaluamos la condición
        If (prom >= 10.5) Then
            situacion = "Aprobado"
        Else
            situacion = "Desaprobado"
        End If
        'Salida de Información
        txtpromedio.Text = prom
        txtsituacion.Text = situacion
    End Sub

 Código del Botón btnsalir

    Private Sub btnsalir_Click(sender As Object, e As EventArgs) Handles btnsalir.Click
        End
    End Sub

Código Botón btnnuevo

    Private Sub btnnuevo_Click(sender As Object, e As EventArgs) Handles btnnuevo.Click
        txtnotaa.Clear()
        txtnotab.Clear()
        txtnotac.Clear()
        txtpromedio.Clear()
        txtsituacion.Clear()
    End Sub

if else Estructura Condicional Doble (6-32) Programación Visual Basic. Net con Visual Studio 2013




Saludos Imperio, un abrazo a la distancia!!!
if else Estructura Condicional Doble - Programación Visual Basic. Net con Visual Studio 2013 (6-32) Reviewed by Liliana Nataly Arcila Diaz on 19:12 Rating: 5

No hay comentarios:

All Rights Reserved by www.IncanatoIT.com - Desarrollando Software © 2014 - 2015
Powered By Blogger, Designed by Sweetheme

Formulario de contacto

Nombre

Correo electrónico *

Mensaje *

IncanatoIt.com. Con la tecnología de Blogger.