Mega Code Archive

 

Categories / VisualBasic Script / Language Basics

 

Passing Elements of an Array to Another Procedure

'Option Base 1 Sub CityOperator()     Dim cities(6) As String     cities(1) = "Baltimore"     cities(2) = "Atlanta"     cities(3) = "Boston"     cities(4) = "Washington"     cities(5) = "New York"     cities(6) = "Trenton"     Hello cities() End Sub Sub Hello(cities() As String)     Dim counter As Integer     For counter = 1 To 6     MsgBox "Hello, " & cities(counter) & "!"     Next End Sub