VBS frage zum Array

[SVol]

Moin moin

ich bin ein VBS Neuling und versuche folgendes zu lösen:

dim test (3)

test (0) = "Horst"
test (1) = "Paul"
test (2) = "Carl"

Ich hätte es gerne so:

dim test (3)

test (x) = "Horst"
test (x) = "Paul"
test (x) = "Carl"


ich habe da eine Lösung die geht

dim test (3)
dim x

x=0
test (x) = "Horst" : x=x+1

Die ist mir aber nich "Charmant" genug, gibt es da bessere möglichkeiten ?

Schön fände ich die befehle:

So dat is mein Array
text()
gefüllt mit
Horst
Paul
Carl
Arbeite damit und benutze die Reihenfolge.

da ich komplett neu bin in VBS fehlen mir die Befehle.


Gruss SVol

 

[sdwaroc]

Dim deinArray("Horst", "Paul", "Carl")

leistet das gewünschte.

Genau wie:

Dim deinArray()
deinArray(0) = "Horst"
deinArray(1) = "Paul"
deinArray(2) = "Carl"

Die Deklaration kann eine feste Größe enthalten und per Schleife gefüllt werden:

Dim deinArray(3)
For i=0 to ubound(deinArray)
    deinArray(i) = was_auch_immer
Next

 

[ella_one]

Ich handhabe das meist so:

Sub ArrayTest()
Dim avntArray() As Variant
avntArray = Array("Horst", "Paul", "Carl")
End Sub

 

[sdwaroc]

Natürlich kann man das wie ella schreibt auch noch als Prozedur oder Funktion Kapseln:

Sub deinArrayBefuellen()
    [hier den gewünschten Code einfügen]
End Sub

oder

Function deinArrayBefuellen()
    [hier den gewünschten Code einfügen]
End Function

 

[SVol]

Hallo,
--------------------------------------------------------------------------------
Dim deinArray("Horst", "Paul", "Carl")

Bei der Version sagt er mir Ganzzahlige Konstante erwartet

---------------------------------------------------------------------------------

Dim deinArray(3)
For i=0 to ubound(deinArray)
deinArray(i) = was_auch_immer
Next

Bei der Version gibt er mir bei der weiteren abfrage Horst :1
:1
:1
Aus und nicht

Horst:1
Paul:1
Carl:1
----------------------------------------------------------------------------------

Dim deinArray()
deinArray(0) = "Horst"
deinArray(1) = "Paul"
deinArray(2) = "Carl"

das ist nicht das was ich suche da ich bei deinArray(0) immer die zahl ändern muss wenn ich was in der mitte hinzufüge und das kann bei mehreren einträgen nervig werden.

 

[sdwaroc]

Dann suchst du vllt eine Liste und kein Array:
http://stackoverflow.com/questions/13585660/lists-in-vbscript

 

[SVol]

Hallo,

kann sein schau ich mir an.
Obwohl das Array gut funktioniert ich will halt nur nicht ständig die Nummer (vom Array eintrag) neu Sortieren wenn ein neuer User dazu kommt. In VB gibt es die Enum funktion für sowas aber in VBS ist es nicht so einfach oder ?