Для заданного возраста человека, вывести фразу вида: "Мне 18 лет", "Мне k лет" - VB

Узнай цену своей работы

Формулировка задачи:

Для заданного 0 < k < 200,рассматриваемого как возраст человека,вывести фразу вида: "Мне 18 лет", "Мне k лет". Помогите составить программный код

Решение задачи: «Для заданного возраста человека, вывести фразу вида: "Мне 18 лет", "Мне k лет"»

textual
Листинг программы
Private Sub Command1_Click()
Dim k As Integer
If Text1.Text <> "" Then
k = Text1.Text
If k > 0 And k < 200 Then
Label1.Caption = "Мне " & k & " лет"
End If
End If
End Sub

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


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

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

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