Заменить в слове Х те буквы, которые используются при написании слова У, буквой "о" - VB
Формулировка задачи:
Составьте программу, заменяющую в слове Х те буквы, которые используются при написании слова У, буквой «о».
Заранее спасибо.
Решение задачи: «Заменить в слове Х те буквы, которые используются при написании слова У, буквой "о"»
textual
Листинг программы
private sub command1_Click()
dim X as string, Y as string, n as integer
x=inputbox ("Vvedite Slovo X")
y=inputbox ("Vvedite Slovo Y")
for n = 1 to len(Y)
x=replace(x,mid(y,n,1),"o")
next n
msgbox x
end sub