VECTORES EN VISUAL

MANEJO DE VECTORES Y MATRICES

Tanto los vectores como las matrices son un conjunto de datos de un mismo tipo, para muchos al escribir sobre matrices se refieren tanto a matrices de 2 dimensiones como de una dimensión. Aunque sea lo mismo prefiero decir que un vector tiene una dimensión y una matriz más de una dimensión.
 
Existen diferentes formas de declarar variables de vector, por ejemplo: 
Dim a(4) As String
a(0)=”indice cero”
a(1)=”indice uno”
 
ó
 
Ahora si lo que queremos es un vector numérico será:
 
Dim VectorA() As Short = {6, 7}
 
Y si es de dos dimensiones será:
 
Dim Matriz(10,20) as Single
 
Aunque también pueden declararse de las siguientes maneras:
 
Vectores
 
Dim BA() As Byte = New Byte() {}
Dim BA() As Byte = New Byte() {0,1,2}  
Dim BA() As Byte = New Byte(2){0,1,2}  
 
Matrices
 
Dim JB()() As Byte = {New Byte() {}, New Byte() {}}   
Dim JB()() As Byte = {New Byte(1) {}, New Byte(1) {}}  
Dim JB()() As Byte = {New Byte() {5, 6}, New Byte() {7, 8}}
 
 
Dim S(,) As Short = New Short(,) {} 
Dim S(,) As Short = New Short(1, 1) {} 
Dim S(,) As Short = New Short(,) {{5, 6}, {7, 8}} 
 
 
Ahora realizaremos el siguiente ejemplo que lo que se busca es mostrar algunaspropiedades de los arrays.
 
Option Explicit On
Option Strict On
Module Module1
 
    Sub Main()
        Dim VectorA() As Integer = {3, 4, 1, 2, 5, 0, 0, 0, 0}
        Dim VectorB() As Integer = {8, 7, 6, 9}, i, j As Integer
 
        Dim ref() As Integer
        Dim Dimension As Integer
        If TypeOf (VectorA) Is Array Then
            Console.WriteLine("______________________________")            Console.WriteLine("El primer arreglo es VectorA")
            For i = 0 To VectorA.GetLength(0) - 1
                Console.WriteLine("Indice {0}={1}", i, VectorA(i))
            Next
            Console.WriteLine("El segundo arreglo es VectorB")
            For i = 0 To VectorB.GetLength(0) - 1
                Console.WriteLine("Indice {0}={1}", i, VectorB(i))
            Next            Console.WriteLine("Tipo del arreglo: {0} Propiedad VectorA.GetType()", VectorA.GetType())
            Console.WriteLine("Tiene tamaño fijo? IsFixedSize = {0} Propiedad VectorA.IsFixedSize", VectorA.IsFixedSize)
            Console.WriteLine("Es de sólo lectura? IsReadOnly = {0} Propiedad VectorA.IsReadOnly", VectorA.IsReadOnly)
            Console.WriteLine("Tiene {0} dimension propiedad VectorA.Rank",VectorA.Rank)
            Console.WriteLine("Cantidad de elementos {0}", VectorA.GetLength(0))
            VectorB.CopyTo(VectorA, 5)
            Console.WriteLine("Resultado después de usar la siguiente instrucción VectorB.CopyTo(VectorA, 5) en el primer vector")
            For i = 0 To VectorA.GetLength(0) - 1
                Console.WriteLine("Indice {0}={1}", i, VectorA(i))
            Next            ref = VectorB
            Console.WriteLine("Aqui se está referenciando la variable reg que también  es un arreglo a VectorB (ref = VectorB)")
            ref(0) = 3
            Console.WriteLine("Resultado después de modificar el valor del indice 0 del segundo vector con la siguiente instrucción (ref(0) = 3)")
            For i = 0 To VectorB.GetLength(0) - 1
                Console.WriteLine("Indice{0}={1}", i, VectorB(i))
            Next
            Console.WriteLine("Ahora si lo que queremos es ordenar el segundo vector")
            Console.WriteLine("Lo haremos con cualquiera de estas instrucciones (VectorB.Sort(VectorB)) ó (Array.Sort(VectorB))")
            VectorB.Sort(VectorB)
            For i = 0 To VectorB.GetLength(0) - 1
                Console.WriteLine("Indice {0}={1}", i,VectorB(i))
            Next
            'Otra forma de recorrer un vector es
            Console.WriteLine("Otra forma de recorrer un vector es:")
            For Each i In VectorB
                Console.WriteLine(i)
            Next
        End If
        Console.Read()
    End Sub
 
End Module
 
 
Las matrices regulares se caracterizan por tener el mismo número de...