taller de declaracion de variable

Ejemplo a:

Variable

Dim b, h As Integer

Dim area As Integer

Procesos

b= TextBox1. Text
h= TextBox2.Text
TextBox3.Text=
area=b*h/2
Trim (area)

Ejemplo b:

Constante
ConstAlquilerdelAuto=700
ConstKilometrosRecorrido=750

Variable
DimDiasDeAlquiler As Integer
DimKilometros Recorridos, Resultado As Intreger

Proceso
DiasDeAlquiler= Val(Text1)
Kilometros=Val(Text2)
Resultado=(DiasDe Alquiler*AlquilerDelAuto)+
(KilometrosRecorrido*Kilometros)

Entrada
Label1.Text=”Introduzca el dia de alquiler”
Label2.Text=”Introduzca los kilómetros recorridos”

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

Ejemplo c:

Constante
Const Pi As Single=3.14

Variable
Dim D, R, H, V, Viltros, minutos As Single
Dim Canal As Float
Dim Q As Single

Proceso
D=Val (Text1)
H=Val (Text2)