miércoles, 10 de agosto de 2016

Tarea
Declare las variables de Visual Basic de los siguientes programas
1) calcule el promerio de 3 notas sumativas
2) divida 2 numeros enteros
3) calcula la T° en °C
4) calcule el seguro social

1)
Dim A As Float
Dim B As Float
Dim C As Float

2)
Dim Y As Int
Dim Z As Int

3)
Dim K, Y As Int

4)
Dim RP As Float
Dim CH As Int

calcular el promedio de tres notas sumativas

Option Explicit On

Public Class Form1

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

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

End Sub

Option Explicit On

Public Class Form1

REM Declaración de variables

Const Pi As Single = 3.141592654

Dim R, H, V As Single

REM Contenido del formulario

Privbate Sub Form1_Load(ByVal sneder As System.Object, yVal e As System.EventArgs) Handles

MyBase.Load

Me.Text = “Cálculo volumen 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 sneder 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.MidlleCenter

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

End Sub

End Class

1. ¿cómo se da la asignación de valores de visual basic?

2. Estructura de programación en Visual basic

3. ¿Cómo se realiza los ingresos de datos a través de controles de 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?

1. Para asignar un valor a una variable utilizamos el operador = siguiendo la siguiente sintaxis:

2. Un programa de Visual Basic se crea a partir de bloques de creación estándar. Una solución consta de uno o varios proyectos. Un proyecto a su vez puede contener uno o más ensamblados. Cada ensamblado se compila a partir de uno o varios archivos de código fuente. El archivo de código fuente proporciona la definición e implementación de clases, estructuras, módulos e interfaces, que en última instancia contienen todo el código.

3. Primer paso: Predefinir los requisitos (campos)

La aplicación corresponde al registro y actualización de una tabla que contiene información sobre las personas que ingresan y salen de una edificación.

Segundo paso: Diseño del formulario principal

Diseñe el siguiente formulario desde la consola de Microsoft® Excel Visual Basic para Aplicaciones, basado en los campos mencionados en el paso anterior.

Tercer paso: Programación preliminar del formulario

Antes de pasar a la programación de los botones del formulario, debemos programar el ComboBox1 (control de listado), para que muestre las opciones: C.C., C.E. y T.I. (Cédula de Ciudadanía, Cédula de Extranjería y Tarjeta de Identidad). Haga doble click en el formulario y en la ventana de código seleccione el procedimiento ACTIVATE.

Cuarto paso: Activar el formulario desde la hoja de cálculo

Desde la hoja de Microsoft® Excel donde se encuentra la tabla creada en el paso 1, agregué un botón justo al lado de la tabla (Control Active X) llamado FORMULARIO, como se observa en la siguiente ilustración.

4. Alternativa simple (if-then/si-entonces)

La estructura alternativa simple si--entonces ejecuta una determinada acción cuando se cumple una determinada condición. La selección si-entonces evalúa la condición y

- si la condición es verdadera, entonces ejecuta la acción S1

- si la condición es falsa, entonces no hacer nada

Alternativa doble (si-entonces-sino/if-then-else)

La estructura anterior es muy limitada y normalmente se necesitará una estructura que permita elegir entre dos opciones o alternativas posibles en función del cumplimiento o no de una determinada condición.

Si la condición C es verdadera, se ejecuta la acción S1, y si es falsa, se ejecuta la acción S2.

5. Visual Basic proporciona los tipos de operadores siguientes:

Operadores aritméticos, realizan los cálculos familiares en valores numéricos, incluido el desplazamiento de sus modelos de bits.
Operadores de comparación, comparan dos expresiones y devuelven un valor Boolean que representa el resultado de la comparación.
Operadores de concatenación, combinan varias cadenas en una sola.
Operadores lógicos y bit a bit en Visual Basic, combinan valores Boolean o numéricos y devuelven un resultado del mismo tipo de datos que los valores.

taller 1

declare en Visual Basic las siguientes variables

Dim porcen As Float

Dim cant As double

Dim proyecto As char

Dim resp As Single

Dim Boton As Interger

Dim Totaldescuento As interger

Dim importe As float

Dim suma As single

Dim resta As float

Dim resul As char

Dim parent As single

Dim verdadero As bool

Dim fila As single

Dim falso As bool

Dim nombre As Char

Dim cedula As interger

Dim apellido As Char

Dim Datos As single

Dim Ecua As inerger

Dim provincia As Char

Dim mult As Double

Dim numeri As float

viernes, 27 de mayo de 2016

Ventanas de propiedades de Visual Basic

Interfaz de Visual Basic

1. Biografía de Alan Cooper

Alan Cooper ( San Francisco , 3 de junio de 1952 ) es un ordenador y diseñador estadounidense , conocido por su contribución al desarrollo de Visual Basic , lenguaje común de programación de eventos que resultan de uno de sus programas, llamados trípode .

Experto en diseño de interacción , fue apodado por ello "el padre de Visual Basic", aunque gran parte del trabajo de Visual Basic se hizo realidad por el grupo de desarrollo interno de Microsoft. Este nombre fue utilizado por primera vez por Mitchell Waite en el prefacio de su libro "Visual Basic How-To" . Sin embargo, Cooper jugó un papel importante para la realización de Visual Basic 1.0 y fue uno de los pioneros en el uso de un entorno de desarrollo integrado para la creación de una "interfaz gráfica .

2. Análisis de las características de Visual Basic

Los compiladores de Visual Basic generan un código DDL que requiere una o más librerías de enlace dinámico para que funcione.

Las bibliotecas DLL proveen las funciones básicas implementadas en el lenguaje.

Contienen rutinas en código ejecutable que son cargadas bajo demanda en tiempo de ejecución.

Un gran número de bibliotecas del tipo DLL con variedad de funciones, facilitan el acceso a la mayoría de las funciones del sistema operativo.

Dentro del mismo Entorno de desarrollo integrado (IDE) de Visual Basic se puede ejecutar el programa que esté desarrollándose.

Desde ese entorno también se puede generar el archivo en código ejecutable (exe)

Visual Basic provee soporte para empaquetado y distribución.

Con ese módulo la aplicación desarrollada se distribuye y puede ser instalada en cualquier equipo.

Ejemplos de programas codificados en Visual Basic

Calculadora
Código:
Para escribir código de un botón u otro objecto, doble clic sobre el botón (o algún otro objeto).
Aparecerá algo así:
·      Private Sub [...] 'Esto lo pone el mismo programa. 'Aquí escribes el código de lo que va a hacer ese botón o objeto. End Sub 'Esto también lo pone el programa.
En el botón "Salir":
·      Private Sub [...] End 'El comando End, cierra todos los formularios y el programa. End Sub
Sobre el Botón "+":
·      Private Sub [...] Resultado.Text = (CDbl(Numero1.Text) + CDbl(Numero2.Text)) 'Resultado = Numero1 + Numero2 End Sub
Sobre el botón "-":
·      Private Sub [...] Resultado.Text = (CDbl(Numero1.Text) - CDbl(Numero2.Text)) 'Resultado = Numero1 - Numero2 End Sub
Sobre el botón "x":
·      Private Sub [...] Resultado.Text = (CDbl(Numero1.Text) * CDbl(Numero2.Text)) 'Resultado = Numero1 x Numero2 'El * indica multiplicar, aunque en el botón se haya puesto una x End Sub
Sobre el botón":":
·      Private Sub [...] Resultado.Text = (CDbl(Numero1.Text) / CDbl(Numero2.Text)) 'Resultado = Numero1 : Numero2 'Aunque en el botón pongamos :, para dividir se usa una / End Sub

Conversor de temperatura
Código:
Al botón "Calcular":
·      Private Sub [...] If RadioButton1.Checked Then 'Abre una condición R.Text = (CDbl(N.Text + 273)) 'Si está seleccionado el RadioButton1, suma 273 ElseIf RadioButton2.Checked Then R.Text = (CDbl(N.Text - 273)) 'Si está seleccionado el RadioButton2, resta 273 End If 'Cierra la condición End Sub
Al botón "Borrar":
·      Private Sub [...] N.Text = "" 'El cuadro de texto N (El del número) se borra R.Text = "0" 'El cuadro de texto R (El del resultado) se pone en 0 End Sub
Al botón "Salir":
·      Private Sub [...] End 'Se cierra completamente el programa End Sub

Navegador de internet

Código:

En el Button1:

· Private Sub [...] WebBrowser1.GoBack() 'Al pulsar el botón, página atrás. End Sub

En el Button2:

· Private Sub [...] WebBrowser1.GoForward() 'Al pulsar el botón, página adelante. End Sub

En el Button3:

· Private Sub [...] WebBrowser1.Stop() 'Al pulsar el botón, deja de cargar la página. End Sub

En el Button4:

· Private Sub [...] WebBrowser1.Refresh() 'Al pulsar el botón, se vuelve a cargar la página. End Sub

En el Button5:

· Private Sub [...] WebBrowser1.Navigate(TextBox1.Text) 'Al pulsar el botón, se carga la página que pone en el TextBox1 End Sub.

Multiprograma

Código (A):

En los botones del Formulario principal:

· Private Sub [...] Formx.Show() 'Donde Formx es el (Name) del formulario. Esto abre el otro formulario. End Sub

Código (B):

Antes de nada, hay que cambiar una cosa de las propiedades del proyecto:

Una vez cambiado eso, en el código del botón que cambia de formulario:

· Private Sub [...] Formx.Show() 'Donde Formx es el (Name) del formulario. Esto abre el otro formulario. Me.Close() 'Esto cierra este formulario. Lo hace tan rápido que parece que un formulario se transforma en el otro. End Sub

Calcular área de un triángulo

Public Class Form1
    Private Sub Button1_Click(ByVal sender As System.Object,
    ByVal e As System.EventArgs) Handles Button1.Click
        Dim b, h As Double
        Dim area As Double
        b = TextBox1.Text
        h = TextBox2.Text
        area = b * h / 2
        TextBox3.Text = Trim(area)
    End Sub
End Class