Programm Visual Basic

[dom (Gast)]

Hallo Leute!

Ich weiß, es passt hier net so toll rein, aber vllt kann mir ja einer
helfen.
Ich schreib grad ein Programm in VB und komm net weiter...

Ich hab 3 Strings, row_1 - row_3...
Diese sollen nacheinander auf die Zahlen 1-3 überprüft werden und diese
im Falle das sie vorkommt zu einer anderen Variable addiert werden, aber
seht selbst!
Nun, o weit sogut hier ist mal mein Code bisjetzt... Dieser überprüft
den String MeinString nacheinander auf die Variable Gesucht = 1 bis 3
funktioniert auch so weit.

For Gesucht = 1 To 3

    Prüfsumme = Prüfsumme + (Gesucht + 1) * _
                UBound(Split(MeinString, Gesucht, , vbTextCompare))

Next Gesucht

Nun will ich aber nachdem der erste String überprüft wurde den zweiten
prüfen usw und steig da grad echt net durch.

Ich hab schon versucht die Schleife in eine 2. zu setzen und in der
anderen dann ne Variable hochzuzählen und dann MeinString aus "row_"
und der Variable zusammenzusetzen... Das geht aber nicht weil die in
einander verschachtelten Schleifen net so funktioniern wie ich mir des
dachte..

Steh echt aufm Schlauch.. bitte helft mir ;)

Gruß

[Andreas B. (Gast)]

Ich glaube du brauchst ein Array, oder wie willst du denn den Namen
zusammensetzen?

Dim row(3) as string

row(1)="3";

dann in der Schleife:

for x=0 to 3
    For Gesucht = 1 To 3
         Prüfsumme = Prüfsumme + (Gesucht + 1) * _
                UBound(Split(MeinString, Gesucht, , vbTextCompare))

    Next Gesucht
next x

ich bin mir aber nicht sicher ob ich dich richtig verstanden habe...

mfg Andreas

[Andreas B. (Gast)]

Statt "MeinString" müsste da natürlich row(x) stehen...

[dom (Gast)]

Wunderbar, genau das was ich gesucht hab ;)

Dankeschön!!