Гость
Целевая тема:
Создать новую тему:
Автор:
Форумы / Visual Basic [игнор отключен] [закрыт для гостей] / Заменить символ в строке / 5 сообщений из 5, страница 1 из 1
06.11.2007, 07:45
    #34917583
Youra Polishuk
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Заменить символ в строке
Как заменить пятый элемент строки на символ "_".
Private Sub Button_Click()
Dim Str As String
Str = TextBox1.Text
For i = 1 To Len(Str)
MsgBox Mid(Str, i, 1)
Next i
Mid(strConvert, 5, 1) = "_"
MsgBox Str
End Sub
...
Рейтинг: 0 / 0
06.11.2007, 08:54
    #34917642
Deggasad
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Заменить символ в строке
Проверку на количество символов нужно делать

Код: plaintext
1.
x = "ddddddd"
x = Left(x,  4 ) & "_" & Right(x, Len(x) -  5 )

или можно так (в Экселе)
Код: plaintext
1.
x = "ddddddd"
x = Evaluate("REPLACE(""" & x & """,5,1,""_"")")
...
Рейтинг: 0 / 0
06.11.2007, 11:46
    #34918160
vkodor
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Заменить символ в строке
Youra PolishukКак заменить пятый элемент строки на символ "_".
Private Sub Button_Click()
Dim Str As String
Str = TextBox1.Text
For i = 1 To Len(Str)
MsgBox Mid(Str, i, 1)
Next i
Mid(strConvert, 5, 1) = "_"
MsgBox Str
End Sub
А чем не устраивает Mid(strConvert, 5, 1) = "_"

Может тем что забыли поменять "strConvert" на "Str"
...
Рейтинг: 0 / 0
06.11.2007, 14:08
    #34918860
Deggasad
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Заменить символ в строке
и то так!
...
Рейтинг: 0 / 0
07.11.2007, 13:09
    #34921700
Youra Polishuk
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Заменить символ в строке
Спасибо. Разобрался.
...
Рейтинг: 0 / 0
Форумы / Visual Basic [игнор отключен] [закрыт для гостей] / Заменить символ в строке / 5 сообщений из 5, страница 1 из 1
Найденые пользователи ...
Разблокировать пользователей ...
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


Просмотр
0 / 0
Close
Debug Console [Select Text]