Array befüllen mit Variablen

Das Problem ist folgendes, ich möchte die Konstanten in das Array einlesen lassen mittels einer Schleife.
Der Knackpunkt liegt darin, dass bei der Zuweisung des Arraywertes die Zuweisung als Textstring erkannt wird und nicht als der Wert der oben Angegebenen Konstanten.

Einer eine Idee oder ist es nicht möglich??

Dim ProcessArray(2) ' Array
Dim i 'Hilfsvariable

Const Process1 = "Notepad.exe"
Const Process2 = "Mspaint.exe"

For i = 1 To 2

ProcessArray(i) = "Process" & i
WScript.Echo ProcessArray(i)

Next

ProcessArray = Array("Notepad.exe", "Mspaint.exe")  

For i = 0 To UBound(ProcessArray)
    WScript.Echo ProcessArray(i)
Next

Dim ProcessArray(2) ' Array  
Dim i 'Hilfsvariable  

Const Process1 = "Notepad.exe"  
Const Process2 = "Mspaint.exe"  

For i = 1 To 2

ProcessArray(i-1) = "Process" & i  
WScript.Echo ProcessArray(i-1)

Next

ProcessArray(i-1) = Eval("Process" & i)