Итак. Открываем visual basic.Создаем проект типа Windows Form App.По идее, приложение могло иметь только один TextBox, но я целенаправленно использую два, так понятнее. Заранее пишу, TextBox1.Text - входная текст, TextBox2.Text - выходной текст. Размещаем TextBox1, размещаем справа TextBox2. Теперь размещаем кнопки.Их будет две, но чтобы вы не запутались (да и я), сделаем все по порядку. Поэтому создаем Button1 (кнопочка для кодирования). Создаем событие для Button1 двойным кликом. Теперь в Sub прописываем следующее. TextBox2.Text = Replace(Textbox1.Text , "а" , "**") TextBox2.Text = Replace(TextBox2.Text , "б" , "%%") Первый аргумент - есть поле текста (TextBox1.Text или TextBox2.Text), второй аргумент - что заменить, третий - на что заменить. Я не буду показывать то, как шифровать весь алфавит.Все остальное вы сделаете сами.Потому что это вопрос времени. Создаем Button2 ( кнопочка декодирует текст), ну-у и событие, разумеется. Как вы догадались - метод тот же самый. TextBox2.Text = Replace(TextBox1.Text , "**" , "а") TextBox2.Text = Replace(TextBox2.Text , "%%"); ========== Итак, запустите предложение. Вставьте в поле слева (TextBox1) "аб". Нажмите на Button1. В поле справа появится "**%%".Теперь сотрите все из поля слева. Вставьте в него "**%%", в поле справа вы увидете "аб". Работает)) Сделал Decimal.