miércoles, 10 de agosto de 2016

Preguntas Sobre Visual Basic

Taller  2.
Karina Quirós     10ºB       29-06-2016.
1.     ¿Cómo se da la asignación de valores en Visual Basic? Paso
2.     Estructura de programación en Visual Basic.
3.     ¿Cómo se realiza los ingresos de datos a través de controles en Visual Basic?
4.     ¿Cuál es la sintaxis de las siguientes estructuras de decisión: decisión simple, decisión múltiple?
5.     ¿Cuáles son los operadores básicos de Visual Basic?

R/1= Para efectuar cálculos y asignar el resultado a una variable, se utilizan instrucciones de asignación, como se muestra en el ejemplo siguiente.
VB
' The following statement assigns the value 10 to the variable.
applesSold = 10
' The following statement increments the variable.
applesSold = applesSold + 1
' The variable now holds the value 11.

R/2= Una estructura es una generalización del tipo definido por el usuario (UDT) admitido por versiones anteriores de Visual Basic.  Además de campos, las estructuras pueden exponer propiedades, métodos y eventos.  Una estructura puede implementar una o más interfaces, y se pueden declarar niveles de acceso individuales para cada campo.  
Para crear una estructura se pueden combinar elementos de datos de distintos tipos.  Una estructura asocia uno o más elementos entre ellos y con la propia estructura.  Al declarar una estructura, ésta se convierte en un tipo de datos compuesto y se pueden declarar variables de este tipo.  
Las estructuras son útiles si se desea que una única variable contenga varios datos relacionados.  Por ejemplo, quizás desee mantener juntos el nombre de un empleado, su extensión telefónica y su salario.  Podría utilizar varias variables para esta información, o bien definir una estructura y utilizarla para una única variable de empleado.  La ventaja de la estructura se hace evidente si tiene muchos empleados y, por consiguiente, muchas instancias de la variable.

R/3= En VBA podremos insertar datos utilizando el método InputBox que mostrará una ventana emergente a los usuarios para que puedan rellenar los datos. Si quieres mostrar la ventana para incluir los datos deberás utilizar un módulo del Editor de Visual Basic. 
R/4= Estructuras de decisión
-Decisión simple:
Las construcciones If...Then...Else permiten probar una o más condiciones y ejecutar una o más instrucciones en función de cada condición.  Puede probar las condiciones y tomar medidas de las maneras siguientes:  
·         Ejecutar una o más instrucciones si una condición es True.
·         Ejecutar una o más instrucciones si una condición es False.
·         Ejecutar algunas instrucciones si una condición es True y otras si es False.
·         Probar una condición adicional si una condición anterior es False.
La estructura de control que proporciona todas estas posibilidades es Instrucción If...Then...Else (Visual Basic).  Puede utilizar una versión de una línea si tiene simplemente una comprobación y una instrucción para ejecutar.  Si tiene un conjunto más complejo de condiciones y acciones, puede utilizar la versión de varias líneas.  

Sintaxis

' Multiple-line syntax:
If condition [ Then ]
    [ statements ]
[ ElseIf elseifcondition [ Then ]
    [ elseifstatements ] ]
[ Else
    [ elsestatements ] ]
End If

' Single-line syntax:
If condition Then [ statements ] [ Else [ elsestatements ] ]



-Decisión múltiple
La construcción Select...Case permite evaluar una expresión una vez y ejecutar distintos conjuntos de instrucciones basados en diferentes valores posibles.

Sintaxis                                                           
Select [ Case ] testexpression
    [ Case expressionlist
        [ statements ] ]
    [ Case Else
        [ elsestatements ] ]
End Select
R/5= Los operadores básicos aritméticos de Visual Basic son:

Operador
Operación
+
Suma
-
Resta
*
Multiplicación
/
División
^
Exponenciación

Comcatenación

Tarea de Declaración de Variables

Tarea de Declaración de Variables

1.    Que calcule el promedio de tres notas sumativas.
2.     Divida dos números enteros.
3.     Que calcule la temperatura en ºC.
4.     Que calcule el seguro social de una persona.

Desarrollo
1.     Dim A, B, C As float

2.     Dim J, K As Int

3.     ºC= F-32      ºC= k-273
Dim F As Float
Dim K As Float

4.     Dim RP As float
Dim CH As Int

Dim S As float

martes, 2 de agosto de 2016

Ejemplo de codificación. Parte 2.


Práctica

                    Declaración de variable, procesos, datos de entrada y salida en los siguientes ejemplos.

Ejemplo 1

D

Dim b, h As Double

Dim area As Integer 

P

b= TextBox1Text

h=TextBox2.Text

area = b*h/2

TextBox3.Tet=

Trim (area)

Ejemplo 2

D

Dim DiasDeAlquiler As Integer

Dim KilometrosRecorridos, Resultado As Integer

P

DiasDeAlquiler= Val(Text1)

Kilometros= Val(Text2)

Resultado= (DiasDeAlquiler*AlquilerDelAuto)+(kilometrosRecorrido*Kilometros)

E

Label1.text=”introduzca el día de alquiler”

Label2.text=”introduzca los kilómetros recorrido”

S

LabelResultado.text=”Los kilómetros recorrido es de” & resultado”

C

ConstAlquilerDelAuto= 700

ConstKilometrosRecorrido=750

Ejemplo 3:

D

Dim D, R, H,V,Vlitros, tminutos As Single

Dim Canal As Float

Dim Q As Single

C

Const Pi As Single= 3.14

P

D= Val(Text1)

H=Val(Text2)

R=D/2

V=Pi*(R^2)*H

Vlitros= V*1000

tminutos=Vlitros/Q

E

Label1=”Introduzca aquí el diámetro del depósito, en metros”

Label2= “Introduzca aquí la altura del depósito, en metros”                    

S

Label3= & “El tiempo que transcurrirá hasta el”&_”llenado del depósito es de”&tminutos&”minutos”

 

Ejemplo de Codificación. Parte 1.


Práctica de Visual Basic

Option Explicit On

Public Class Form 1

REM Declaración de Variables

Const Pi As Single= 3.141592654

Dim R, H, V As Single

REM Contenido de Formulario

Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles

MyBase.Load

Me.Text= “Cálculo volume cilindro”

ButtonCalcular.Text= “Calcular Volumen”

Label1.Text= “Introduzca aquí el diámetro, en metros”

Label2.Text= “  Introduzca aquí la altura, en metros”

End Sub

REM Cálculo y muestra resultados

Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles

ButtonCalcular.Click

R=Val(TextBox1.Text)/2

H= Val(TextBox2.Text)

V= Pi * (R^2) * H
LabelResultados.Font = New Font(“Arial”, 10,FontStyle.Bold)

LabelResultados.TextAlign =  ContentAlignment.MiddleCenter

LabelResultados.Text= “El volumen del cilindro es de “& V &” metros cúbicos”

End Sub

End Class

Ejemplo B

Calcular el promedio de tres notas sumativas

Option Explicit on

Public Class Form 1

REM Declaración de variables

Dim nota1, nota2, nota3, promedio As Single

REM Contenido del formulario

Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles

MyBase.Load

Me.Text= “Cálculo promedio de 3 notas sumativas”

ButtonCalcular.Text= “Calcular el promedio”

Label1.Text= “Introduzca la primera nota”

Label2.Text= “Introduzca la segunda nota”

Label3.Text= “Introduzca la tercera nota”

End Sub

REM Cálculo y muestra resultados
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System. EventArgs) Handles

ButtonCalcular.Click

Nota1= Val(TextBox1.Text)

Nota2= Val(TextBox2.Text)

Nota3= Val(TextBox3.Text)

Promedio= (Nota1 + Nota2 + Nota3) / 3

Label Resultados.Font= New Font(“Arial”,10.FontStyle.Bold)

LabelResultados.TextAlign= ContentAlignment.MiddleCenter

LabelResultados.Text= “El promedio es de “& promedio&”

End Sub

 

 

Declaración de Variables


Taller 1
    

1.     Declare en Visual Basic las siguientes variables.

Porcen   Float: Dim Porcen As Float

Cant        Double: Dim Cant As Double

Proyecto   Char: Dim Proyecto As Char

Resp         Single: Dim Resp As Single

Boton       Integer: Dim Boton as Integer

Totaldescuento     Integer: Dim TotaldescuentoAs Integer

Importe      float: Dim Importe As Float

Suma        Single: Dim Suma As Single

Resta         Float: Dim Resta As Float

Resul        Char: Dim Resul As Char

Parent       Single: Dim Parent As Single

Verdadero  Bool: Dim Verdadero As Bool

Fila            Single: Dim Fila As single

Falso        Bool: Dim Falso As Bool

Nombre    Char: Dim Nombre As Char

Cedula       Integer: Dim Cedula As Integer

Apellido     Char : Dim Apellido As Char

Datos         Single: Dim Datos As Single

Ecua           Integer: Dim Ecua As Integer

Provincia       Char: Dim Provincia  As Char

Mult                Double: Dim Mult As Double

Numeri          Float: Dim Numeri As Float