Transcription
ESTRUCTURAS CONDICIONALESEN VISUAL BASICTECNOLOGÍA E INFORMÁTICAGRADO NOVENOCOLEGIO UPB2019ADRIANA LOMBANA
ESTRUCTURAS CONDICIONALES ENVISUAL BASIC DE ACCESS Las estructuras condicionales nos permiten ejecutar una seriede instrucciones;si cumple una determinada condición quenosotros le indiquemos, entonces se ejecuta una acción inicial, encaso contrario se ejecuta la acción siguiente.
ESTRUCTURA BÁSICA Si (condición) entonces Instrucción 1 Sino Instrucción 2 Fin si If (condición) then Instrucción 1 Else Instrucción 2 End If
Crear un algoritmo que calcule el valor de una compra y el total a pagar. Para ello tenga en cuenta la cantidad, el valorunitario. Si el valor de la compra es mayor de 100000 hágale un descuento del 10% sino no le haga descuentoSub valor compraDim cantidad As doubleDim valor uni As doubleDim valor compra As doubleDim Descuento As doubleDim Total pagar As doublecantidad inputBox (“Ingrese cantidad”)valor uni inputBox (“Ingrese el valor unitario “)valor compra cantidad * valor uniMsgbox “El Valor de la compra es “ & valor compraIf valor compra 100000 thenDescuento valor compra * 0.10Total pagar valor compra – DescuentoMsgBox “El descuento es “ & DescuentoMsgBox “El Total a pagar es “ & Total pagarElseDescuento 0Total pagar valor compra – DescuentoMsgBox “El descuento es “ & DescuentoMsgBox “El Total a pagar es “ & Total pagarEnd IfEnd sub
Crear un programa que ingrese la nota definitiva del área de Tecnología e Informática. Si la nota es mayor o igual a3.5 entonces debe aparecer un mensaje informando al estudiante que aprobó la materia sino, debe aparecer unmensaje que muestre que reprobó la materia.Sub DefinitivaDim nota definitiva As doublenota definitiva inputBox (“Ingrese su nota definitiva”)If nota definitiva 3.5 thenMsgBox “Usted aprobó la materia”ElseMsgBox “Usted no aprobó la materia”End IfEnd sub
Calcule el total que una persona debe pagar en una fábrica de llantas. El precio de cada llanta es de 80000 si se compranmenos de 5 llantas. Si se compran 5 o más llantas el precio es de 70000. El programa deberá mostrar el valor a pagar por lacompra de las llantas.Sub fabrica llantasConst precio1 As double 80000Const precio2 As double 70000Dim cantidad As doubleDim total pagar As doublecantidad InputBox (“Ingrese cantidad de llantas”)If cantidad 5 thenTotal pagar cantidad * precio2MsgBox “El total a pagar es “ & total pagarElseTotal pagar cantidad * precio1MsgBox “El total a pagar es “ & total pagarEnd IfEnd sub
ESTRUCTURAS CONDICIONALES EN VISUAL BASIC DE ACCESS Las estructuras condicionales nos permiten ejecutar una serie de instrucciones; si cumple una determinada condición que nosotros le indiquemos, entonces se ejecuta una acción inicial, en caso contrario se ejecuta la acción siguiente.
