Un array es un conjunto finito y ordenado de elementos homogeneos. Ordenado porque los elementos n-esimo de un array puede ser identificado, y homogeneo porque todos los elementos del array son del mismo tipo de datos.
El arreglo mas simple es el unidimensional (matriz de una dimension). A diferencia de Visual Basic clasico que nos permitia especificar los limites de un arreglo, en .NET un arreglo siempre empieca en 0 (cero), por tanto el arreglo tendra un elemento mas del valor indicado como indice superior.
En el ejemplo siguiente, se tiene un vector X de 5 elementos de tipo real. se nota que empieza en cero, por tanto su indice superior es 4 y no 5
DECLARACION DE UN ARREGLO EN VB.NET
DIMENSION Arreglo(indice_superior) TIPO_DE_DATOS
donde DIMENSION puede ser DIM, PUBLIC, PRIVATE, y TIPO DE DATOS, es el tipo de datos que tendra el arreglo, por ejemplo
Ejemplo:
Se desea construir 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.
Module Module1 'constante que sirve para poner un limite al array Const limite = 15 'se crea un array de tipo real Dim lista_notas(limite) As Single Sub Main() 'declaraciones de variables Dim numero As Integer Dim suma As Single Dim media As Single Console.Write("Introduzca numero de calificaciones: ") numero = Val(Console.ReadLine) If numero > limite Then Console.WriteLine("No se procesan mas de " & limite & " calificaciones") Else suma = 0 Console.WriteLine("Introduzca calificaciones") 'a medida que el usuario introduce las calificaciones 'estas se colocan en el array For i = 0 To numero - 1 Console.Write(" Nota[" & (i + 1) & "]= ") lista_notas(i) = Val(Console.ReadLine) suma = suma + lista_notas(i) Console.WriteLine() Next 'se obtiene la media media = suma / numero Console.WriteLine("La media es: " & media) Console.WriteLine("-------------------------------------------------") Console.WriteLine("Lista de Calificaciones mayores a la media es") ' se recore el array buscando calificaiones mayores a la media For i = 0 To numero - 1 If lista_notas(i) > media Then Console.WriteLine(" " & lista_notas(i)) End If Next Console.WriteLine("-------------------------------------------------") End If Console.WriteLine("presione una tecla para terminar...") Console.ReadLine() End Sub End Module
Resultado
Yo soy yo :) JC Mouse, Soy orgullosamente boliviano soy fundador y CEO de la web jc-Mouse.net uno de las pocas web en emprendimiento y tecnología en Bolivia.
Toda la información que encuentres en este sitio es y sera completamente gratis siempre, puedes copiar, descargar y re-publicar si así lo deseas en otros blogs o sitios web, solo te pido a cambio que dejes una referencia a esta web. Esto nos ayuda a crecer y seguir aportando. Bye
Enjoy! :)
Continuando con los tutoriales sobre LibGDX (Librería para el desarrollo de videojuegos), en esta ocasión veremos como e...
En este post conoceremos algunos de los operadores de comparación que existen en Linux y realizaremos unos ejercicios pa...
Rompecabezas 3×3 realizado en Visual Basic .NET, lo que se hizo fue una migración de un proyecto hecho en java (pue...
Si nuestra aplicación tiene que llevar a cabo un cierto trabajo que no sabemos cuanto durará y que a la vez consume much...
En este post se da respuesta a una pregunta realizada por facebook. El problema dice así: Se quiere personalizar un JTab...
Una de las novedades de Java 9 y 10 aunque por el momento en modo de prueba (jdk.incubator.http) es el Cliente HTTP el c...
Por lo general se usan transacciones a nivel base de datos y posteriormente se llaman estos a través de procedimientos a...
En este post, aprenderemos como conectar Visual Basic 6 con SQL Server, abrir una tabla, leer su contenido y mostrar est...
Lo que veremos en este post es la configuración del driver para PHP de SQL Server que ha creado Microsoft el cual permit...
Google Bard la inteligencia artificial de Google se actualiza con una mejora que entra a competir con el resto de IAs y...