miércoles, 10 de agosto de 2016

declaración de variables

tarea
declare las variables de V.B  en los siguientes programas
1-que calcule el promedio de 3 notas sumativas
2-que divida 2 números enteros
3-que calcule la temperatura en C°(formula)
4-que calcule el seguro social de una persana

1- A       Dim A,B,C As float
    B
    C

2- A     Dim A,B As integer
    B

3-F -273
Dim F As integer
 
4- rata por hora
cantidad por hora
Dim CH As float
Dim S  As integer

ejemplos codificados de visual basic

Option Explicit On
Public Class Form1
REM Declaración de variables
Const Pi As single= 3.121592654
Dim R, H, V As Single
REM Contenido del formulario
Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As Sustem.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 de 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


B.
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
LabelResultados.Font = new Font (´´Arial´´, 10,FontStyle.Bold)
LabelResultados.TextAlign = ContentAlignment.MiddleCenter
LabelResultados.Text =´´El promedio es de ´´& promedio&´´

End Sub

ejercicio de declaración de variables, procesos,datos de entrada y salida

Describa la: declaración de variables, procesos, datos de entrada y salida en los siguientes ejemplos.
Ejemplo 1:
D= Dim b, h As Double
       Dim área As Integer

P=  b=TextBox1.Text
       h= TextBox2.Text
       Área= b*h/2
      TextBox3.Text=Trim(área)

Ejemplo 2:
C= ConstAlquilerDelAuto =700
      ConstKilometrosRecorrido =750

D= DimDiasDeAlquiler As Integer
      DimKilometrosRecorridos, Resultado As Integer
P= DíasDeAlquiler =Val(Text1)
     Kilómetros = Val (Text2)
     Resultado=(DiasDeAlquiler * AlquilerDelAuto) +(KilometrosRecorrido *        Kilómetros)

E= label1.text=”introduzca el día de alquiler”
      label1.text=”introduzca los kilómetros recorrido”

S= LabelResultado.text = “los kilómetros recorrido es de”& resultado”


declaración de variables de visual basic

declaración de variables

Dim Porcen  As float                                                                                                       
Dim Cant  As doublé
Dim Proyecto As char
Dim Resp As single
Dim Botón As integer
Dim Totaldescuento As integer
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 integer
Dim apellido As char
Dim datos As single
Dim ecua As integer
Dim provincia As char
Dim mult As double
Dim numeri As float