Vectores

PARA CREAR UN PIMER PROGRAMA EN VISUAL.NET
EJERCICIO #01
1) Archivo/Nuevo Proyecto
2) Aplicación de Windows/Nombrarlo mensaje/Aceptar
3) Aparece el formulario el cual vamos agregar los siguientes objetos de control
4) Insertar un botón en el formulario y en la barra de propiedades de ese botón y en neme cambiar el nombre por Bton_Saludo se recomienda que se nombre primero la clase deobjeto.
5) Cambiar el nombre de la ventana del formulario hacemos doble clic sobre el encabezado del formulario y debajo de la clase private se ingresa
Form.Text=”Saludo” Objeto.acción=Propiedades
Se debe cambiar el nombre del formulario por que no se puede hacer referencia asi mismo entonces lo llamaremos me
6) Hacemos lo mismo para el botón en el código anterior
Bton_Saludo.Text=”Mensaje desaludo” Objeto.acción=Propiedades
7) Hacemos doble clic sobre el botón y en el código ingresamos lo siguiente para que nos muestre un saludo
Msgbox(“Estamos trabajando en Visual”)

EJERCICIO #02

1) Archivo/Nuevo Proyecto
2) Aplicación de Windows/Nombrarlo variable/Aceptar
3) Creamos un label o etiqueta, caja de texto y un botón
4) Asignamos los nombres y los textos para cada objeto comose realizó anterior mente.
5) Form.Text=”Ejercicio 1” Objeto.acción=Propiedades
Se debe cambiar el nombre del formulario por que no se puede hacer referencia así mismo entonces lo llamaremos nom
6) Etiqueta_nombre.text=”Nombre”
7) Damos doble clic sobre el botón y escribimos
8) Msgbox(“Bienvenido” + Text_nombre.text)

ESTRUCTURA IF
If [condición] Then
Instrucción 1
Instrucción 2
∙
∙∙
Instrucción n
Else
Instrucción A
Instrucción B
∙
∙
∙
Instrucción Z
End If

EJERCICIO #03
Crear un programa que pida un número entero distinto de cero y nos muestre en pantalla un mensaje.
indicándonos si el número es par o impar.
Objetos
Label Solicitud del número LblNumDig
Caja de texto Donde se digita el número Txtnum
Botón Que ejecuta la acción CmBParLabel Donde muestra el resultado Lblresult

Código de Programación
Option Explicit //Sección de Definición de variables
Dim TxtNum As Integer //Se define la variable TxtNum como elemento entero
Dim Res As Integer //Se define la variable Lblresult como elemento entero
Private Sub Form_Load()//Módulo del formulario
Form1.Caption = "Determina naturaleza par o impar" //Título del formularioCmBPar.Caption = "Determinar"// Nombre del botón
LblNumDig = "Introduzca un nº entero"
End Sub
Private Sub CmBPar _Click()
Num = Val(Txtnum)
Res = Num Mod 2
Lblresult.FontSize = 10 //Tamaño del label Lblresult
Lblresult.FontBold = True //No visualizer bordes

If Res = 0 Then //Condición si
Lblresult = "El número es par"//Si se cumple la condición
Else
Lblresult = "El número es impar" //Si no se cumple
End If // Fin del si
End Sub //Fin del módulo












Formulario



Ejercicio #1
Programa que nos muestra el valor medio de tres magnitudes.
Variables
Dim mensaje$. String
Dim edad%. Integer
magnitud1! Single
EJERCICIOS CON VARIABLES
En el menú Herramientas, selecciona Opciones... y en la pestaña Editor establece (o comprueba que está
establecida)la opción Requerir declaración de variables como activa.
Option Explicit.
Es la ventana donde se declaran las variables.



Dim [Nombre de variable] As [Tipo de variable]
Dim Numerodeplantas%

1) Realice un programa que muestre los números múltiplos de 3 del 1 al 20
2) Realice un programa que muestre los números múltiplos de 5 del 1 al 30
3) Un estudiante de la Universidad San Josédesea saber cual será su calificación final en la materia de Lógica Computacional. Dicha calificación se compone de tres exámenes parciales cuya ponderación es de 30%, 30% y 40%
4) Una farmacia aplica al precio de los remedios el 10% de descuento. Hacer un programa que ingresado el costo de los medicamentos calcule el descuento y el precio final.
5) Diagrama de flujo que obtiene la sumatoria de...