Войти
Регистрация
Спроси ai-bota
В
Все
М
Математика
О
ОБЖ
У
Українська мова
Д
Другие предметы
Х
Химия
М
Музыка
Н
Немецкий язык
Б
Беларуская мова
Э
Экономика
Ф
Физика
Б
Биология
О
Окружающий мир
Р
Русский язык
У
Українська література
Ф
Французский язык
П
Психология
А
Алгебра
О
Обществознание
М
МХК
В
Видео-ответы
Г
География
П
Право
Г
Геометрия
А
Английский язык
И
Информатика
Қ
Қазақ тiлi
Л
Литература
И
История
Показать больше
Показать меньше
БПД
05.05.2023 12:17 •
Информатика
Напишите программу для проверки, есть ли в данном слове буква «в». если есть, то найдите номер первой из них;
Показать ответ
Ответ:
Whitestar123
22.07.2020 12:25
Код для кнопки:
Private Sub Command1_Click()
Dim s As String
s = InputBox("Введите слово")
p = InStr(s, "в")
If p > 0 Then
MsgBox "Номер буквы ""в"" в слове равен " + Str(p)
Else
MsgBox "В слове нет буквы ""в"""
End If
End Sub
0,0
(0 оценок)
Популярные вопросы: Информатика
Muhammadkhodja
16.09.2020 09:04
:дротовій комп ютерній миші виповнилися 50 років, а бездротовій 10 років. через скільки років дротова комп ютерна миша буде вдвічі старша за бездротову?...
Рома67463
03.10.2021 10:58
Сколько бит информации содержится в сообщении из 48 символов, если алфавит состоит из 64 символов?...
goldlena1979
02.09.2021 03:00
|| PYTHON || Простым числом будем называть натуральное число, большее единицы и делящееся только на единицу и на само себя. Выпишем все простые числа в порядке возрастания...
egordima2003
19.09.2020 19:28
Python 1. Надрукувати таблицю значень 1, 2, … n доларів США у переведенні на гривні за поточним курсом k (значення курсу вводиться з клавіатури). 2. Користувачем...
mariabrin27
18.07.2022 03:37
Пишу код в python. В любом случае выполняется первое условие, даже если выпадает человек, орк или вампир Вот код: race =[ fary , elf , dwarf , human , ork , vampire...
ilmasha24
30.09.2022 00:14
Напишите программу, в которой пользователь вводит 3 целых числа, и программа должна отображать среднее арифметическое этих чисел....
джемре
17.07.2021 20:49
Перед вами 4 лампочки и один выключатель и любая лампочка может загореться когда вы нажимаете на него. Если зажжется крайняя правая лампочка, сколько бит информации...
baukinakatya
31.12.2020 11:23
Как называется шрифт изображённый на картинке?...
napolskai24
21.08.2020 18:40
Сколько цветов содержится в палитре растрового рисунка если на кодирование каждого пикселя отводится 9 бит?...
kshig
20.05.2020 07:26
Найдите основание X системы счисления в которой выполняется равенство 16 Икс плюс 33 икс равно 52 Икс...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
Спроси ai-бота
Private Sub Command1_Click()
Dim s As String
s = InputBox("Введите слово")
p = InStr(s, "в")
If p > 0 Then
MsgBox "Номер буквы ""в"" в слове равен " + Str(p)
Else
MsgBox "В слове нет буквы ""в"""
End If
End Sub