Все игры
Запись
Это спам

Please HELP!!!


Нравится

Вы не можете комментировать, т.к. не авторизованы.


Никита Сунгуров      19-05-2011 14:27 (ссылка)
Re: Please HELP!!!
поищи аналог Replace (из VB6)
Text1.Text = Replace(Text1.Text, "@", "@ -")
Никита Сунгуров      19-05-2011 14:29 (ссылка)
Re: Please HELP!!!
VB6:
xLeft = Left(Text1.Text, 3)
Text1.Text = xLeft & " - " & Right(Text1.Text, Len(Text1.Text) - Len(xLeft))