CORPORACION EDUCATIVA CHIJER

CURSO…

1
CORPORACION EDUCATIVA CHIJER

CONTENIDO

II. MODULO 1: INTRODUCCIÓN A VISUAL BASIC ................................................................... 4

a. El Diseño de la interface de Visual Studio ........................................................................ 7
III. MODULO 2: PERSONALIZACION DEL FORMULARIO.................................................. 9
a. Personalización de las propiedades del formulario .................................................... 9
i. Ventana de Propiedades:...................................................................................................... 9
ii. Cambio de las propiedades del formulario predeterminado ...........................11
IV. MODULO 3: AGREGAR CONTROLES AL FORMULARIO............................................12
a. Uso de la caja de herramientas. ...........................................................................................12
b. Adición de controles al formulario y cambiar sus propiedades ..........................13
V. Módulo 4: PROGRAMAR (ESCRIBIR CODIGO) ..................................................................15
a. El concepto de programación dirigido por eventos...................................................15
b. Escribir el Código........................................................................................................................16
VI. MODULO 5: TRABAJAR CON CONTROLES .....................................................................19
a. La herramienta TextBox..........................................................................................................19
b. La herramienta Label................................................................................................................20
VII. MÓDULO 6: HERRAMIENTAS LIST BOX Y COMBO BOX ..........................................22
a. Herramienta ListBox .................................................................................................................22
i. Adición de elementos a un cuadro de lista ................................................................22
ii. Eliminación de elementos de un cuadro de lista ....................................................24
b. Herramienta Combo Box.........................................................................................................25
i. Adición de elementos a un cuadro combinado ........................................................25
ii. Eliminación de elementos de un ComboBox ............................................................26
VIII. Módulo 7: HERRAMIENTA PICTURE BOX ......................................................................27
a. Cargando una imagen en un PictureBox .........................................................................27
i. Cargando una imagen durante el tiempo de diseño..............................................27
ii. Cargando una imagen durante el tiempo de ejecución........................................29
b. Cargando imagen en un PictureBox usando el control “Open File Dialog” ....29
IX. MODULO 8: MANEJO DE DATOS .........................................................................................32
a. Tipos de datos numéricos ......................................................................................................32
b. Tipos de datos no numéricos ................................................................................................32
c. Los sufijos para los literales ..................................................................................................33
X. MODULO 9: MANEJO DE VARIABLES Y CONSTANTES .................................................34

2
CORPORACION EDUCATIVA CHIJER

a. Nombres de Variables ..............................................................................................................34

b. Declaración de Variables ........................................................................................................34
c. Asignación de valores a las variables................................................................................35
d. Alcance de la Declaración de la variable .........................................................................37
e. Declaración de constantes .....................................................................................................37
XI. MODULO 10: MANEJO DE ARRAYS (ARREGLOS) .......................................................39
a. El concepto de Arrays (arreglo) ..........................................................................................39
b. Dimensión de un array.............................................................................................................39
c. Declaración de Arrays ..............................................................................................................39
XII. MÓDULO 11: MANEJO DE OPERACIONES ARITMÉTICAS. .....................................43
XIII. MÓDULO 12: USO DE CONDICIONALES, EL “SI” Y EL “SI NO” .............................47
a. Los operadores Condicionales .............................................................................................47
b. Los operadores Lógicos ...........................................................................................................47
c. Utilización de la estructura de control “if” .....................................................................47
i. Uso del “If…Then” ..................................................................................................................47
ii. Uso del “If….Then…Else” .....................................................................................................48
iii. Uso del “If….Then…ElseIf” .................................................................................................50
XIV. MÓDULO 13: MANEJO DE OPCIONES MÚLTIPLES ....................................................52
XV. MÓDULO 14: MANEJO DE BUCLES.....................................................................................54
a. El bucle: “For...Next” ..................................................................................................................54
b. El bucle: “Do” ................................................................................................................................54
c. El bucle: “While…End While” ................................................................................................55

3
CORPORACION EDUCATIVA CHIJER

II. MODULO 1: INTRODUCCIÓN A VISUAL BASIC

En este capítulo de introducción aprenderemos las principales características de un lenguaje de
programación para crear aplicaciones bajo Windows.

Con Visual Basic podemos crear cualquier tipo de aplicación para que funcione bajo Windows,
utilizando así todos y cada uno de los elementos que forman parte de éste. Si estamos familiarizados
con Windows conoceremos de sobra estos elementos y qué es lo que solemos hacer con cada uno de
ellos.

Si nosotros ejecutamos una aplicación como la calculadora podemos observar que es un programa que
actúa de forma independiente, que tiene su tamaño delimitado y que lo que ocurra en su interior, en un
principio, no afectará al resto de las aplicaciones que se estén ejecutando en este momento en Windows.

Podemos observar, que en un principio este programa, como la mayoría de programas que funcionan
en Windows no realizan ningún tipo de acción a no ser que nosotros actuemos sobre él, dicho de otra
manera, el programa espera a que nosotros le digamos que es lo que tiene que hacer.

▪ Ejecuta la calculadora: Inicio - Programas - Accesorios - Calculadora.

Verás que aparece en el escritorio de Windows la siguiente ventana.

Observa que esta ventana está limitada con respecto al resto de Windows por el borde rectangular que
la rodea. Observa también que la calculadora no realiza ningún tipo de acción ni operación, está
esperando a que nosotros actuemos sobre ella.

Vamos a actuar sobre nuestra calculadora, Pulsa sobre el botón 6, observa lo que pasa. Al pulsar sobre
el botón con el número 6 hemos generado una actividad; hemos hecho que la calculadora realice una
acción o evento.

De esta forma podemos decir que un evento sería cualquier tipo de acción que se realiza sobre alguno
de los objetos que forman parte de una aplicación o programa. Un evento, por ejemplo, podría ser: hacer
doble clic con el ratón sobre una casilla de texto, mover el ratón sobre la propia aplicación, pulsar una
tecla, etc.

4
CORPORACION EDUCATIVA CHIJER

Pues bien vamos a familiarizarnos un poco con el entorno de trabajo de Visual Basic mirando partes,
nombres y funciones más características del entorno de trabajo para así poder empezar a crear nuestras
aplicaciones.

Este primer acercamiento será superficial ya que solo echaremos un vistazo. Conforme avancemos en
el curso iremos adentrándonos más en sus características y funciones.

Es importante que aprendas los nombres de las diferentes partes de Visual Basic ya que en los próximos
capítulos nos referiremos a ellas por su nombre.

Para abrir Visual Studio donde trabajaremos con el lenguaje Visual Basic hacemos lo siguiente:

1.- Inicia Visual Basic: Inicio/Programas/Microsoft Visual Studio 2015.

Al iniciar Visual Studio te aparecerá en primer término una pantalla como esta:

5
CORPORACION EDUCATIVA CHIJER

Crearemos un nuevo proyecto, para ello, haga clic en la opción Nuevo Proyecto, le mostrara lo
siguiente:

2.- Seleccionamos Aplicación de

Windows Forms

1.- Seleccionamos Visual Basic

4.- Indique donde se guardará
su proyecto

3.- Ingrese un nombre a su proyecto

5.- Clic en Aceptar

Realizado lo anterior se mostrará la siguiente interface:

Formulario

6
CORPORACION EDUCATIVA CHIJER

EL FORMULARIO: Esta es una de las partes más importantes, aquí es donde diseñaremos la pantalla o
pantallas que formarán parte de nuestro programa. A estas pantallas le llamaremos formularios. Aquí
iremos colocando y modificando los diferentes elementos de nuestra aplicación, como puedan ser
botones, cuadros de texto, etc. Si no viéramos la pantalla del formulario podríamos activarla desde el
menú Ver/Objeto o pulsar tecla Shift + F7.

El diseño de una pantalla es tan simple como arrastrar los objetos que deseamos, desde el cuadro de
herramientas hasta el formulario. Para modificar el tamaño de cualquier objeto, incluso del formulario
solo es necesario situarse en cualquiera de las esquinas del objeto o en el centro de uno de sus lados
marcados con un cuadrado, esperar que el ratón se convierta en una fecha de desplazamiento, pulsar el
botón izquierdo del ratón y mientras se mantiene pulsado movernos hasta que el objeto tome un nuevo
tamaño. Si cambiamos el tamaño desde uno de los vértices podremos modificar tanto el alto como el
ancho, mientras que si arrastramos desde uno de los lados solo podremos modificar el alto o el ancho
dependiendo del lado en el que nos encontremos.

a. El Diseño de la interface de Visual Studio

El entorno de Visual Studio comprende algunas ventanas, entre las principales la ventana del
formulario, la ventana Explorador de soluciones y la ventana de propiedades.

También consta de una caja de herramientas que contiene muchos controles útil que permite a un
programador para desarrollar sus programas de Visual Basic.

Ahora, procederemos a mostrar cómo crear su primer programa en Visual Basic 2015. En primer lugar,
cambia el texto de la forma de mi primer programa VB2015 en la ventana de propiedades, que aparecerá
como el título del programa.

A continuación, insertar un botón y cambiar su texto para Mostrar mensaje. La interfaz de diseño se
muestra en la siguiente imagen.

7
CORPORACION EDUCATIVA CHIJER

Hacemos clic en el botón Mostrar Mensaje (Show Message) para acceder a la ventana de código y entrar
en la siguiente declaración entre Private Sub y End Sub, como se muestra en la siguiente imagen.

Cuando se ejecuta este programa y hace clic en el botón Mostrar el mensaje, debe obtener el siguiente
cuadro de mensaje emergente.

La función “MsgBox” es una función integrada de Visual Basic 2015 y se mostrará el texto encerrado
entre paréntesis y entre comillas.

Ahora que hemos creado nuestro primer programa en Visual Basic, vamos a aprender más técnicas de
programación en Visual Basic 2015 en el siguiente modulo.

8
CORPORACION EDUCATIVA CHIJER

III. MODULO 2: PERSONALIZACION DEL FORMULARIO

El primer paso en el desarrollo de una aplicación de Visual Basic es construir una interfaz gráfica
de usuario. Para crear una interfaz gráfica de usuario, agregamos controles de la caja de herramientas
al formulario y personalizar sus propiedades. Tenga en cuenta que el formulario predeterminado es
también un control por sí mismo y que puede cambiar sus propiedades antes de añadir controles
adicionales. Después de añadir controles al formulario, entonces será necesario escribir código
(programar) todos los controles para que pueda responder a los acontecimientos desencadenados por
las acciones del usuario, como hacer clic en el ratón. Por lo tanto, Visual Basic 2015 es también un
lenguaje de programación orientado a eventos. Vamos a aprender más sobre el concepto de la
programación orientada a eventos y codificación en los módulos posteriores.

a. Personalización de las propiedades del formulario

Al iniciar un nuevo proyecto de Visual Basic 2015, el IDE mostrará el formulario predeterminado junto
con la ventana Explorador de soluciones y la ventana Propiedades en el lado extremo derecho, como se
muestra en la siguiente imagen.

Explorador de
Soluciones

Ventana de
Formulario Propiedades

i. Ventana de Propiedades:

La ventana de propiedades comprende una lista de objetos desplegable, una lista de propiedades
y la sección inferior que muestra una descripción de la propiedad seleccionada. Con el único objeto en
el IDE es la forma predeterminada con el nombre de Form1, la ventana de propiedades muestra todas
las propiedades relacionadas a Form1 y sus correspondientes atributos o valores, como se muestra en
imagen. Se puede cambiar el nombre del formulario, el título de la forma, el color de fondo, el tamaño y
más. Las propiedades pueden ser cambiadas escribiendo un valor o seleccionar un valor de una lista
desplegable. Para ajuste de color, sólo tenemos que seleccionar un rectángulo de color o de una paleta
de colores.

9
CORPORACION EDUCATIVA CHIJER

Ahora personalizar las propiedades siguientes para Form1:

PROPIEDAD VALOR

Nombre MiFormulario

Texto Mi Primer Proyecto VB2015

BackColor 128, 255, 255

MaximizeBox Falso

Fuente Arial, 9.75pt

* El valor de Backcolor (color de fondo) 128 255 255 es en realidad el código de color RGB para cian. En
lugar de escribir el valor RGB, que de hecho puede seleccionar el color de la lista desplegable de color
que comprende tres pestañas, personalizado, Web y Sistema. Al hacer clic en la flecha desplegable
sacará una paleta de colores o una lista de rectángulos de color, donde se puede seleccionar un color,
como se muestra las imágenes siguientes:

Paleta personalizada Colores Web Colores de sistema

10
CORPORACION EDUCATIVA CHIJER

La interfaz de tiempo de ejecución se muestra en la siguiente figura. Observe que el título del formulario
se ha cambiado de Form1 para My First VB2015 Project (Mi Primer Proyecto VB2015), el fondo cambia
al color cian y la ventana no puede ser maximizada.

ii. Cambio de las propiedades del formulario predeterminado

También podemos cambiar las propiedades del formulario escribiendo los códigos pertinentes. La
forma predeterminada es un objeto y una instancia del formulario puede ser denotado por el
nombre Me. La propiedad del objeto se puede definir especificando el nombre del objeto seguido de un
punto y la propiedad:

ObjectName.property

Por ejemplo, podemos definir el color de fondo del formulario cian usando el siguiente código:

Me.BackColor = Color.Cyan

Para lograr la misma interfaz como en la imagen anterior, podemos escribir el siguiente código
haciendo doble clic en el formulario para entrar en la ventana de código:

Public Class Form1

Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As
System.EventArgs) Handles MyBase.Load
Me.Text = “My First VB2015 Project”
Me.BackColor = Color.Cyan
Me.MaximizeBox = False
Me.MinimizeBox = True
End Sub
End Class

11
CORPORACION EDUCATIVA CHIJER

IV. MODULO 3: AGREGAR CONTROLES AL FORMULARIO

En el módulo anterior, hemos aprendido cómo construir una interfaz en Visual Basic 2015
mediante la personalización del formulario predeterminado. En este módulo, vamos a continuar para
construir la interfaz mediante la adición de controles al formulario. Hay numerosos controles que
podemos añadir a la forma. Entre los controles, los más comunes son botón, etiqueta, cuadro de texto,
cuadro de lista, cuadro combinado, cuadro de imagen, casilla de verificación y algunos controles más.
Estos se pueden hacer visibles o invisibles al momento de ejecutar nuestro programa. Sin embargo,
algunos controles sólo se ejecutarán en segundo plano y no pueden ser vistos durante el tiempo de
ejecución, un control de esos es por ejemplo el temporizador.

a. Uso de la caja de herramientas.

La caja de herramientas por lo general queda anclado en parte derecha de la IDE de Visual Basic
2015. Si la caja de herramientas se oculta cuando se inicia Visual Basic 2015, podemos hacer clic en Ver
en la barra de menú y luego seleccionar la caja de herramientas para revelar la caja de herramientas,
como se muestra en la siguiente imagen. También podemos utilizar las teclas “Ctrl + Alt + x” para llevar
a cabo la caja de herramientas.

Podemos cambiar la posición de la caja de herramientas arrastrándola a cualquier lugar que deseemos,
mientras que su estado se pone a flotar. También podemos acoplar la caja de herramientas haciendo clic
derecho en la caja de herramientas y elegir “Acoplar” en el menú emergente. La caja de herramientas
acoplada que aparece como documentos con fichas con el formulario predeterminado, así como se
muestra en la siguiente imagen:

12
CORPORACION EDUCATIVA CHIJER

Además, también puede fijar la caja de herramientas a la barra lateral o la barra inferior haciendo clic
en el icono de bloqueo en la barra de menú de la caja de herramientas.

Cómo y dónde deseamos colocar la caja de herramientas en el IDE Visual Basic 2015 es totalmente
criterio nuestro, pero es recomendable que coloquemos la caja de herramientas al lado o en la parte
inferior izquierda del formulario predeterminado para que nos haga fácil añadir controles de la caja de
herramientas al formulario. Nunca se debe cubrir el formulario con la caja de herramientas, ya que será
difícil agregar controles al formulario.

b. Adición de controles al formulario y cambiar sus propiedades

La adición de controles al formulario es una tarea fácil, lo que hay que hacer es arrastrar un control
de la caja de herramientas y colocarlo en el formulario o dibujar en el formulario. Podemos arrastrar el
control alrededor de la forma y también se puede cambiar su tamaño fácilmente.

Para demostrar cómo agregar controles y cambie sus propiedades, vamos a diseñar un visor de
imágenes. En primer lugar, cambiar el título del formulario predeterminado de visor de imágenes en su
ventana de propiedades.

A continuación, insertar un cuadro de imagen en el formulario y cambiar su color de fondo a blanco. Para
ello, haga clic en el cuadro de imagen y seleccione Propiedades en el menú emergente, a continuación,
busque la propiedad BackColor en la ventana de propiedades. A continuación, agregue dos botones a la
forma y cambiar el texto para ver y cerrar en sus respectivas ventanas de propiedades. Ahora, hemos
diseñado un visor de imágenes básico utilizando Visual Basic 2015. Vamos a añadir más características
más adelante.

13
CORPORACION EDUCATIVA CHIJER

En este momento el visor de imágenes no es funcional hasta que escribamos código para que pueda
responder a eventos activados por el usuario. Nos ocuparemos de la parte de programación en los
próximos módulos.

La interfaz de diseño es como se muestra a continuación:

14
CORPORACION EDUCATIVA CHIJER

V. Módulo 4: PROGRAMAR (ESCRIBIR CODIGO)

En el módulo 3, hemos aprendido cómo diseñar la interfaz de usuario mediante la adición de
controles al formulario y cambiar sus propiedades. Sin embargo, los controles de la interfaz de usuario
por sí sola no funcionarán sin añadir código para ellos. En esta lección, vamos a aprender a escribir
código de Visual Basic 2015 para todos los controles para que puedan interactuar con los eventos
desencadenados por los usuarios. Antes de aprender cómo escribir código de Visual Basic 2015,
detengámonos en el concepto de programación orientada a eventos.

a. El concepto de programación dirigido por eventos

Visual Basic 2015 es un lenguaje de programación orientado a eventos porque tenemos que escribir
el código de respuesta a determinados acontecimientos desencadenados al azar por el usuario a través
de los controles en el formulario. Estos eventos no se producen en un orden determinado. Los eventos
normalmente ocurren en cualquier momento los cuales son activados por el usuario, pero no está
limitado solamente a las entradas del usuario. Algunos de los eventos son de carga, clic, doble clic,
arrastrar y soltar, pulsar las teclas y más.

Todos los controles que se coloca en el formulario tienen un conjunto de eventos relacionados con las
mismas. Algunos de los eventos son como se mencionó de carga, clic, doble clic, arrastrar y soltar, pulsar
las teclas y más. Para ver los eventos, hacemos doble clic en el control (objeto) en el formulario para
entrar en la ventana de código. El evento predeterminado aparecerá en la parte superior en el lado
derecho de la ventana de código. Tenemos que hacer clic en el evento predeterminado para ver otros
eventos asociados con el control. El código aparece en el lado izquierdo es el procedimiento de evento
asociado con el evento de carga. La imagen siguiente ilustra la carga y el procedimiento del evento
asociado con el formulario predeterminado.

15
CORPORACION EDUCATIVA CHIJER

La siguiente imagen muestra los eventos asociados con el botón:

b. Escribir el Código
Para comenzar a escribir código en Visual Basic 2015, hacemos clic en cualquier parte del
formulario para entrar en la ventana de código como se muestra en la imagen arriba.

Esta es la estructura de un procedimiento de un evento. En este caso, el procedimiento de evento es

cargar Form1 y comenzar con Private Sub y terminar con End Sub . Este procedimiento incluye la
clase Form1 y el evento de carga, y se unen entre sí por un guion, es decir Form_Load. Esto no hace
más que la carga de una forma vacía. Para hacer que el evento de carga haga algo, insertemos la siguiente
declaración:

MsgBox ("My first Visual Basic 2015 Program")

Así como se muestra en la imagen a continuación:

16
CORPORACION EDUCATIVA CHIJER

Cuando se ejecuta el programa, un cuadro de mensaje que muestra el texto "My First Visual Basic 2015
Program" aparecerá, MsgBox es una función integrada en Visual Basic 2015 que deben mostrarse un
mensaje en un cuadro de mensaje emergente como se muestra en la imagen siguiente.

* Se dará cuenta de que por encima de la estructura Private Sub no es una palabra clave que precede
Public Class Form1. Este es el concepto de un lenguaje de programación orientado a objetos. Cuando
comenzamos una aplicación de Windows en Visual Basic 2015, veremos una forma predeterminada con
el nombre Form1 que aparece en el IDE, en realidad es la clase Form1 que hereda de la clase
Form1 System.Windows.Forms.Form y una clase tiene eventos ya que crea una instancia de una
clase o un objeto.

También se puede escribir código para realizar el cálculo. Por ejemplo, se puede utilizar el MsgBox y el
operador aritmético adicional para realizar una suma de dos números, como se muestra a continuación:

*El símbolo & es para realizar la concatenación de cadenas. La declaración Me.Close() sirve para cerrar
el programa después de hacer clic en el botón Aceptar.

17
CORPORACION EDUCATIVA CHIJER

La salida es como se muestra a continuación:

Vamos a aprender más acerca de la escritura de código en los próximos módulos.

18
CORPORACION EDUCATIVA CHIJER

VI. MODULO 5: TRABAJAR CON CONTROLES

a. La herramienta TextBox

En este módulo, vamos a aprender a trabajar con algunos controles comunes en Visual Basic
2015. Algunos de los controles que se utilizan comúnmente son etiqueta, cuadro de texto, botón, cuadro
de lista, cuadro combinado, cuadro de imagen, temporizador y más. Sin embargo, en esta lección, vamos
a tratar sólo con el cuadro de texto (TextBox) y su etiqueta. Este cuadro de texto es para aceptar la
entrada del usuario, así como para mostrar la salida. Podemos manejar cadenas (texto) y datos
numéricos, pero no imágenes o fotografías. La cadena en un cuadro de texto que se puede convertir en
un conjunto de datos numéricos utilizando la función Val(texto).

Ejemplo 1:

El siguiente programa realizara la suma del valor que se ingrese en el TexBox 1 y en TexBox 2 y de
salida como resultado de la suma se mostrara en un cuadro de mensaje.

Public Class Form1

Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
MsgBox(“The sum is “ & Val(TextBox1.Text) + Val(TextBox2.Text))
End Sub
End Class

La ventana resultante al ejecutar el programa:

Después de hacer clic en el botón ADD (Sumar), se puede obtener la respuesta en un cuadro de mensaje,
como se muestra a continuación:

19
CORPORACION EDUCATIVA CHIJER

b. La herramienta Label

La etiqueta es un control muy útil en Visual Basic. Puede ser utilizado para proporcionar
instrucciones y guías para los usuarios, así como para mostrar salidas. Es diferente del cuadro de texto
(TextBox), ya que sólo puede mostrar texto estático, lo que significa que el usuario no puede cambiar
el texto. Utilizando la sintaxis label.text, podemos mostrar texto y datos numéricos. Podemos también
cambiar su texto en la ventana de propiedades y también en tiempo de ejecución.

Ejemplo 2:

En este programa, en lugar de mostrar la suma en un cuadro de mensaje, queremos presentar la suma
en un label.This un programa de calculadora simple que calcula la suma de dos números ingresados
por el usuario. Para el diseño de la interfaz, se agregan dos cuadros de texto (TextBox), tres etiquetas
(Label) y un botón en el formulario (Button).

▪ En virtud de las respectivas ventanas de propiedades, cambie el nombre del primer cuadro de
texto a txtNum1 y el segundo cuadro de texto a txtNum2.

▪ A continuación, cambiar el texto del primero Label a +, el segundo Label a =. Y para el tercer
Label, cambie la propiedad de tamaño automático en false y el nombre de LblAns.

▪ Ajuste el tercer Label al tamaño adecuado y establecer su fondo de color amarillo.

▪ Para el botón, cambie su nombre a BtnCal y su texto de calcular.

▪ Por último, cambiar el texto del formulario a calculadora simple.

▪ Los dos cuadros de texto (TextBox) se utilizan para aceptar entradas desde el usuario.

▪ El botón está programado para calcular la suma de los dos números utilizando el operador de
suma.

El código

Public Class Form1

Private Sub BtnCal_Click(sender As Object, e As EventArgs) Handles BtnCal.Click
Dim num1 As Single = Val(TxtNum1.Text)
Dim num2 As Single = Val(TxtNum2.Text)
Dim Sum As Single = num1 + num2
LblAns.Text = Sum.ToString
End Sub
End Class

El Dim es una palabra reservada que sirve declarar básicamente variables, en este caso un valor como
un número único y la función Val es convertir una cadena en un número. El método ToString es para
mostrar una salida como cadena. Vamos a aprender más acerca de Dim en el módulo posterior.

La ventana resultante al ejecutar el programa:

20
CORPORACION EDUCATIVA CHIJER

21
 CORPORACION EDUCATIVA CHIJER

VII. MÓDULO 6: HERRAMIENTAS LIST BOX Y COMBO BOX

En modulo anterior, aprendimos cómo trabajar con las herramientas TextBox y Label en Visual
Basic 2015. En este módulo, vamos a aprender dos importantes controles más, el cuadro de lista
(ListBox) y el cuadro combinado (ComboBox). Ambos controles se utilizan para mostrar una lista de
elementos. Sin embargo, difieren ligeramente en las formas en que se muestran las opciones. El cuadro
de lista (ListBox) muestra una lista de elementos en una sola vez en un área de texto, mientras que
ComboBox muestra la lista de elementos inicialmente en un solo botón desplegable y el usuario tiene
que hacer clic en el botón desplegable para ver los elementos que están dentro de él.

a. Herramienta ListBox

La función del ListBox es para mostrar una lista de elementos donde el usuario puede hacer clic y
seleccionar los elementos de la lista. Estos elementos o contenidos se pueden añadir durante el diseño
de nuestro programa y también en tiempo de ejecución. Los elementos también pueden ser retirados en
tiempo de diseño y en tiempo de ejecución.

i. Adición de elementos a un cuadro de lista

Para demostrar cómo agregar elementos a la hora del diseño, se inicia un nuevo proyecto e inserta
un ListBox en el formulario. Y luego de ello haga clic en el ListBox añadido para luego acceder a la
ventana de propiedades.

A continuación, haga clic en la propiedad item (colección), se le presentará Editor de colección de

cadenas mediante el cual se pueden introducir los elementos uno a uno escribiendo el texto y pulsando
la tecla Enter para agregar mas, como se muestra en la siguiente figura:

Después de hacer clic en el botón Aceptar, los artículos se mostrarán en el cuadro de lista, como se
muestra en la imagen siguiente:

22
CORPORACION EDUCATIVA CHIJER

En Visual Basic 2015, Los elementos también se pueden añadir durante la ejecución mediante el método
Add(). Antes de continuar, tenemos que saber que Visual Basic 2015 es un lenguaje de programación
orientado a objetos. Por lo tanto, Visual Basic 2015 comprende objetos. Todos los objetos tienen
métodos y propiedades, y pueden ser diferenciados y se conectan por la jerarquía. Para un ListBox, el
artículo es un objeto subordinado al ListBox de objetos. Agregar elementos comprende una llamada al
método Add() que se utiliza para agregar elementos al ListBox. Y para añadir un elemento a un ListBox,
podemos utilizar la siguiente sintaxis:

ListBox.Item.Add("texto")

Por ejemplo, si desea añadir un nuevo elemento a ListBox1 anterior, puede escribir la siguiente
declaración:

Public Class Form1

Private Sub Form1_Load(sender As Object, e As EventArgs) Handles MyBase.Load
ListBox1.Items.Add(“Visual Studio 2015”)
End Sub
End Class

El elemento "Visual Studio 2015" se añadirá al final de la lista, como se muestra en la siguiente figura:

23
CORPORACION EDUCATIVA CHIJER

También puede permitir al usuario añadir sus propios elementos usando el la función InputBox. Para
añadir de esta forma, insertar un botón durante el diseño y cambiar su texto a “Add Item” o “Agregar
elemento”. Haga doble clic en el botón e introduzca las siguientes instrucciones en la ventana de código:

Public Class Form1

Private Sub BtnAdd_Click(sender As Object, e As EventArgs) Handles Button1.Click
Dim myitem
myitem = InputBox(“Enter your Item”)
ListBox1.Items.Add(myitem)
End Sub
End Class

* La palabra clave Dim sirve para declarar la variable myItem. Aprenderemos más sobre Dim y las
variables en los próximas módulos.

Ejecutar el programa y haga clic en el botón Add Item o Agregar elemento dependiendo como lo haya
puesto, aparece un cuadro de entrada donde el usuario puede introducir el elemento que quiere añadir
a la lista, como se muestra en la siguiente figura:

ii. Eliminación de elementos de un cuadro de lista

Para eliminar elementos al momento del diseño, basta con abrir el Editor de la colección de
elementos y eliminar la línea de artículos o elementos o todos a la vez utilizando la tecla Suprimir.

Para eliminar un elemento en tiempo de ejecución, puede utilizar el método Remove con la siguiente
sintaxis:

ListBox1.Items.Remove("texto")

Se ilustra en el siguiente ejemplo:

ublic Class Form1

Private Sub Form1_Load(sender As Object, e As EventArgs) Handles MyBase.Load
ListBox1.Items.Remove(“Visual Basic 6”)
End Sub
End Class

El elemento "Visual Basic 6" será eliminado después de ejecutar el programa. También puede permitir
al usuario elegir qué elemento que desea eliminar.

24
CORPORACION EDUCATIVA CHIJER

También se puede permitir al usuario borrar sus propios artículos utilizando la función InputBox. Para
añadir esta opción, insertar un botón en tiempo de diseño y cambiar su texto a Delete Item o Eliminar
elemento. Haga doble clic en el botón e introduzca las siguientes instrucciones en la ventana de código:

Public Class Form1

Private Sub BtnDelete_Click(sender As Object, e As EventArgs) Handles Button1.Click
Dim myitem
myitem = InputBox(“Ingresa el element que deseas borrar”)
ListBox1.Items.Remove(myitem)
End Sub
End Class

Para borrar todos los elementos a la vez, utilice el método Clear(), como se ilustra en el siguiente
ejemplo. En este ejemplo, añadir un botón y la etiqueta "Borrar los elementos"

Public Class Form1

Private Sub Button3_Click(sender As Object, e As EventArgs) Handles Button2.Click
ListBox1.Items.Clear()
End Sub
End Class

b. Herramienta Combo Box

En Visual Basic 2015, la función del ComboBox es también para presentar una lista de elementos
donde el usuario puede hacer clic y seleccionar los elementos de la lista. Sin embargo, el usuario tiene
que hacer clic en la propiedad Items (Colección) que está a la derecha del cuadro combinado para ver
los artículos que se presentan en una lista desplegable al igual que la herramienta anterior ListBox.

i. Adición de elementos a un cuadro combinado

Para añadir elementos a la lista en tiempo de diseño, también se puede utilizar el Editor de la
colección de elementos. Usted tendrá que escribir un elemento en el panel de propiedades con el fin de
mostrar el elemento predeterminado en tiempo de ejecución. La siguiente imagen es la interfaz en
tiempo de ejecución:

25
CORPORACION EDUCATIVA CHIJER

Además, es posible añadir elementos utilizando el método Add() . Por ejemplo, si desea añadir un
elemento al ComboBox1, puede introducir la siguiente declaración:

Public Class Form1

Private Sub BtnAdd_Click(sender As Object, e As EventArgs) Handles Button1.Click
ComboBox1.Items.Add(“Visual Studio 2015″)
End Sub
End Class

También puede permitir al usuario añadir sus propios elementos usando la función InputBox, de la
siguiente manera:

Public Class Form1

Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
Dim myitem
myitem = InputBox(“Ingresa tu elemento”)
ComboBox1.Items.Add(myitem)
End Sub
End Class

ii. Eliminación de elementos de un ComboBox

Para eliminar elementos en tiempo de diseño, basta con abrir el Editor de la colección de elementos
y eliminar los elementos en línea por línea o todos a la vez utilizando la tecla Supr.

Para eliminar los elementos en tiempo de ejecución, puede utilizar el método Remove, como se ilustra
en el siguiente ejemplo. En este ejemplo, añadir un segundo botón y la etiqueta (Label) "Eliminar
elementos". Haga doble clic en este botón e introduzca el código siguiente:

Public Class Form1

Private Sub Delete_Click(sender As Object, e As EventArgs) Handles Button2.Click
ComboBox1.Items.Remove(“Visual Basic 6”)
End Sub
End Class

El elemento "Visual Basic 6" será eliminado después de ejecutar el programa. También puede permitir
al usuario elegir qué elemento que desea eliminar.

Para borrar todos los elementos a la vez, utilice el método Clear(), como se ilustra en el siguiente
ejemplo. En este ejemplo, añadir un botón y la etiqueta "Borrar los elementos":

Public Class Form1

Private Sub Btn_Clr_Click(sender As Object, e As EventArgs) Handles Button2.Click
ComboBox1.Items.Clear()
End Sub
End Class

26
 CORPORACION EDUCATIVA CHIJER

VIII. Módulo 7: HERRAMIENTA PICTURE BOX

PictureBox (Cuadro de imagen) es un control en Visual Basic 2015 que se utiliza para mostrar
imágenes. En el módulo 3, hemos aprendido cómo insertar un cuadro de imagen en el formulario en
Visual Basic 2015. Sin embargo, no hemos aprendido cómo cargar una imagen en el PictureBox aún. En
este módulo, vamos a aprender a cargar una imagen en el PictureBox tanto en tiempo de diseño y en
tiempo de ejecución. Además de eso, también aprenderemos cómo utilizar un control común de diálogo
para buscar archivos de imagen en las unidades locales y luego seleccionar y cargar una imagen en
particular en el PictureBox.

a. Cargando una imagen en un PictureBox

i. Cargando una imagen durante el tiempo de diseño

En primer lugar, insertar un PictureBox en el formulario y cambie su propiedad de texto a “Visor

de Imagen”, su propiedad border a FixedSingle y su color de fondo a blanco. También puede ser que
desee cambiar el modo de tamaño de la imagen para estirable de modo que la imagen se adapta en el
cuadro de imagen. Ahora haga clic en el cuadro de imagen para llevar a cabo su ventana de
propiedades. En la ventana de propiedades, vaya a la propiedad de la imagen, como se muestra en la
siguiente imagen:

A continuación, haga clic en el botón gris que se encuentra con puntos suspensivos y nos aparecerá una
venta con una opción para "Seleccionar origen", tal como se muestra en la siguiente imagen:

27
CORPORACION EDUCATIVA CHIJER

Ahora seleccione la fuente local y haga clic en el botón Importar para abrir el cuadro de diálogo Abrir y
ver los archivos de imagen disponibles en las unidades locales, como se muestra en la imagen a
continuación:

Por último, seleccione la imagen que le guste y haga clic en el botón Abrir, la imagen se mostrará en el
cuadro de imagen, como se muestra en la imagen siguiente:

28
CORPORACION EDUCATIVA CHIJER

ii. Cargando una imagen durante el tiempo de ejecución

En Visual Basic 2015, una imagen también se puede cargar en tiempo de ejecución utilizando el método
FromFile del control de imagen, como se muestra en el siguiente ejemplo.

Public Class Form1

Private Sub Form1_Load(sender As Object, e As EventArgs) Handles MyBase.Load

PictureBox1.Image=Image.FromFile(“C:\Users\Toshiba\Pictures\sporetrip2014\fish.jpg”)
End Sub
End Class

* Es necesario buscar una imagen en la unidad local y determinar su ruta antes de escribir el código.

Al ejecutar el programa mostrará la misma imagen en el cuadro de imagen como en la figura anterior:

b. Cargando imagen en un PictureBox usando el control “Open File Dialog”

Hemos aprendido cómo cargar la imagen desde una unidad local en un PictureBox en tiempo de
diseño. Ahora vamos a escribir código de manera que el usuario puede navegar por los archivos de
imagen en sus unidades locales, a continuación, seleccionaremos una imagen particular y lo mostramos
en el PictureBox en tiempo de ejecución.

En primer lugar, se añade un botón y cambiamos su propiedad texto para ver y su propiedad nombre a
btnView. A continuación, añadimos el control OpenFileDialog en el formulario.

Este control será invisible en tiempo de ejecución, pero que facilita el proceso de lanzamiento de un
cuadro de diálogo y permitir al usuario navegar por sus unidades locales y luego seleccionar y abrir un
archivo.

Para que el OpenFileDialog visualice todos los tipos de archivos de imagen, es necesario especificar los
tipos de archivos de imagen bajo la propiedad Filter. Antes de eso, cambiar el nombre de
OpenFileDialog como OFGSelectImage.

A continuación, haga clic en el control OpenFileDialog para acceder a su ventana de propiedades.

Al lado de la propiedad Filter, especifique los archivos de imagen utilizando el formato: Los archivos
JPEG | *.JPG | Archivos GIF | *.GIF | ventanas de mapas de bits | *.bmp, como se muestra en la imagen
siguiente.

Estos son los formatos de archivo de imagen comunes. Además de eso, también hay que eliminar el
nombre de archivo predeterminado.

29
CORPORACION EDUCATIVA CHIJER

A continuación, haga doble clic en el botón ver e introduzca el código siguiente:

Public Class Form1

Private Sub BtnView_Click(sender As Object, e As EventArgs) Handles Button1.Click
If OFGSelectImage.ShowDialog = Windows.Forms.DialogResult.OK Then
PictureBox1.Image = Image.FromFile(OFGSelectImage.FileName)
End If
End Sub
End Class

Presione F5 para ejecutar el programa y haga clic en el botón Ver, un cuadro de diálogo que muestra
todos los archivos de imagen aparecerá, como se muestra en la siguiente figura:

30
CORPORACION EDUCATIVA CHIJER

Tenga en cuenta que el archivo de imagen predeterminado es JPEG como lo hemos colocado en el primer
lugar en la propiedad Filter. Seleccionar y abrimos un archivo de imagen y se carga en el cuadro de
imagen, como se muestra en la imagen siguiente:

31
CORPORACION EDUCATIVA CHIJER

IX. MODULO 8: MANEJO DE DATOS

Visual Basic 2015 clasifica la información en dos tipos de datos importantes, los tipos de datos
numéricos y el tipo de datos no numérico.

a. Tipos de datos numéricos

En Visual Basic 2015, los tipos de datos numéricos son tipos de datos que comprende los números
que se pueden calcular matemáticamente utilizando diversos operadores aritméticos estándar, tales
como suma, resta, multiplicación, división y más. Ejemplos de tipos de datos numéricos son notas de los
exámenes, la altura, el peso corporal, el número de estudiantes en una clase, valor de las acciones, precio
de los bienes, las facturas mensuales, cuotas, tarifas de autobuses y mucho más. En Visual Basic 2015,
los datos numéricos se dividen en siete tipos basados en el rango de valores que pueden almacenar. Los
cálculos que consistan únicamente en números redondos o datos que no necesitan alta precisión se
puede utilizar entero o entero largo. Los datos que requieren cálculo necesidad de alta precisión para
utilizar los tipos de datos de precisión simple y doble, que también se conocen como números de punto
flotante. Para el cálculo de divisas, puede utilizar los tipos de datos de moneda. Por último, si se requiere
aún más la precisión para realizar cálculos que implican muchos puntos decimales, podemos utilizar los
tipos de datos decimales. Estos tipos de datos se resumen en la Tabla siguiente:

TIPO ALMACENAMIENTO RANGO

Byte 1 byte 0-255

Integer 2 bytes 32.768 a 32.767

Long 4 bytes -2147483648 A 2147483648

-3.402823E + 38 a -1.401298E-45 para valores negativos

Single 4 bytes
1.401298E-45 a 3,402823E + 38 para valores positivos.

-1.79769313486232e + 308 a -4.94065645841247E-324 para valores

negativos
Double 8 bytes
4.94065645841247E-324 a + 308 1.79769313486232e para valores

positivos.

Currency 8 bytes -922,337,203,685,477.5808 A 922,337,203,685,477.5807

+/- 79.228.162.514.264.337.593.543.950.335 si no hay decimal es

Decimal 12 bytes usado:

+/- 7.9228162514264337593543950335 (28 cifras decimales).

b. Tipos de datos no numéricos

En Visual Basic 2015, los tipos de datos no numéricos son datos que no pueden ser calculados
matemáticamente utilizando operadores aritméticos estándar. El dato no numérico consta de texto o
datos de tipos de cadena, los tipos de datos de fecha, los tipos de datos booleanos que almacenan sólo
dos valores (verdadero o falso), el tipo de datos Object y Variant. Ellos se resumen en la Tabla siguiente:

TIPO ALMACENAMIENTO DISTANCIA

String (longitud fija) Longitud de la cadena 1 a 65.400 caracteres

32
CORPORACION EDUCATIVA CHIJER

String (longitud variable) Longitud + 10 bytes 0 a 2 mil millones de caracteres

Date 8 bytes 1 de enero de 100 el 31 de diciembre de

9999

Boolean 2 bytes Verdadero o falso

Object 4 bytes Cualquier objeto incrustado

Variant (numérico) 16 bytes Cualquier valor tan grande como Double

Variant (texto) Longitud + 22 bytes Igual que la cadena de longitud variable

c. Los sufijos para los literales

Los literales son valores que se asignan a los datos. En algunos casos, tenemos que añadir un sufijo
detrás de un literal de modo que Visual Basic 2015 pueda manejar los cálculos con mayor precisión. Por
ejemplo, podemos utilizar num = 1.3089! para un solo tipo de precisión de datos, num = 1.3089# para
un doble tipo de datos de precisión, num = 130890 para indicar el tipo de datos entero largo y num =
1.3089@ para indicar el tipo de datos de moneda. Los sufijos se resumen en la tabla siguiente.

SUFIJO TIPO DE DATOS

& Long

! Single

# Double

@ Currency - Moneda

Además, tenemos que encerrar cadenas literales dentro de dos citas y literales de fecha y hora dentro
de dos signo #. Las cadenas pueden contener cualquier carácter, incluyendo los números. Los siguientes
son algunos ejemplos:

memberName=”Turban,John.”
TelNumber=”1800-900-888-777″
LastDay=#31-Dec-00#
ExpTime=#12:00 am#

33
CORPORACION EDUCATIVA CHIJER

X. MODULO 9: MANEJO DE VARIABLES Y CONSTANTES

En el módulo 8, hemos comprendido el concepto de datos y aprendido acerca de cómo Visual Basic
2015 clasifica los diferentes tipos de datos. En esta lección, vamos a aprender cómo almacenar los datos
y cómo declarar a ellos. En Visual Basic 2015, los datos se pueden almacenar como variables o como
constantes. Las variables son como los buzones de correo en la oficina de correos. El contenido de la
variable cambia de vez en cuando, al igual que los buzones de correo. En Visual Basic 2015, las variables
son las áreas específicas asignadas en la memoria del ordenador para almacenar datos.

a. Nombres de Variables
Al igual que los buzones de correo, cada variable se debe dar un nombre. Para nombrar una variable
en Visual Basic 2015, es necesario seguir una serie de reglas. Las siguientes son las reglas al nombrar
las variables en Visual Basic 2015:

• Se debe tener menos de 255 caracteres.

• No se permite el espaciamiento.
• No debe comenzar con un número.
• No está permitido que sea periódico.

Algunos ejemplos de nombres de variables válidos y no válidos se muestran en la tabla siguiente:

LOS NOMBRES VÁLIDOS NOMBRE INVÁLIDO

My_Name My.Name

VB2015 2015VB

Long_Name_Can_beUSE LongName&Canbe&Use

b. Declaración de Variables
En Visual Basic 2015, tiene que declarar las variables antes de usarlas. Para declarar una variable,
tiene que asignar un nombre a la variable y el estado de su tipo de datos. Si no lo hacen, el programa se
ejecuta con un error. Las variables se declaran por lo general en la parte de las ventanas de código
utilizando el Dim.

La sintaxis para declarar una variable en Visual Basic 2015 es el siguiente:

Dim NombreVariable As tipo de datos

Dim Contador As Integer

Si desea declarar más variables, se pueden declarar en líneas separadas o también puede combinar más
de una línea, separando cada variable con una coma, de la siguiente manera:

Dim VariableName1 As DataType1, VariableName2 As DataType2, VariableName3 As

DataType3
Ejemplo 1:

Public Class Form1

34
CORPORACION EDUCATIVA CHIJER

Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As

System.EventArgs) Handles MyBase.LoadDim password As String
Dim MyName As String
Dim Num1 As Integer
Dim Num2 As Single
Dim Sum As Integer
Dim StartDate As Date
End Sub
End Class

También es posible combinar las declaraciones anteriores en una sola línea, separando cada variable
con una coma, de la siguiente manera:

Dim password As String, MyName As String, Num1 As Integer, Num2 as Single. Sum as
Integer, StartDate as Date

Ejemplo 2:

Public Class Form1

Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
Dim YourName As String = ”George”
Dim MyMsg As String
MyMsg = “Happy Birthday!”
MsgBox(MyMsg&”,”&YourName)
End Sub
End Class

Observe que puede asignar un valor a la cadena en una línea usando el signo = en lugar de declarar la
variable y luego le dan un valor en otra línea.
Dim TuNombre as String=”George”

Es lo mismo que:

Dim YourName as String

YourName=”George”

Cuando se ejecuta el programa, un cuadro de mensaje que muestra el texto "feliz cumpleaños, George"
aparecerá en un cuadro de mensaje, como se muestra en la imagen siguiente.

c. Asignación de valores a las variables

Después de declarar varias variables utilizando las instrucciones Dim, podemos asignar valores a
las variables. La sintaxis de una asignación en Visual Basic 2015 es:

35
CORPORACION EDUCATIVA CHIJER

Variable = Expresión

* También es posible declarar una variable mediante la asignación de un valor inicial a la misma, como
se muestra en los siguientes ejemplos:

Dim VarName As String = "ABC"

Dim VARNUM As Integer = 100

La variable puede ser una variable declarada o un valor de propiedad de control. La expresión podría
ser una expresión matemática, un número, una cadena, un valor booleano (verdadero o falso) y más,
como se ilustra en los siguientes ejemplos:

firstNumber=100
secondNumber=firstNumber-99
userName=”John Lyan”
userpass.Text = password
Label1.Visible = True
Command1.Visible = false
Label4.text = textbox1.Text
ThirdNumber = Val(usernum1.Text)
total = firstNumber + secondNumber+ThirdNumber
MeanScore% = SumScores% / NumSubjects%
X=sqr (16)
TrimString= Ltrim (“ Visual Basic”, 4)
Num=Int(Rnd*6)+1

Se produce un error cuando intenta asignar un valor a una variable de tipo de datos incompatibles. Por
ejemplo, si se ha declarado una variable como un entero pero ha asignado un valor de cadena a la misma,
se produjo un error, como se muestra en el Ejemplo siguiente:

Public Class Form1

Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
Dim YourMessage As Integer
YourMessage = “Happy Birthday!”
MsgBox(YourMessage)
End Sub
End Class

Cuando se ejecuta el programa, los siguientes mensajes de error aparecerán en un cuadro de diálogo,
como se muestra en la imagen siguiente:

36
CORPORACION EDUCATIVA CHIJER

d. Alcance de la Declaración de la variable

En Visual Basic 2015, que suelen utilizar el Dim palabra reservada para declarar los datos. Sin
embargo, también se pueden utilizar otras palabras reservadas para declarar los datos. Estas tres
palabras reservadas son privada, estática y pública. Las formas son como se muestra a continuación:

Private NombreDeVariable as Datatype

Static NombreDeVariable as Datatype
Public NombreDeVariable as Datatype

Las palabras reservadas anteriores indican el alcance de la declaración.

Privado declara una variable local, o una variable que es local a un procedimiento o módulo. Sin
embargo, rara vez se utiliza privada, ya que normalmente usamos Dim para declarar una variable local.

Estática declara una variable que se utiliza varias veces, incluso después de un procedimiento se ha
terminado. La mayoría de las variables creadas dentro de un procedimiento se descartan por Visual
Basic cuando se termina el procedimiento. Palabra reservada static preserva el valor de una variable
incluso después de que se termina el procedimiento.

Pública es la palabra clave que se declara una variable global, lo que significa que puede ser utilizado
por todos los procedimientos y módulos de todo el programa de Visual Basic 2015.

e. Declaración de constantes
Las constantes son diferentes de variables en el sentido de que sus valores no cambian durante la
ejecución del programa. La sintaxis para declarar una constante en Visual Basic 2015 es

Const ConstantName As Data Type = Value

37
CORPORACION EDUCATIVA CHIJER

Ejemplo 1:

Public Class Form1

Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
Const Pi As Single = 3.142
Dim R As Single = 10
Dim AreaCircle As Single
AreaCircle = Pi * R ^ 2
MsgBox(“Area of circle with ” & “radius” & R & “=” & AreaCircle)
End Sub
End Class

Presione F5 para ejecutar el programa y haciendo clic en el botón producirá el siguiente mensaje:

38
CORPORACION EDUCATIVA CHIJER

XI. MODULO 10: MANEJO DE ARRAYS (ARREGLOS)

a. El concepto de Arrays (arreglo)
En esta lección, vamos a aprender a trabajar con un grupo de variables. Un grupo de variables del
mismo tipo de datos se conoce como Array en Visual Basic 2015. Al trabajar con un solo elemento, sólo
tenemos que declarar una variable. Sin embargo, en el tratamiento de varios elementos de tipo similar,
tenemos que declarar un array de valores. Por ejemplo, es muy tedioso y lleva mucho tiempo para
declarar un centenar de nombres diferentes. Para solucionar el problema, declaramos un solo array para
almacenar esos nombres. Diferenciamos cada elemento del array mediante el uso de subíndices, por
ejemplo, el nombre(1), nombre(2), nombre(3), etc.

Un array de dos dimensiones es una tabla de elementos que se compone de filas y columnas. La manera
de hacer referencia a un elemento en un array unidimensional es NombreDelArray(x), donde x es el
índice o número de posición del elemento. La manera de hacer referencia a un elemento en un array de
dos dimensiones es NombreDelArray(x, y), donde (x, y) es la coordenada de la posición del
elemento. Por lo general, es suficiente utilizar una sola dimensión pero una estructura bidimensional,
sólo se tiene que utilizar arrays de dimensiones superiores si es necesario para hacer frente a problemas
más complejos. Ilustramos a continuación los arrays con las tablas siguientes.

b. Dimensión de un array
En Visual Basic 2015, una matriz puede ser unidimensional o multidimensional. Un array bidimensional
es como una lista de elementos o una tabla que consta de una fila de elementos o una columna de
elementos.

Tabla de una matriz unidimensional

Nombre del
Nombre (0) Nombre (1) Nombre (2) Nombre (3) Nombre (4) Nombre (5)
estudiante

Tabla de una matriz bidimensional

Nombre (0,0) Nombre (0,1) Nombre (0,2) Nombre (0,3)

Nombre (1,0) Nombre (1,1) Nombre (1,2) Nombre (1,3)

Nombre (2,0) Nombre (2,1) Nombre (2,2) Nombre (2,3)

Nombre (3,0) Nombre (3,1) Nombre (3,2) Nombre (3,3)

c. Declaración de Arrays
Podemos utilizar Declaración pública o Dim para declarar una matriz tal y como la forma en que
declaramos una sola variable. La Declaración pública una declaración de matriz que se puede utilizar en
toda la aplicación, mientras que la instrucción Dim declarar una matriz que podría ser utilizado sólo en
un procedimiento local o módulo.

La forma de declaración de un array unidimensional es el siguiente:

39
CORPORACION EDUCATIVA CHIJER

Dim NombreDelArray(n) as TipoDeDato

Donde n indica el último índice en el array. Tenga en cuenta que n no indica el número de elementos de
la matriz, que es uno menos que el número de elementos (n-1), porque el primer elemento es siempre
el elemento de orden cero. El primer elemento es nombreArray (0), el segundo elemento es
nombreArray (1), el tercer elemento se nombreArray (2) y así sucesivamente. El número de elementos
de una matriz también se conoce como longitud, podemos recuperar la longitud de una matriz utilizando
la sintaxis NombreDelArray.length.

Veamos:

Dim CusName(10) as String

Declarará un array que consta de 11 elementos a partir de CusName(0) hasta CusName(10)

Para averiguar la longitud de la matriz, se puede escribir el siguiente código:

Ejemplo 1:

Public Class Form1

Private Sub Form1_Load(sender As Object, e As EventArgs) Handles MyBase.Load
Dim CusName(10) As String
MsgBox(CusName.Length)
End Sub
End Class

Al ejecutar el programa producirá un cuadro de mensaje que muestra la longitud del array, es decir 11,
como se muestra en la siguiente captura:

Ejemplo 2:

Public Class Form1

Private Sub Form1_Load(sender As Object, e As EventArgs) Handles MyBase.Load
Dim CusName As String()
CusName = New String() {1, 2, 3}
MsgBox(CusName.Length)
End Sub
End Class
El cuadro de mensaje mostrará que la longitud es 3.

La declaración de un array bidimensional es la siguiente:

Dim ArrayName(m, n) As TipodeDato

40
CORPORACION EDUCATIVA CHIJER

Donde m y n indican los últimos índices de del array. El número de elementos o de la longitud de la
matriz es (m+1)x(n+1).

Ejemplo 3:

Public Class Form1

Private Sub Form1_Load(sender As Object, e As EventArgs) Handles MyBase.Load
Dim CusName(5, 6) As String
MsgBox(CusName.Length)
End Sub
End Class

La ejecución del programa mostrara el cuadro de mensaje en el que aparecerá la longitud de 42 del array
bidimensional, como se muestra en la siguiente captura:

Ejemplo 4:

Public Class Form1

Private Sub Form1_Load(sender As Object, e As EventArgs) Handles MyBase.Load
Dim num As Integer
Dim CusName(5) As String
For num = 0 To 5
CusName(num) = InputBox(“Enter the customer name”, “Enter Name”)
ListBox1.Items.Add(CusName(num))
Next
End Sub
End Class

Este programa le pedirá al usuario que introduzca los nombres en un InputBox para un total de 6 veces
y los nombres serán introducidos en un ListBox, como se muestra en las siguientes capturas:

41
CORPORACION EDUCATIVA CHIJER

42
 CORPORACION EDUCATIVA CHIJER

XII. MÓDULO 11: MANEJO DE OPERACIONES ARITMÉTICAS.

En Visual Basic 2015, podemos escribir código para dar instrucciones al ordenador para realizar
cálculos matemáticos tales como suma, resta, multiplicación, división y otros tipos de operaciones
aritméticas. Para que Visual Basic realice cálculos aritméticos, tenemos que escribir código que implican
el uso de diversos operadores aritméticos. Los operadores aritméticos en Visual Basic 2015 son muy
similares a los operadores aritméticos comunes que todos conocemos, sólo que con algunas ligeras
variaciones. Los operadores más y menos son los mismos, mientras que para el operador de
multiplicación se utiliza el símbolo * y el operador de división se utiliza el símbolo /. La lista de
operadores aritméticas de Visual Basic 2015 se muestra en la siguiente tabla:

OPERADOR FUNCIÓN MATEMÁTICA EJEMPLO

+ Adición 1+2=3

- Sustracción 10 - 4 = 6

^ Exponencial 3^2=9

* Multiplicación 5 * 6 = 30

/ División 21 / 7 = 3

Módulo (devuelve el residuo de una división

mod 15 MOD 4 = 3
entera)

\ La división entera (descarta las cifras decimales) 19 \ 4 = 4

Ejemplo 1:

En este programa, inserta dos cuadros de texto, cuatro etiquetas y un botón. En las ventanas de
propiedades, cambiar el nombre del botón para BtnCal, los nombres de los cuadros de texto a TxtNum1
y TxtNum2 y cambiar los nombres de las etiquetas para LblSum, LblDiff, LblPdct y LblQuo
respectivamente. Haga doble clic en el botón y entrar en la ventana de código y escriba el código de
Visual Basic 2015, tal como se muestra a continuación.

Public Class Form1

Private Sub BtnCal_Click(ByVal sender As System.Object, ByVal e As
System.EventArgs) Handles BtnCal.Click
Dim num1, num2, difference, product, quotient As SingleDim num1 As Single, num2
As Single, sum As Single, diff As Single, pdct As Double, quo As Double
num1 = TxtNum1.Text
num2 = TxtNum2.Text
sum = num1 + num2
difference = num1 - num2
product = num1 * num2
quotient = num1 / num2
LblSum.Text = sum
LblDiff.Text = difference
LblPdct.Text = product
LblQuo.Text = quotient
End Sub
End Class

43
CORPORACION EDUCATIVA CHIJER

Al ejecutar el programa, el usuario puede introducir dos números y haciendo clic en el botón de calcular
se realizara las cuatro operaciones aritméticas básicas. Los resultados se muestran en las cuatro
etiquetas, como se muestra en la captura siguiente:

Ejemplo 2: Teorema de Pitágoras

Este programa implica el uso del Teorema de Pitágoras para calcular la longitud de la hipotenusa “c”
dada la longitud de la banda adyacente “a” y la longitud del lado opuesto “b”. En caso de haber olvidado
la fórmula del teorema de Pitágoras, en Visual Basic se escribe como c^2=a^2+b^2.

En este programa, inserte dos cuadros de texto para que el usuario introduzca el valor de un lado “a” y
el valor de la cara “b”, respectivamente. Añadir una etiqueta para mostrar el resultado, que es la longitud
de la hipotenusa. Por último, añadir un botón y cambiar su nombre a BtnCal y texto como
“Calcular”. Haga doble clic en el botón Calcular e introduzca el código siguiente.

Public Class Form1

Private Sub BtnCal_Click(ByVal sender As System.Object, ByVal e As
System.EventArgs) Handles Button1.Click
'Dibujar el triángulo en tiempo de ejecución
Dim myPen As Pen
Dim A As New Point(10, 10)
Dim B As New Point(100, 50)
Dim C As New Point(60, 150)
Dim myPoints As Point() = {A, B, C}
myPen = New Pen(Drawing.Color.Blue, 5)
Dim myGraphics As Graphics = Me.CreateGraphics
myGraphics.DrawPolygon(myPen, myPoints)
'Ecuacion de pitagoras
Dim a1, b1, c1 As Single
a1 = TxtA.Text
b1 = TxtB.Text
c1 = (a1 ^ 2 + b1 ^ 2) ^ (1 / 2)
LblC.Text = c1
End Sub
End Class
*La primera parte del código es dibujar un triángulo en tiempo de ejecución. Aprenderemos a programar
para dibujar polígonos en el próximo modulo. La salida se muestra en la captura siguiente:

44
CORPORACION EDUCATIVA CHIJER

Ejemplo 3: Calculadora BMI (Índice de masa corporal)

Existe una gran cantidad de personas que son obesas ahora y que podría afectar seriamente su salud. Se
ha demostrado por los expertos médicos que la obesidad es un uno de los factores principales que trae
muchos problemas médicos adversos, incluyendo la de la enfermedad cardiovascular. Si su BMI es
superior a 30, se le considera obeso. Se puede hacer referencia a la siguiente gama de valores del BMI
para su estado de peso.

De bajo peso = <18.5

Peso normal = 18.5-24.9
Sobrepeso = 25-29.9
Obesidad = índice de masa corporal de 30 o mayor

Con el fin de calcular su índice de masa corporal, usted no tiene que consultar a su médico, sólo tiene
que utilizar un ordenador personal y un programa hecho calculadora o, esto es exactamente lo que
realizaremos aquí. Realizaremos un programa en Visual Basic que pueda calcular el índice de masa
corporal, o IMC de una persona basándose en el peso corporal en kilogramos y con esto la lectura del
grado de peso. El IMC se calcula mediante la fórmula peso/(altura)^2, donde el peso se mide en kg y la
altura en metros. Si sólo conoce su peso y altura en libras y pies, entonces requeriremos convertirlo en
el sistema métrico. El código se muestra a continuación:

Public Class Form1

Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As
System.EventArsgs) Handles Button1.ClickDim height, weight, bmi As Single
Height = TextBox1.Text
weight = TextBox2.Text
bmi = (weight) / (Height ^ 2)
LblBMI.Text = bmi
End Sub
End Class

La salida se muestra en la captura a continuación. En este ejemplo, su altura es de 1,80m, su peso es de

75 kg, y su IMC es de 23.14815. La lectura sugiere que el usuario está sano.

45
CORPORACION EDUCATIVA CHIJER

De los ejemplos anteriores, se puede ver que la escritura de código que implican operaciones aritméticas
es relativamente fácil. A continuación realiza la programación en Visual Basic para siguientes ejercicios.

▪ Área de un triángulo.
▪ El área de un rectángulo.
▪ Área de un círculo.
▪ Volumen de un cilindro.
▪ Volumen de un cono.
▪ Volumen de una esfera.
▪ Promedio.
▪ Conversión de kilogramos a libras.
▪ Conversión de Fahrenheit a Celsius
▪ Conversión de km a millas.
▪ Conversión de metros a pies

46
 CORPORACION EDUCATIVA CHIJER

XIII. MÓDULO 12: USO DE CONDICIONALES, EL “SI” Y EL “SI NO”

En esta lección, vamos a aprender a escribir código con el cual se pueda tomar decisiones. Podemos
escribir un programa en Visual Basic 2015 en el que se puede indicar a la computadora que realice
determinada tarea hasta que se cumplan ciertas condiciones. Con el fin de controlar el flujo del
programa y tomar decisiones, podemos utilizar los operadores condicionales y los operadores
lógicos junto con los IF…THEN...Else los cuales son palabras reservadas.

a. Los operadores Condicionales

Los operadores condicionales se asemejan a los operadores matemáticos. Estos operadores
permiten a un programa en Visual Basic 2015 comparar los valores de los datos y luego decidir qué
acciones a tomar. También son conocidos como operadores de comparación numéricos que se utilizan
para comparar dos valores para ver si son iguales o si un valor es mayor o menor que el otro valor. La
comparación devuelve un resultado verdadero o falso. Estos operadores se muestran en la Tabla
siguiente:

OPERADOR DESCRIPCIÓN

= Igual a

> Mayor que

< Menor que

>= Mayor o igual a

<= Menor o igual a

<> No igual a (diferente de)

b. Los operadores Lógicos

En ciertos casos, es posible hacer más de una comparación para llegar a una decisión. En este caso,
el uso de los operadores de comparación numérica sola puede no ser suficiente y tenemos que utilizar
los operadores lógicos, como se muestra en la más adelante. Los operadores lógicos se pueden utilizar
para comparar los datos numéricos, así como datos no numéricos, tales como cadenas.

OPERADOR DESCRIPCIÓN

And Ambas partes deben ser verdad

Or Un lado u otro debe ser verdad

Xor Un lado u otro deben ser cierto, pero no ambos

Not Niega la verdadera

c. Utilización de la estructura de control “if”

Para controlar el flujo de programa y de tomar decisiones, usaremos la estructura de
control if junto con los operadores de comparación y operadores lógicos. Hay tres tipos de estructuras
de control if, la declaración if ... Them, la declaración else, y las declaraciones If...Then...ElseIf.

i. Uso del “If…Then”

47
CORPORACION EDUCATIVA CHIJER

Esta es la estructura de control más simple para realizar una determinada acción especificada por
la expresión de “si” la condición es verdadera. Sin embargo, cuando la condición es falsa, no se realizará
ninguna acción.

Ejemplo 1:

En este programa, insertamos un cuadro de texto y cambiamos su nombre como txtNum y un botón y
cambiamos su nombre como OK. Escribimos el código para que cuando el usuario al ejecutar el
programa e introducir un número que es mayor que 100, él o ella verá el mensaje: "Es usted el suertudo
ganador del premio". Por otro lado, si el número introducido es inferior o igual a 100, el usuario no ve
ningún mensaje.

Public Class Form1

Private Sub OK_Click(sender As Object, e As EventArgs) Handles OK.Click
Dim myNumber As Integer
myNumber = TxtNum.Text
If myNumber > 100 Then
MsgBox(” You win a lucky prize”)
End If
End Sub
End Class

La salida es como se muestra en la captura siguiente:

ii. Uso del “If….Then…Else”

Como hemos visto en el ejemplo anterior usando la declaración If…Then. no proporciona una salida
alternativa para el usuario. Con el fin de proporcionar una salida alternativa, tenemos que utilizar la
declaración If….Then…Else. Esta estructura de control le pedirá a la computadora para realizar una

48
CORPORACION EDUCATIVA CHIJER

determinada acción especificada por la expresión si se cumple la condición. Y cuando la condición es

falsa, se ejecuta una acción alternativa.

Ejemplo 2:

Modificando el código en el ejemplo anterior, añadiendo la palabra reservada Else y una expresión
alternativa MsgBox("Lo siento, no ganó ningún premio"). Lo que sucederá será que si se ingresa un
número mayor a 100 mostrara el mensaje de que gano el premio como en el ejemplo anterior, la
diferencia aquí es que si se presiona un número inferior a 100 se mostrara otro mensaje alternativo el
cual será “Sorry, You did not win any prize” que es lo mismo a decir “Lo sentimos, usted no gano el
premio”.

Public Class Form1

Private Sub OK_Click(sender As Object, e As EventArgs) Handles OK.Click
Dim myNumber As Integer
myNumber = TxtNum.Text
If myNumber > 100 Then
MsgBox(” Congratulation! You win a lucky prize”)
Else
MsgBox(” Sorry, You did not win any prize”)
End If
End Sub
End Class

El resultado del programa al ingresar un número inferior a 100 será el siguiente:

Ejemplo 3

En este programa, se utiliza el operador lógico And además de utilizar los operadores de
condicionales. Esto significa que ambas condiciones se deben cumplir en caso contrario se ejecuta el
segundo bloque de código. En este ejemplo, el número introducido debe ser superior a 100 y la edad
debe ser superior a 60 con el fin de ganar un premio suerte, cualquiera de las anteriores condiciones no
cumplidas, se descalificará al usuario de ganar un premio. Es necesario añadir otro cuadro de texto para
que el usuario introduzca su edad, a continuación el código:

Public Class Form1

Private Sub OK_Click(sender As Object, e As EventArgs) Handles OK.Click
Dim myNumber, MyAge As Integer
myNumber = TxtNum.Text
MyAge = TxtAge.Text
If myNumber > 100 And MyAge > 60 Then
MsgBox(” Congratulation! You win a lucky prize”)
Else
MsgBox(“Sorry, You did not win any prize”)

49
CORPORACION EDUCATIVA CHIJER

End If
End Sub
End Class

Y el resultado al ingresar el valor de 106 y 65 de edad debería ser como se muestra a continuación:

iii. Uso del “If….Then…ElseIf”

En circunstancias en las que hay más de dos condiciones alternativas, usando sólo la declaración
If….Then…Else no será suficiente. En este caso podemos utilizar la estructura If….Then…ElseIf.
Ejemplo 12.4

Le programa siguiente deberá obtener el grado el cual se nos asignara entre (A, B, C, D) de acuerdo a la
marca que obtengamos introducida por el usuario. Es decir utiliza varios estados ElseIf y el operador
lógico And para lograr el propósito.

Public Class Form1

Private Sub OK_Click(sender As Object, e As EventArgs) Handles OK.Click
Dim Mark As Integer
Dim Grade As String
Mark = TxtMark.Text
If Mark >= 80 And Mark <= 100 Then
Grade = “A”
ElseIf Mark >= 60 And Mark < 80 Then
Grade = “B”
ElseIf Mark >= 40 And Mark < 60 Then
Grade = “C”
ElseIf Mark >= 0 And Mark < 40 Then
Grade = “D”
Else
Grade = “Out of Range”
End If
MsgBox(“You Grade is ” & Grade)
End Sub
End Class

Por ejemplo al ejecutar el programa e ingresar el valor de 85 como se muestra a continuación:

50
CORPORACION EDUCATIVA CHIJER

El programa debe mostrarnos el siguiente mensaje:

51
 CORPORACION EDUCATIVA CHIJER

XIV. MÓDULO 13: MANEJO DE OPCIONES MÚLTIPLES

En esta lección, aprenderemos a utilizar la estructura de control SelectCase en Visual Basic
2015. Esta estructura de control también implica la toma de decisiones pero es ligeramente diferente
de las anteriores estructuras de control. La estructura de control SelectCase evalúa una expresión para
varios valores. SelectCase se prefiere cuando existen múltiples condiciones de uso, similar a la
declaración If….Then…ElseIf pero este no resulta muy recomendable.

El uso de esta estructura de control lo veremos en los siguientes ejemplos:

Ejemplo 1:

En este ejemplo, el programa mostrará un mensaje relacionado con el grado introducido por el usuario.

Public Class Form1

Private Sub BtnShow_Click(sender As Object, e As EventArgs) Handles BtnShow.Click
Dim grade As String
grade = TxtGrade.Text
Select Case grade
Case “A”
MsgBox(”High Distinction”)
Case “A-”
MsgBox(”Distinction”)
Case “B”
MsgBox(”Credit”)
Case “C”
MsgBox(”Pass”)
Case Else
MsgBox(”Fail”)End Select
End Sub
End Class

La salida si ingresamos la letra A:

Ejemplo 2:

52
CORPORACION EDUCATIVA CHIJER

En este ejemplo, se puede utilizar la palabra clave is, junto con los operadores de comparación para
evaluar una expresión.

Public Class Form1

Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As
System.EventArgs) Handles Button1.Click 'examinando el marcador
Dim mark As Single
mark = mrk.Text
Select Case mark
Case Is >= 85
MsgBox(“Excellence”)
Case Is >= 70
MsgBox(“Good”)
Case Is >= 60
MsgBox(“Above Average”)
Case Is >= 50
MsgBox(“Average”)
Case Else
MsgBox(“Need to work harder”)
End Select
End Sub
End Class

Ejemplo 3:

Del ejemplo anterior podría también programarse del siguiente modo:

Public Class Form1

Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As
System.EventArgs) Handles Button1.Click
'Examination Marks
Dim mark As Single
mark = Textbox1.Text
Select Case mark
Case 0 To 49
MsgBox(“Need to work harder”)
Case 50 To 59
MsgBox(“Average”)
Case 60 To 69
MsgBox(“Above Average”)
Case 70 To 84
MsgBox(“Good”)
Case 85 To 100
MsgBox(“Excellence”)
Case Else
MsgBox(“Wrong entry, please reenter the mark”)
End Select
End Sub
End Class

53
 CORPORACION EDUCATIVA CHIJER

XV. MÓDULO 14: MANEJO DE BUCLES

En Visual Basic 2015, looping es un proceso que implica un procedimiento que se ejecuta
repetidamente hasta que se cumpla una determinada condición. Por ejemplo, podemos diseñar un
programa que agrega una serie de números hasta que la suma supere un determinado valor, o un
programa que pida al usuario que introduzca los datos varias veces hasta que el usuario indique
'Finalizar'. Hay tres tipos de bucles en Visual Basic 2015, los cuales son, Bucle For...Next, bucle Do y
bucle While...End While

a. El bucle: “For...Next”
En Visual Basic este bucle se utiliza del siguiente modo:

Ejemplo 1:

El siguiente programa calculará la suma de los números 0 + 10 + 20 + 30 + 40 + ... + 100

Public Class Form1

Private Sub Button1_Click(ByVal sender As System.Object) Handles Button1.Click
Dim counter, sum As Integer
For counter = 1 To 100 Step 10
sum += counter
ListBox1.Items.Add(sum)
Next
End Sub
End Class

b. El bucle: “Do”
En Visual Basic 2015, hay varias estructuras de bucle Do, como se muestra a continuación:

a) Do…(bloque de una o más declaraciones)…Loop

b) Do…( bloque de una o más declaraciones)…Loop While (mientras se cumpla la condición)

c) Do Until (hasta que se cumpla la condición)…( bloque de una o más declaraciones)…Loop

d) Do…( bloque de una o más declaraciones)…Loop Until (hasta que se cumpla la condición)

* Podemos emplear la sentencia Exit Do para romper un bucle.

Ejemplo 2:

En este ejemplo, el procedimiento seguirá añadiendo un número por 1 y mostrar los resultados en un
cuadro de lista. El proceso se detiene cuando se ha repetido 100 veces.

Public Class Form1

54
CORPORACION EDUCATIVA CHIJER

Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As

System.EventArgs) Handles Button1.Click
Dim sum, n As Integer
ListBox1.Items.Add(“n” & vbTab & “Sum”)
ListBox1.Items.Add(“———————-”)
Do
n += 1
sum += n
ListBox1.Items.Add(n & vbTab & sum)
If n = 100 Then
Exit Do
End If
Loop
End Sub
End Class

* El bucle en el ejemplo anterior puede ser sustituido por el siguiente bucle:

Public Class Form1

Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As
System.EventArgs) Handles Button1.Click
Dim sum, n As Integer
ListBox1.Items.Add(“n” & vbTab & “Sum”)
ListBox1.Items.Add(“———————-”)
Do Until n = 10
n += 1
sum += n
ListBox1.Items.Add(n & vbTab & sum)
Loop
End Sub
End Class

La salida es como se muestra a continuación:

c. El bucle: “While…End While”

Esta estructura es muy similar al anterior, veamos un ejemplo:

Ejemplo 3

Public Class Form1

55
CORPORACION EDUCATIVA CHIJER

Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click

Dim sum, n As Integer
ListBox1.Items.Add(“n” & vbTab & “sum”)
ListBox1.Items.Add(“———————-“)
While n <> 10
n += 1
sum += n
ListBox1.Items.Add(n & vbTab & sum)
End While
End Sub
End Class

56