ПРАКТИЧЕСКАЯ РАБОТА №3

Вывод данных на форму

Вывод результатов вычислений на форму при создании приложений. Оператор цикла. Преобразование данных строкового типа в числовые.

Задание. Составить программу для построения таблицы значений а и Ь, если а = х+4.3, Ь = ах + 1.23 при изменении х в диапазоне [0, 5] с шагом h = 0,5. Результат вычислений вывести в виде таблицы.

  1. Запустите Visual Basic с помощью меню Window/Пуск/Программы. Если программа уже работает, то открыть новый проект Project.
  2. Для создания приложения необходимо использовать следующие объекты управления:

Label1         -      метка;
Command1 - командная кнопка;
Command1 - командная кнопка.

Перенести на пустую форму эти элементы и уменьшить размеры формы до допустимо возможных, так как других компонент нет.

Рис 4.5.   Вывод данных на форму  
  1. В работе следует использовать следующие свойства Properties :

    Label1   Caption ='Группа, Ф.И.О. студента'
    Command1 Caption = 'Старт'
    Command2 Caption = 'Финиш'
    forml Caption ='Практическая работа №3'
  2. Набрать программный код в соответствии с приведенным ниже текстом
    Private Sub Commandl_Click()
    Dim xO, xk, x, a, b, h As Single
    Dim i, n As Integer
    Rem Ввод данных в текстовое окно и преобразование их в числа xO, xk, h
        xO = Val(InputBoxf"Ввести начальное значение х", "Пример 3"))
        xk = Val(InputBox("Ввести конечное значение xk", "Пример 3"))
       h = Val(InputBox("Ввести h - шаг изменения х", "Пример 3"))
    х = хО
    forml.Cls v - Очистка формы
    Print: Print " "; " хО="; xO, "xk="; xk, "h ="; h
    Print: Print " "; " a", " b", " x": Print
    Rem - Выделение целой части числа
    n = Int((xk - xO) / h)
    Rem Определение количества данных, выводимых на форму
    for i = 1 То n
    а = х + 4.4: b = а * х + 1.23
    Print " "; a, b, ^c
    х = х + h
    Next
    End Sub
       Private Sub Command2_Click()
       End
       End Sub
  3. Запустите программу на выполнение: из меню Run/Start или клавишей F5. После запуска программы следует нажать кнопку «Старт», на экране по очереди откроются окна с заголовком «Пример 2» (см. в программе оператор InputBox ).Пользователь должен ввести в текстовом поле соответствующего окна значения:начальное значение хО, конечное значение xk, h - шаг изменения х (см. условие задачи в начале).
  4. Результат работы программы показан на рис. 4.5. Повторите все сначала, нажав кнопку «Старт»: измените данные и т. д.
  5. Для завершения выполнения программы необходимо нажать кнопку на форме «Финиш» (или значок «закрыть» на форме) или выполнить команду Run/End.
  6. Сохранить файл программы и файл формы с соответствующими расширениями .bas и .frm.
  7. Задание. Выполнить манипуляции с формой и компонентами на ней, изменяя свойства формы: WindowState, MaxButton, MinButton, ControlBox, BorderStyle.