Программирование на BASIC / Visual Basic / Лабораторные работы1 / Лабораторные по информатике по VB(преподаватель- Хамзина Е.А.) / лабораторная по информатике 1
.docФедеральное агентство по образованию.
Государственное общеобразовательное учреждение высшего профессионального
образования.
Уфимский Государственный Авиационный Технический Университет.
Кафедра информатики.
Отчет по лабораторной работе №1
По теме: «Изучение интегрированной среды и основ
работы в Visual Basic»
Выполнил:
Студент группы МКС-120
Ноготков П.А.
Проверила старший
преподаватель:
Хамзина Е.А.
Уфа-2007
Цель работы:
Целью работы является изучение основных компонентов интегрированной среды разработки приложений Visual Basic, и приобретение начальных навыков работы в среде при создании простейших приложений.
Задания:
Задание первого уровня сложности:
f = (m * c * t * b + Abs(c * Sin(t))) ^ 1 / 3
z = m * Cos(b * t * Sin(t)) + c
m = 2
c = -1
t = 1.2
b = 0.7
Код программы: Private Sub Command1_Click()
Dim m As Integer, c As Single, t As Single, b As Single
m = Val(Text1)
c = Val(Text2)
t = Val(Text3)
b = Val(Text4)
f = (m * c * t * b + Abs(c * Sin(t))) ^ 1 / 3
z = m * Cos(b * t * Sin(t)) + c
Print "m ="; m; "c ="; c; "t ="; t; "b ="; b; "f ="; f; "z ="; z
End Sub
Задание второго уровня сложности:
Длина выражена в сантиметрах. Выразить ее в дюймах. (1 дюйм=2.5 см)
Код программы: Private Sub Command1_Click()
Dim x As Single, y As Integer
x = Val(Text1)
y = x / 2.5
Print "длина в сантиметрах"; x; " длина в дюймах"; y
End Sub
Задание третьего уровня сложности: Пусть смешано V1 литров воды температуры t1 с V2 литрами воды температуры t2 и V3 литрами воды температуры t3 . Вычислить объем и температуру образовавшейся смеси.
Код программы: Private Sub Command1_Click()
Dim V1 As Integer, t1 As Integer, V2 As Integer, t2 As Integer, V3 As Integer, t3 As Integer
V1 = Val(Text1)
t1 = Val(Text2)
V2 = Val(Text3)
t2 = Val(Text4)
V3 = Val(Text5)
t3 = Val(Text6)
S = V1 + V2 + V3
t = (t1 + t2 + t3) / 3
Print "Общий объем"; S; "Общая температура"; t;
End Sub
Таблица№1
Объект |
Свойства |
Значение |
Command 1 Label Label Label Label Label Label Label Label Label Label Label Form1 Form2 Form3 |
Caption Caption Caption Caption Caption Caption Caption Caption Caption Caption Caption Caption Caption Caption Caption
|
ВЫЧИСЛИТЬ введите m введите c введите t введите b введите длину в сантиметрах введите обьем воды в 1ом сосуде введите обьем воды во 2ом сосуде введите обьем воды в 3ем сосуде введите температуру воды в 1ом сосуде введите температуру воды во 2ом сосуде введите температуру воды в 3ем сосуде задание1 задание2 задание3 |
Вывод:
В результате проделанной работы я научился запускать интегрированную среду разработки приложений Visual Basic, изучил основные компоненты интерфейса Visual Basic,окна конструктора формами, панели элементов управления, создал формы приложения с размещенными на ней объектами, написал несколько простых кодов для приложений и сохранил проект. Научился запускать приложения и запускать окна редактора исходного кода. Создал несколько простейших приложений.