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
miércoles, 10 de agosto de 2016
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
Suscribirse a:
Comentarios (Atom)