Главная   Заказать уникальную работу Работа в среде Visual Basic | лабораторная работа


Бесплатные Рефераты, дипломные работы, курсовые работы, доклады - скачать бесплатно Бесплатные Рефераты, дипломные работы, курсовые работы, доклады и т.п - скачать бесплатно.
 Поиск: 


Категории работ:
Рефераты
Дипломные работы
Курсовые работы
Контрольные работы
Доклады
Практические работы
Шпаргалки
Аттестационные работы
Отчеты по практике
Научные работы
Авторефераты
Учебные пособия
Статьи
Книги
Тесты
Лекции
Творческие работы
Презентации
Биографии
Монографии
Методички
Курсы лекций
Лабораторные работы
Задачи
Бизнес Планы
Диссертации
Разработки уроков
Конспекты уроков
Магистерские работы
Конспекты произведений
Анализы учебных пособий
Краткие изложения
Материалы конференций
Сочинения
Эссе
Анализы книг
Топики
Тезисы
Истории болезней
 




Работа в среде Visual Basic - лабораторная работа


Категория: Лабораторные работы
Рубрика: Программирование, компьютеры и кибернетика, ИТ технологии
Размер файла: 18 Kb
Количество загрузок:
221
Количество просмотров:
1387
Описание работы: лабораторная работа на тему Работа в среде Visual Basic
Подробнее о работе: Читать или Скачать
ВНИМАНИЕ: Администрация сайта не рекомендует использовать бесплатные Лабораторные работы для сдачи преподавателю, чтобы заказать уникальные Лабораторные работы, перейдите по ссылке Заказать Лабораторные работы недорого
Смотреть
Скачать
Заказать



Федеральное агентство по образованию

Государственное образовательное учреждение высшего профессионального образования

«Вятский Государственный Университет» социально-экономический факультет

Лабораторная работа №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

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 | лабораторная работа

СтудентБанк.ру © 2021 - Банк рефератов, база студенческих работ, курсовых и дипломных работ, шпаргалок и докладов по различным дисциплинам, а также отчеты по практике и многое другое - бесплатно.