Разбивание слов

Программирование на Visual Basic, главный форум. Обсуждение тем программирования на VB 1—6.
Даже если вы плохо разбираетесь в VB и программировании вообще — тут вам помогут. В разумных пределах, конечно.
Правила форума
Темы, в которых будет сначала написано «что нужно сделать», а затем просьба «помогите», будут закрыты.
Читайте требования к создаваемым темам.
VINNY-PYX
Продвинутый пользователь
Продвинутый пользователь
Аватара пользователя
 
Сообщения: 125
Зарегистрирован: 02.02.2004 (Пн) 17:24
Откуда: из роддома

Разбивание слов

Сообщение VINNY-PYX » 26.06.2004 (Сб) 21:01

необходимо разбить слово на части и поставить между буквами пробел
Ex:
СЛОВО => C Л О В О

areh
Постоялец
Постоялец
 
Сообщения: 530
Зарегистрирован: 02.12.2002 (Пн) 12:28
Откуда: РОССИЯ, Салехард

Сообщение areh » 26.06.2004 (Сб) 21:08

Что значит разбить слово на части я не совсем понял, но вот тебе функция, которая делает то что я понял из твоего примера

Function InsertSpace(ByVal Word As String) As String
Dim tmpStr As String

For i = 1 To Len(Word)
tmpStr = tmpStr & Mid(Word, i, 1) & " "
Next i

InsertSpace = tmpStr
End Function

VINNY-PYX
Продвинутый пользователь
Продвинутый пользователь
Аватара пользователя
 
Сообщения: 125
Зарегистрирован: 02.02.2004 (Пн) 17:24
Откуда: из роддома

Сообщение VINNY-PYX » 26.06.2004 (Сб) 21:48

просто (и) ГЕНИАЛЬНО :wink: ! Как я сам не додумался :?: :shock:


Вернуться в Visual Basic 1–6

Кто сейчас на конференции

Сейчас этот форум просматривают: Google-бот и гости: 7

    TopList