Создание проекта, проверяющего наличие данной буквы - 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

ИИ поможет Вам:


  • решить любую задачу по программированию
  • объяснить код
  • расставить комментарии в коде
  • и т.д
Попробуйте бесплатно

Оцени полезность:

6   голосов , оценка 3.833 из 5
Похожие ответы