To/From Code

	Languages
BROWSEBYLANGUAGE Access VBA ASP Classic C# C++ C++/CLI Corel Paradox Delphi Delphi Prism Java JavaScript Perl PHP VB Classic VB.Net

	Categories
BROWSEBYCATEGORY +Tool Basics +Language Basics -Language Details Custom Routines Event Handler Inline Code Inlining Overloading Parameters Self Keyword +Data Structures +Statements +Operators +Commands +Database +OOP Basics +OOP Details

	VB Classic Guides
VB Classic To/From Conversion Guides VB Classic and Access VBA VB Classic and ASP Classic VB Classic and C# VB Classic and C++ VB Classic and Corel Paradox VB Classic and Delphi VB Classic and Delphi Prism VB Classic and Java VB Classic and JavaScript VB Classic and Perl VB Classic and PHP VB Classic and VB.Net

Cross Ref Guide

VB CLASSICLANGUAGE

VB Classic

VB CLASSICANDC++/CLITOC

Overview

+Tool Basics

Report Tools Overview

+Language Basics

-Language Details

+Data Structures

Array◄╣

+Statements

+Operators

+Commands

+OOP Basics

+OOP Details

	Members-Only
Sign in to see member-only pages.

► KB ► To/From Guides ► VB Classic ► Language Details

Print This

Array (Cross Ref > Language Details)

By Mike Prestwood

VB Classic versus C++/CLI: A side by side comparison between VB Classic and C++/CLI.

Data Structures

Data structures allow you to store and work with data. Common data structures include arrays, associative arrays, etc.

Array

[Other Languages]

Languages Focus

A data structure in which individual values (called elements or items) may be located by reference to one or more integer index variables, the number of such indices being the number of dimensions in the array.

Arrays can start with an index value of 0 or 1, sometimes referred to as 0 based or 1 based.

VB Classic: x = Array()

Arrays in VB Classic use a 0-based indice. Use UBound to get the number of elements. UBound returns -1 if the array has no elements, 0 if it has 1, 1 if it has 2, etc.

Syntax Example: 1 certification question.

Dim MyArray As Variant
Dim i As Integer
 
MyArray = Array("Mike", "Lisa", "Felicia", "Nathan")
 
If UBound(MyArray) > -1 Then
  For i = 0 To UBound(MyArray)
    MsgBox (MyArray(i))
  Next
End If

[Not specified yet. Coming...]