Как в VB преобразовать строку в массив?

[mormax]

Нужно разбить строку на отдельные символы, как это сделать?

[Naeel Maqsudov]

В цикле присвоить i-тому элементу массива выражение mid(S,i,1)

Только зачем это надо, если не секрет?

[mormax]

Просто нужно из строки удалить все буквы, оставив только цифры.
Как сделать, не перебирая каждый символ и проверяя его ф-ией IsNumeric, я не знаю...

[Naeel Maqsudov]

проще пареной репы

Код: Выделить всё

S="1 Исходная строка с цифрами 123 и 741. Вот"
S2=""
For i=1 to Len(S) 
  Si=mid(S,i,1) 
  select case Si
    case "0" to "9": S2 = S2 & Si
  end select
Next
S=S2 'А теперь остались одни цифры - "1123741"