Работа в среде Visual Basic
Создание приложения для вычисления значений функций и определение суммы этих функций: эскиз формы, таблица свойств объекта, список идентификаторов и непосредственные коды процедур. Результаты вычислений и выводы, проверка работы данной программы.
| Рубрика | Программирование, компьютеры и кибернетика |
| Вид | лабораторная работа |
| Язык | русский |
| Дата добавления | 20.10.2009 |
| Размер файла | 19,9 K |
Отправить свою хорошую работу в базу знаний просто. Используйте форму, расположенную ниже
Студенты, аспиранты, молодые ученые, использующие базу знаний в своей учебе и работе, будут вам очень благодарны.
Федеральное агентство по образованию
Государственное образовательное учреждение высшего профессионального образования
«Вятский Государственный Университет» социально-экономический факультет
Лабораторная работа №1
Курс информатика
Тема: работа в среде Visual Basic
Киров 2009
Задание 1
Цель работы: создать приложение для вычисления значений функций.
Эскиз формы
|
Вычисление функции |
||||
|
Введите х и нажмите Enter Вычисление Результат |
||||
Таблица свойств объекта
|
№ |
Объект |
Name |
Caption |
|
|
1 |
Form |
Form 1 |
Вычисление функции |
|
|
2 |
Lable 1 |
Lable 1 |
Введите х и нажмите Enter |
|
|
3 |
Text 1 |
txtx |
||
|
4 |
Command 1 |
btn Вычисление |
Вычисление |
|
|
5 |
Command 2 |
btn Результат |
Результат |
|
|
6 |
Picture 1 |
Pic 1 |
Список идентификаторов
|
Переменная |
Тип |
Идентификатор |
|
|
х |
Single |
х |
|
|
y |
Single |
y |
Непосредственные коды процедур
Private Sub Form_Click()
Rem Вычисление функции для заданного значения x
Print " y=x+sin(x+4*atn(1)/3)-log(abs(x)"
x = Val(Textx.Text)
y = x + Sin(x + 4 * Atn(1) / 3) - Log(Abs(x))
Print "для x= "; x
Print "получено значение функции y= "; y
End Sub
Результаты вычислений и выводы
|
Вычисление функции |
|
|
Введите х и нажмите Enter 2 |
Задание 2
Цель работы: создать приложение, в котором можно вычислить значение суммы функций.
Эскиз формы
|
Form 1 |
||||
|
Пуск S= |
||||
|
Завершение |
||||
Таблица свойств объекта
|
№ |
Объект |
Name |
Caption |
|
|
1 |
Form |
Form 1 |
Form 1 |
|
|
2 |
Text 1 |
txtx |
||
|
3 |
Command 1 |
Command 1 |
Пуск |
|
|
4 |
Command 2 |
Command 2 |
Завершение |
|
|
5 |
OLE 1 |
OLE 2 |
||
|
6 |
Picturebox |
Picture 1 |
Список идентификаторов
|
Переменная |
Тип |
Идентификатор |
|
|
х |
Single |
х |
Непосредственные коды процедур
Private Sub Command1_Click()
Sum = 0 'начальное значение суммы
sump = 0 'начальная сумма положительных значений функции
sumo = 0 'начальная сумма отрицательных значений функции
X = Val(Textx.Text) 'преобразование функцией Val свойства Текст в числовое значение
For k = 1 To 10
y = Sin(X * k) + Cos(k / X)
If y > 0 Then
sump = sump + y
Else
sumo = sumo + y
End If
Next k
Sum = sump + sumo
Picture1.Print "сумма положительных значений функции"; sump
Picture1.Print "сумма отрицательных значений функции"; sumo
Picture1.Print "сумма значений функции"; Sum
Private Sub Command2_Click()
End
End Sub
Результаты вычислений и выводы
|
Form 1 |
||||
|
Пуск 2,3 S= Сумма положительных значений функции 2,87637274384731 Сумма отрицательных значений функции -5,74964601205689 Сумма отрицательных значений функции -2,87327326820958 |
||||
|
Завершение |
||||
Подобные документы
Составление блок-схемы алгоритма решения задачи, погрешности вычисления суммы членов числового ряда. Разработка программ на языке на Visual Basic, работа с массивами. Особенности работы со строковыми данными. Варианты реализации формы приложения.
контрольная работа [220,4 K], добавлен 18.06.2010Сущность основных понятий объектно-ориентированного программирования: объект, класс, полиморфизм. Блок-схема алгоритма и текст программы для вычисления площади круга, прямоугольника и трапеции. Принцип работы и результаты тестирования приложения.
курсовая работа [588,7 K], добавлен 17.07.2012Понятие объектов и классов в Visual Basic. Свойства, методы и события. Создание Титула на рабочем листе с помощью процедур обработки событий в UserForm. Определение диапазона для создания таблицы и ее заголовка. Создание формы по заполнению таблицы.
курсовая работа [1,3 M], добавлен 28.05.2012Рождение и развитие Basic. Краткое описание Visual Basic for Applications. Новые возможности Visual Basic 5.0. Пример взаимодействия Excel и Visual Basic. Программирование табличных функций. Встраивание, применение функций. Формы, средства управления OLE.
реферат [20,7 K], добавлен 11.03.2010Программный проект Баз данных средствами Visual Basic 6.0. Проектирование структуры таблицы базы данных Visual Basic 6.0. Заполнение созданных таблиц БД исходными данными. Создание пользовательского меню. Вид формы и свойства элементов управления.
курсовая работа [3,0 M], добавлен 19.06.2010Свойства объектов и проверка расчетной зависимости на основании экспериментальной выборки. Построение графической зависимости экспериментальных и расчетных значений от x для их сравнения. Выполнение работы в среде Visual Basic, Excel и MathCAD.
курсовая работа [261,9 K], добавлен 20.05.2011Система программирования - Visual Basic. Новые возможности. Быстрый запуск проекта. Средства управления. Что позволяет Visual Basic. Краткое описание работы. Corel Draw. Отличие векторной графики от растровой. Краткое описание работы в Corel Draw.
курсовая работа [1,3 M], добавлен 04.10.2008Использование нестандартных функций и подпрограмм (процедур) для составления алгоритмов вычислений. Программы для вычисления значение корней нелинейного уравнения по методу половинного деления. Составление алгоритма операций над матрицами и интегралами.
курсовая работа [580,0 K], добавлен 23.08.2015История развития программы Паскаль. Типы переменных. Значение переменной для прекращения вычислений. Использование операторов цикла, процедур и функций. Ввод значений М-конца цикла и произведение вычислений по расчётной формуле. Форматированный вывод.
контрольная работа [45,9 K], добавлен 13.07.2013Написание тестирующей программы для проверки знаний учащихся с помощью языка программирования Visual Basic for Applications (VBA), встроенного в пакет Microsoft Office. Общие сведения о программе, условия ее выполнения, настройка, проверка, выполнение.
контрольная работа [25,2 K], добавлен 07.06.2010
