Основные возможности Visual Basic. Макова Н.Е. - 42 стр.

         мент управления Label, так как в этом поле нельзя исправить вы-
         веденный результат.
         • Для отображения рисунка при построении используется эле-
         мент управления Image1.
         • Для ввода значения X используется текстовое поле – TextBox1.
         • Для ввода значения Y используется текстовое поле – TextBox2.
         • Для ввода значения R используется текстовое поле – TextBox3.
         • Для вывода длины окружности С используется надпись –
         Label10.
         • Для вывода площади круга S используется надпись – Label11.
         • Для вывода удаления центра L используется надпись – Label12.
              Расчет и вывод результатов должен осуществляться по на-
         жатию на кнопку "Запуск" в форме. Программа для кнопки "За-
         пуск":
         Sub Command1_Click ()
              'Объявление переменных
         Dim R As Single, X As Single, Y As Single, C As Single, S As Single, _
              L As Single, Pi As Single
              Pi = 3.14
              'Преобразование данных считанных из текстовых полей в чи-
         словые
              X = Val(Text1)
              Y = Val(Text2)
              R = Val(Text3)
              'Вычисление значений
              C = 2 * Pi * R
              S = Pi * R * R
              L = Sqr(X ^ 2 + Y ^ 2)
              'Вывод результатов
              Label10.Caption = Str(C)
              Label11.Caption = Str(S)
              Label12.Caption = Str(L)
         End Sub
              Разберем программу.
              Первая строка – отзыв кнопки Command1 на щелчок мыши.
              Объявление переменных



         42

PDF created with FinePrint pdfFactory Pro trial version www.pdffactory.com