[VBS] Var übergeben aus Sub

max2k3

Lt. Commander
Dabei seit
Apr. 2003
Beiträge
1.818
Hi, ne einfache frage

.. wie bring ich es hin dass folgendes geschiet...


Sub Do_Multiple_Checks

c = 0
Do Until c = 100


Do_Single_Check(Test_Array(c)) // hier ist das problem ich muss sozusagen den aktuellen wert des arrays unten als tsstring haben wenn Do_Single_check durchgeführt wird. Das Array ist eine globale variable und ist überall verfügbar
c = c+1

Loop
End Sub


Sub Do_Single_Check

MsgBox tstring

End Sub



vorweg: es geht nur ums prinzip das ganze hab ich vereinfacht (inwirklichkeit werden wmi-befehle ausgeführt und keine msgbox) damit es nicht zu unübersichtlich wird.. also nochmal kurz in worten: Wie bring ich ihn dazu den Arraywert als tsstring rüberzuschicken bei ausführung der Do-multiple-checks
 

Toaster

Lt. Commander
Dabei seit
Apr. 2001
Beiträge
1.266
Sub Do_Multiple_Checks

c = 0
Do Until c = 100


Do_Single_Check(cstr(Test_Array(c))) // hier ist das problem ich muss sozusagen den aktuellen wert des arrays unten als tsstring haben wenn Do_Single_check durchgeführt wird. Das Array ist eine globale variable und ist überall verfügbar
c = c+1

Loop
End Sub


Sub Do_Single_Check(tstring as string)

MsgBox tstring

End Sub

so sollte es gehen
 
Top