insert multiple values into an array in VB 6.0

Question

I need to insert unique values once into an array without looping like below statement(I'm using visual basic 6.0)

Dim Marks(0 To 9) As Integer = {0, 1, 2, 3, 4, 5, 6, 7, 8, 9,}

but it has got compile error. how should be changed above statement ??

Short answer: VB6 doesn't do array literals. Longer answer: stackoverflow.com/questions/17443632/… (yes its for strings, but you can see how it would apply to ints) — CMaster
– CMaster, Commented Jun 24, 2015 at 8:39

Community · Accepted Answer · 2017-05-23 12:06:01Z

2

From Alex K's answer, but converted to int:

Function ArrayInt(ParamArray tokens()) As Integer()
    ReDim arr(UBound(tokens)) As Integer
    Dim i As Long
    For i = 0 To UBound(tokens)
        arr(i) = tokens(i)
    Next
    ArrayInt = arr
End Function

Usage:

Dim Marks() As Integer
Marks = ArrayInt(0, 1, 2, 3, 4, 5, 6, 7, 8, 9)

edited May 23, 2017 at 12:06

CommunityBot

11 silver badge

answered Jun 24, 2015 at 13:40

C-Pound Guru

16.5k6 gold badges48 silver badges70 bronze badges

Sign up to request clarification or add additional context in comments.

Comments

gihansalith · Accepted Answer · 2015-06-24 12:09:12Z

0

this is the easier way that I could found

Dim marks 
marks = Array(0, 1, 2, 3, 4, 5, 6, 7, 8, 9)

answered Jun 24, 2015 at 12:09

gihansalith

1,9205 gold badges20 silver badges21 bronze badges

1 Comment

CMaster Over a year ago

That doesn't actually do what you want (quite). The function array() returns an array of variants. And by declaring (dim) marks with no type at all, you have declared it as a variant itself. This leaves you vulnerable to a whole load of problems in your code, as it is possible that that marks will not be an array at all, or that it may contain values that are not integers. At the very least, declare dim marks as variant()

Collectives™ on Stack Overflow

insert multiple values into an array in VB 6.0

2 Answers 2

Comments

1 Comment

Your Answer

Linked

Hot Network Questions

Collectives™ on Stack Overflow

2 Answers 2

Comments

1 Comment

Your Answer

Sign up or log in

Post as a guest

Linked

Related