В
Все
Б
Биология
Б
Беларуская мова
У
Українська мова
А
Алгебра
Р
Русский язык
О
ОБЖ
И
История
Ф
Физика
Қ
Қазақ тiлi
О
Окружающий мир
Э
Экономика
Н
Немецкий язык
Х
Химия
П
Право
П
Психология
Д
Другие предметы
Л
Литература
Г
География
Ф
Французский язык
М
Математика
М
Музыка
А
Английский язык
М
МХК
У
Українська література
И
Информатика
О
Обществознание
Г
Геометрия
qofepvcqj
qofepvcqj
25.03.2022 22:34 •  Информатика

Напишите программу для вычеркивания из данного слова всех букв «к» и «g»; в visual basic

Показать ответ
Ответ:
tat2119
tat2119
24.07.2020 13:25
VB у меня нет, поэтому на своей форме пропишите для любой кнопки код процедуры (), а вторую процедуру разместите в любом доступном модуле, хоть в той  же форме.
Не знаю, как Вы планируете вводить текст, я его просто присвоил в программе для контрольного прогона.

Sub ()
    Dim s As Stringr
    s = "THIS IS THE GREATEST TEST STRING AND ALL K/G CHARACTERS NEED TO BE KILLED"
    DeleteChar s, "G"
    DeleteChar s, "K"
    MsgBox s
End Sub

Sub DeleteChar(ByRef s As String, c As String)
    'Удаляем из строки s символ c
    Dim k As Integer
    Do
        k = InStr(s, c)
        If k > 0 Then s = Left(s, k - 1) + Right(s, Len(s) - k)
    Loop While k > 0
End Sub

Тестовое решение:
THIS IS THE REATEST TEST STRIN AND ALL / CHARACTERS NEED TO BE ILLED
0,0(0 оценок)
Популярные вопросы: Информатика
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota Оформи подписку
logo
Начни делиться знаниями
Вход Регистрация
Что ты хочешь узнать?
Спроси ai-бота