Создание проекта, проверяющего наличие данной буквы - VB
Формулировка задачи:
Создать проект, который проверяет, есть ли в данном слове буква "В". Если есть, то найти номер первой из них.
Решение задачи: «Создание проекта, проверяющего наличие данной буквы»
textual
Листинг программы
Sub ПРОЕКТ() Dim S As String 'Слово S = InputBox("Введите Слово") Dim P As Long 'позиция "В" в Слове P = InStr(1, S, "В", vbTextCompare) If P > 0 Then MsgBox "номер первой из них = " & P Else MsgBox "Не этой буквы в данном слове!" End If End Sub
ИИ поможет Вам:
- решить любую задачу по программированию
- объяснить код
- расставить комментарии в коде
- и т.д