Беседка

Спасибо

блин обидно((

сууупер!!!

поздравляю!!

спасибо))))

спасибо

спасибо))

круто спс!!

спасибо))

спасибо

Вот сделал xDD

Private Sub Command2_Click()
Dim T, j, ar

Cls
T = InputBox("введите строку с числами", " ", "Вот такие числа 45 и 876")
Print T
ar = Split(T, " ")
For j = 1 To UBound(ar) Step 2
Print ar(j)
Next j
End Sub

спасибо!

Esa_ko пишет

ride013 пишет

ride013

функцию split опиши

Добавлено спустя 05 минут 59 секунд
поздно, пошел спать)

споки)

vladand1 пишет

здесь никто тебе помочь не сможет

печально..
а где помогут?

спасибо

халява

спасибо)))

спс и тебя)

спасибо)

Я за №8
красивая девушка)))