Arreglos en VB

Arreglos en VB.NET
Un arreglo es un conjunto finito y ordenado de elementos homogéneos. Ordenado porque los elementos n-esimo de un arreglo puede ser identificado, y homogéneo porque todos loselementos del arreglo son del mismo tipo de datos.

El arreglo más simple es el unidimensional (matriz de una dimensión). A diferencia de Visual Basic clásico que nos permitía especificar los límites deun arreglo, en .NET un arreglo siempre empieza en 0 (cero), por tanto el arreglo tendrá un elemento más del valor indicado como índice superior.

En el ejemplo siguiente, se tiene un vector X de 5elementos de tipo real. Se nota que empieza en cero, por tanto su índice superior es 4 y no 5

DECLARACION DE UN ARREGLO EN VB.NET

01 DIMENSION Arreglo (indice_superior) TIPO_DE_DATOS

DondeDIMENSION puede ser DIM, PUBLIC, PRIVATE, y TIPO DE DATOS, es el tipo de datos que tendrá el arreglo, por ejemplo

01 'declara un arreglo con 12 elementos de tipo string
02 Dim meses (11) As String03 'declara un arreglo con 7 elementos de tipo entero
04 Private dia_semana(6) As Byte
05 'declara un arreglo con 24 elementos de tipo real
06 Public hora(23) As Double
Ejemplo:
Se deseaconstruir una aplicación que lea una lista de calificaciones de una clase y calcule su media e imprima la lista de calificaciones mayores a la media.

01 Module Module1
02     'constante que sirve paraponer un límite al arreglo
03     Const limite = 15
04     'se crea un arreglo de tipo real
05     Dim lista_notas(limite) As Single
06
07     Sub Main()
08         'declaraciones de variables
09        Dim numero As Integer
10         Dim suma As Single
11         Dim media As Single
12
13         Console.Write("Introduzca número de calificaciones: ")
14         numero = Val(Console.ReadLine)
15         If numero > limite Then
16             Console.WriteLine("No se procesan más de " & limite & " calificaciones")
17         Else
18             suma = 0
19            ...