Visual Basic

  • pdf
  • 03.05.2020
Публикация на сайте для учителей

Публикация педагогических разработок

Бесплатное участие. Свидетельство автора сразу.
Мгновенные 10 документов в портфолио.

Иконка файла материала 5. Visual Basic.pdf

ПР. Проект «Високосный год».

1.   Запустите MS Visual Studio.

2.   Создайте новый проект.

3.   Поместите на форму:

4.   Код.

Public Class Form1

  Dim year As Integer

  Dim result As String   Private Sub Button1_Click …    year = Val(TextBox1.Text)

   If (((year Mod 4) = 0) And ((year Mod 100) > 0)) Or ((year Mod 400) = 0) Then       result = "Високосный год"    Else

      result = "Невисокосный год"

   End If

      Label2.Text = result

  End Sub

End Class

 

5.   Запустите проект.   

6.   Сохраните в папке «Мои программы».