По дисциплине «Информатика»
по теме «Интерактивные приложения в Visual Basic.»
Выполнил:
Студент 1 курса гр. 1206
________________________ Липчук А.И.
(подпись)
Преподаватель
________________________
(подпись)
Н.Новгород
2012
Цель работы: Создание Windows-приложений в среде Visual Basic 2005. Знакомство со средой Visual Basic 2005. Приобретение навыков проектирования графического интерфейса.
Задание:
1. Создать новый проект в среде Visual Basic 2005.
2. Составить эскиз интерактивной формы (Рис. 1).
3. Составить программу вычисления заданного выражения (Табл. 4), предусмотрев ввод исходных данных через текстовые поля интерактивной формы и отображение результирующего значения посредством поля надписи той же интерактивной формы.
4. Выполнить сборку и компиляцию программы.
5. Запустить программу на выполнение, ввести исходные данные и получить результат вычисления заданного выражения.
6. Записать полученные результаты и оформить отчѐт о проделанной работе.
Алгоритм выполнения задания:
1. Создаю новый проект в среде Visual Basic.
|
|
2. Составляю эскиз интерактивной формы.
3.Создаю программу. Выполняю сборку и компиляцию программы.
Текст программы:
Public Class Form1
Private Sub Form1_Load(sender As Object, e As EventArgs) Handles MyBase.Load
TextBox1.Text = ""
TextBox2.Text = ""
TextBox3.Text = ""
Label6.Text = ""
End Sub
Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
Dim A, B, X, Y As Double
A = Val(TextBox1.Text)
B = Val(TextBox2.Text)
X = Val(TextBox3.Text)
Y = A ^ (3 / 4) + (3 * Math.Cos(35 * Math.PI / 180) + Math.Atan(3 * Math.PI / 180)) / (Math.Log(A + 10) - (B - X) ^ 3) + Math.Sqrt(B - X) - 7.128
Label6.Text = CStr(Y)
End Sub
Private Sub Button2_Click(sender As Object, e As EventArgs) Handles Button2.Click
Application.Exit()
End Sub
End Class
4.Запускаю программу на выполнение, ввожу исходные данные и получаю результат вычисления заданного выражения:
Вывод: Я научился создавать Windows-приложения в среде Visual Basic и приобрёл навыки проектирования графического интерфейса.