Числа из строки

[KPEATOP]

Подскажите кто знает.
Как из строки , например "134,3456,55,2,677" присвоить переменным числовые значения, которые перечислены через запятую ?
а=134
b=3456
c=55
d=2
e=677
Заранее спасибо!

[alibek]

Почитай хэлп к функции Split().

[Jenizix]

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


Private Sub Form_Load()
    Dim str As String
    str = "134,3456,55,2,677"
   
    Me.AutoRedraw = True
   
    arr = Split(str, ",")
   
    For i = 0 To UBound(arr)
        Print "arr(" & i & ") = " & arr(i)
    Next
End Sub


[AjaxVS]

А у меня Split() не работает... у меня VB5...
Так что я давно уже сделал функцию fun_char2char(byval s_s as string, s_what as string, s_that as strings), теперь сразу ее подключаю...

[tyomitch]

А у меня Split() не работает... у меня VB5...

Что-то мешает поставить VB6?