Soter Array fra variabel

Hvorfor kan jeg ikke gøre sådan :

MinLinje = "3,1,4,2"

MyArray=Array(MinLinje)
max=ubound(MyArray)

For i=0 to max 
  For j=i+1 to max 
      if MyArray(i)>MyArray(j) then
          TemporalVariable=MyArray(i)
          MyArray(i)=MyArray(j)
          MyArray(j)=TemporalVariable
    end if
  next 
next 

Response.write ("The sorted values are those ones: <BR>") 

For i=0 to max 
  Response.write (MyArray(i) & "<BR>") 
next


Så snart jeg bruger en variabel med tallene der skal soteres MinLinje = "3,1,4,2" virker det ikke med MyArray=Array(MinLinje)

Men skriver jeg MyArray=Array("3,1,4,2") så gør det.