Задача в VBA: Дана строка S и символ C. Удвоить каждое вхождение символа C в строку S

Ответы:

Ваня Орел

09-07-2014 14:30

Sub Zadanie()Dim S As StringDim C As StringS = InputBox("Stroka?")Again:C = InputBox("Simvol?")If Len(C) <> 1 Then GoTo AgainS = Replace(S, C, C + C)MsgBox (S)End Sub

Также наши пользователи интересуются:

Картинка с текстом вопроса от пользователя ГЛЕБ ЛЬВОВ

⭐⭐⭐⭐⭐ Лучший ответ на вопрос «Задача в VBA: Дана строка S и символ C. Удвоить каждое вхождение символа C в строку S» от пользователя ГЛЕБ ЛЬВОВ в разделе Экономика. Задавайте вопросы и делитесь своими знаниями.

Открой этот вопрос на телефоне - включи камеру и наведи на QR-код!