Напишите программу для проверки, есть ли в данном слове буква «в». Если есть, то найдите номер первой из них;
Напишите программу для проверки, есть ли в данном слове буква «в». Если есть, то найдите номер первой из них;
Гость
Ответ(ы) на вопрос:
ГостьКод для кнопки:
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
Не нашли ответ?
Похожие вопросы