/BASIC/VBA Initialise/Initialize String/Number Array (not variant)

VBA Initialise/Initialize String/Number Array (not variant)

Sub UseStringArray()

    Dim sample() As String
    sample = StringArray("dog", "cat", "horse")

End Sub

Function StringArray(ParamArray ArgList())

    ReDim tempArray(UBound(ArgList)) As String
    For i = 0 To UBound(ArgList)
        tempArray(i) = ArgList(i)
    Next
    StringArray = tempArray

End Function

Source: stackoverflow.com

Similar codes

0 vote179 views2 answers
Get next/previous record
BASIC
0 vote233 views1 answer
Floppy disk drive +arduino
BASIC
0 vote185 views2 answers
Dos/cmd equivalent to "head"
BASIC
0 vote157 views1 answer
Theme leaf concatenate
BASIC
0 vote171 views1 answer
Console.OutputEncoding c#
BASIC
0 vote162 views1 answer
NÃO CONSIGO MANDAR UM POST EM VBNET USANDO POSTMAN
BASIC
0 vote170 views1 answer
Visual basic how to determine if an array already contains an item
BASIC
0 vote178 views2 answers
Get unique random number in vb.net
BASIC
0 vote120 views1 answer
How to simulate tail in dos/cmd without tail
BASIC
0 vote212 views1 answer
Add combobox in datagridview vb.net
BASIC