ejercicio visual basic

 
 

aprenderaprogramar.com
 

Ejercicios ejemplos labels, textbox, 
Command Buttons (CU00322A) 
Sección: Cursos                                               Categoría: Curso Visual Basic Nivel I 
Fecha última actualización: 2012 
Autor: Mario R. Rancel 
Resumen: Entrega nº21 del Curso Visual Basic Nivel I 

12

© 2006‐2012 aprenderaprogramar.com 

 Ejercicios con Mostrar, pedir y Command Buttons. 
 

EJERCICIOS CON MOSTRAR, PEDIR Y COMMAND BUTTONS EN VISUAL BASIC 
 
EJERCICIO PRIMERO 
Transformar  el  algoritmo  que  se  indica  a  continuación,  relativo  a  calculo de  necesidades  de 
combustible, en un programa. 
 
ALGORITMO 

 
 
 
 
 
 
 
 
 

1.  Inicio 
   2.  [Definición de vehículos] 
3.  Turismos = 32  
4.  Todoterrenos = 11  5.  [Fin de definición de vehículos]  
6.  [Definición de capacidad de depósitos] 
7.  Capturismos = 40 
8.  Captodot = 65 
9.  [Fin de definición de capacidad de depósitos] 10.  [Cálculo de necesidades de combustible] 
11.  Necesidadescom = Turismos * Capturismos + Todoterrenos * Captodot 
12.  [Fin de cálculo de necesidades de combustible] 
13.  Fin

 
 
 
 
 
 
 
 
 
 
 
 
 
 © 2006‐2012 aprenderaprogramar.com 

Ejercicios con Mostrar, pedir y Command Buttons. 
 

SOLUCIÓN EJERCICIO PRIMERO 
El código será algo como lo que se muestra a continuación.  
 
 
 
 
 
 
 
  
 
 
 
 
 
 
 
 
 
 

Option Explicit 
Rem Declaración de variables 
Dim Turismos%, Todoterrenos As Integer 
Dim Capturismos!, Captodot As Single 
Dim Necesidadescom As Single 
 Rem Contenido del formulario 
Private Sub Form_Load() 
Form1.Caption = "Cálculo de necesidades combustible" 
Label1(0) = "Por favor introduzca estos datos" 
Label1(1) = "Número de turismos" Label1(2) = "Número de todoterrenos" 
Label1(3) = "Capacidad de turismos (litros)" 
Label1(4) = "Capacidad de todoterrenos (litros)" 
Command1.Caption = "Aceptar" 
End Sub 
 ...