Powered By Blogger

lunes, 2 de diciembre de 2013

Vectores

Bienvenidos sean, en este primer post les traemos unos ejercicios sencillos desarrollados en visual studio, en ellos se trabajan con vectores. Pero primero:
¿Qué es un vector?

Los vectores son una forma de almacenar datos que permiten contener una serie de valores del mismo tipo, cada uno de los valores contenidos tiene una posición asociada que se usará para accederlos. Está posición o índice será siempre un número entero positivo.

Este siguiente programa se encarga de encontrar los numeros pares e impares que se encuentran en los numeros que el usuario ingresará.

Se crea un formulario y en el se colocan cuatro botones quedando de la siguiente forma:




A continuación abrir el código y colocar las siguientes líneas al inicio del formulario (tiene que estar fuera del load del formulario):





- Código botón Leer Vector :

For i As Integer = 0 To 9
            vector(i) = InputBox("Ingrese el Vector " & i)
        Next
   
Éste código se encarga de solicitar al usuario el tamaño del vector y como siguiente  se encarga de almacenar los valores de cada elemento del vector.

- Código botón Numero Vector :
For i As Integer = 0 To 9
            If vector(i) Mod 2 = 0 Then
                CP = CP + 1
            End If
        Next
        MsgBox(" Hubieron " & CP & "  Pares")

Éste Código funciona de manera que comprueba cada valor almacenado para ver si es par, de ser asi se almacena en un contador el número total de los numeros que resulten pares.

- Código botón Numero Impar :  
For i As Integer = 0 To 9
            If vector(i) Mod 2 = 1 Then
                MsgBox("posicion Impar:  " & i)
                i = 9
            End If
        Next

Éste código se encarga de encontrar y almacenar la cantidad de números impares.

- Código botón Mayor :
 For i As Integer = 1 To 9
            If vector(i) > mayor Then
                mayor = vector(i)

            End If
        Next

        MsgBox("el Numero Mayor es: " & mayor)

   Éste código compara todos los valores e imprimirá el valor más alto.


Esperamos les sea funcional el codigo, en todo caso aqui les dejamos el link del proyecto.
https://mega.co.nz/#!V4FXxYhQ!Ca1HCF-Rnvw3ryGUp7KT4CZmv2h-H4fWKmDrLP5FexM Click en la imagen



Como en el ejemplo anterior, este es una forma diferente de utilizar los vectores en visual studio, en el siguiente ejercicio se muestra de una forma muy sencilla de utilizar un vector. 


Al ingresar al codigo se declaran las siguientes variables al inicio del formulario :
Dim numeros() As Integer

    Dim tamano As Integer = -1


- Código botón Agregar Vector :
tamano = tamano + 1
        ReDim Preserve numeros(tamano)

        numeros(tamano) = InputBox("Ingrese el elemento")

Éste código se encarga de asignar el valor del vector.

- Código botón Tamaño :
MsgBox(" El vector tiene: " & numeros.Length & " elementos")

Éste codigo se encarga de imprimir la cantidad de elementos en el vector, en este caso debe de ser = 1

- Código botón Imprimir :
For i As Integer = 0 To numeros.Length - 1
            MsgBox(numeros(i))
        Next

Éste código se encarga de imprimir el valor del vector.

Link del proyecto :
Click en la imagen



No hay comentarios:

Publicar un comentario