Задача в VBA:

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

Question

Информатика

Ванята

24 апреля, 14:57

Задача в VBA:

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

+2

Ответы (1)

Знаете ответ?

Аделаида · Answer 1

Sub Zadanie ()

Dim S As String

Dim C As String

S = InputBox ("Stroka?")

Again:

C = InputBox ("Simvol?")

If Len (C) 1 Then GoTo Again

S = Replace (S, C, C + C)

MsgBox (S)

End Sub

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

Задача в VBA:

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