Архитектура Аудит Военная наука Иностранные языки Медицина Металлургия Метрология
Образование Политология Производство Психология Стандартизация Технологии


РАЗДЕЛ 2. ПРОЕКТИРОВАНИЕ И УПРАВЛЕНИЕ БАЗАМИ ДАННЫХ



Введение

Использование современных компьютерных технологий в производственной деятельности, научной и учебной работе студентами заочного обучения требует знаний (на уровне пользователя) технических средств и программного обеспечения ПК. Опыт работы со студентами заочного обучения показывает, что большинство из них сталкивается с необходимостью создания в своей работе текстовых документов, решения задач учета и статистики, эксплуатации различных производственных баз данных.

Целью курса «Информатика» является подготовка специалистов разного профиля, способных решать производственные задачи с использованием новейших информационных технологий.

В данном курсе студенты изучают новейшие компьютерные средства обработки информации:

· Современный компьютер (базовый состав и дополнительные средства).

· Операционные системы. ОС Windows (назначение, организация данных, соглашения, технологии, структурные единицы ОС).

· Подготовка информации стандартными средствами Windows (графический редактор, блокнот, текстовый редактор, калькулятор, средства мультимедиа).

· Подготовка информации средствами Microsoft Office (в текстовом редакторе Word, табличном процессоре Excel, СУБД Access) и автоматизированное программирование объектов обработки данных из БД.

· Работа в Интернет.

· Архивация информации.

Основой познания современных компьютерных технологий является самостоятельная работа с методическими материалами и рекомендуемой литературой в соответствии с рабочей программой.

Учебный план 2-го семестра курса предусматривает контрольную работу и экзамен. Контрольная работа № 2 выполняется в период между зимней сессией и 25 мая.

Рабочая программа

Содержание дисциплины

Темы и их содержание, для лекций и самостоятельного изучения студентами.

Введение

Понятие информации, общая характеристика процессов сбора, передачи, обработки и накопления информации. Информатика как новая научная дисциплина. Предмет и объект информатики. Информационные системы. Классификация информационных систем.

РАЗДЕЛ 2. ПРОЕКТИРОВАНИЕ И УПРАВЛЕНИЕ БАЗАМИ ДАННЫХ

Тема 2.1. Введение. Основные понятия.

Тема 2.2. Этапы проектирования БД.

Тема 2.3. Системы управления базами данных и их функции.

РАЗДЕЛ 3. АЛГОРИТМИЗАЦИЯ И ПРОГРАММИРОВАНИЕ.

Тема 3.1. Модели решения функциональных и вычислительных задач. Инструментарии функциональных задач. Программное обеспечение ЭВМ и технологии программирования. Алгоритмизация.

Тема 3.2. Автоматизация обработки информации в приложениях WINDOWS с использованием языков высокого уровня.

Организация построения программы. Организация данных. Константы. Переменные. Типы данных. Управление ходом выполнения программы. Ветвление по условию, по значению. Циклы с предусловием, с постусловием, со счетчиком.

Тема 3.3. Обработка событий в приложениях.

Причина и порядок возникновения событий. Свойства событий. Классификация. Программирование обработки событий.

Контрольная работа №2

Тема - «Автоматизация обработки информации в приложениях Windows»:

РАЗДЕЛ 2. «Проектирование и управление базами данных».

Цель работы – получение навыков по проектированию информационных систем, и реализация их с помощью баз данных на основе системы управления базами данных MS Access.

Для каждого варианта задания:

1 Спроектировать базу данных (не менее двух таблиц) на основании представленного генерального списка полей.

2 Создать структуру таблиц базы данных.

3 Заполнить таблицу данными (10 записей).

4 Создать схему базы данных.

5 Создать формы для заполнения данными таблиц базы данных.

6 Построить запросы к таблицам базы данных.

7 Создать составной отчет, включив в него диаграмму.

РАЗДЕЛ 3. «Автоматизированное программирование объектов обработки данных из БД».

Цель работы – Освоение новых информационных технологий для решения практических задач из области легкой и текстильной промышленности:

Для каждого варианта задания:

Разработать блок-схемы линейного и разветвленного (см. Пример оформления блок-схем в Excel).

Составить программы (см. Создание Макроса в Microsoft Office 2003/2007).

Выполнить программы (при наличии компьютера), иначе – выполнить в тетради.

Общие указания к разделу 3:

1. Составить блок-схему в Excel и создать кнопку, с помощью которой будет вызываться решение алгоритма.

2. Алгоритмы линейной и разветвляющейся структуры создаются в одной рабочей книге Excel, но на отдельных её Листах.

3. Сохранить файл под именем Контр_Программирование_ФИО (сохранять в книгах Excel 97-2003 с расширением xls. – через Меню «Файл» - Сохранить как – Книга Excel 97-2003).

Пояснения к разделу 3:

Вариант 1

Раздел 2.

БД Торговая фирма»

Генеральный список полей:

Товар, артикул, оптовая цена, розничная цена, фирма - производитель, поступило товара, заказывалось товара, дата поступления, дата заказа, единица, измерения.

Примечание. Запросы составить с условием отбора (по производителю, дате заказа); с расчетом размера оплаты в оптовых и розничных ценах; групповые расчеты для определения поставки по одному товару в оптовых и розничных ценах; групповые расчеты для определения доходов по месяцам и за год в целом.

 

Раздел 3.

1. Даны числа X и Y. Вычислить Z=f(T, P) (Линейный алгоритм).

T= ; P= ; Z=

2. Даны два числа А и В. Если А> В, то А присвоить значение В, а В - значение А. Вывести полученные значения А и В. ( Разветвленный алгоритм )

 

Вариант 2

Раздел 2.

БД «Учет движения транспортных потоков со склада»

Генеральный список полей:

Раздел 3.

1. Даны числа X и Y. Вычислить Z=f(T, P). (Линейный алгоритм)

T= ; P= ; Z= P-T.

2. Даны два числа А и В. Если А> В, то возвести А в квадрат и вывести полученное значение, в противном случае вывести значение В.( Разветвленный алгоритм )

Вариант 3

Раздел 2

БД «Учет персонала фирмы»

Генеральный список полей:

Раздел 3

1. Даны числа X и Y. Вычислить Z= f(T, P) (Линейный алгоритм)

T= ; P= ; Z = T-P.

2. Даны два числа А и В. Если А+В> 1, то вычислить А+В, если нет вычислить Sin(А-В). Полученные результаты вывести. ( Разветвленный алгоритм )

Вариант 4

Раздел 2

БД «Учет расходов материала»

Генеральный список полей:

Раздел 3.

1. Даны числа X и Y. Вычислить Z= f(T, P) (Линейный алгоритм)

T= Sin(x+y); P= x ; Z=P*T

2. Даны числа А, В, С. Если их среднее арифметическое больше А - вычислить А-5, в противном случае вычислить сумму В+С. Полученный результат вывести. ( Разветвленный алгоритм )

Темы для самостоятельного изучения

Раздел 2.

ü Проектирование и создание нормализованных БД в СУБД ACCESS 2(WINDOWS, MS Office), ACCESS 97 (WINDOWS, MS Office) (лекционный материал):

ü Создание структур таблиц баз данных;

ü Создание схемы базы данных;

ü Редактирование и просмотр базы данных;

ü Выбор данных с помощью запросов;

ü Создание отчетов;

ü Построение графических диаграмм.

Раздел 3.

ü Алгоритмизация: понятие алгоритма, разновидности алгоритмов, принципы построения алгоритмов.

ü Основные понятия языка программирования высокого уровня Visual Basic: принципы построения программ, константы, переменные, типы данных.

ü Управление ходом выполнения программы: организация ветвлений по условию (if... then... endif) и значению (select case... endselect), организация циклов с предусловием (do {while/until}... loop), постусловием (do... loop{while/until}) и со счетчиком (for.. next, for each... next ). Организация ввода- вывода: инструкция вывода (msgbox... ), функции ввода-вывода (inputbox(...), msgbox (...)).

Запросы выборки.

Переключить окно базы данных в вкладку Запросы и нажать кнопку Создать. В появившемся окне выбрать режим Конструктор (рис. 8).

После чего появляется окно Добавления таблицы (аналог рис. 5), с помощью которого необходимо выбрать таблицы, данные которых будут участвовать в запросе. При включении в запрос таблиц, между которыми установлены связи в схеме данных, связи сохраняются в схеме запроса. В противном случаи, при необходимости, следует создать связи по аналогии со схемой базы данных. Для включения полей из таблиц в макет запроса, можно воспользоваться следующими способами:

v Для включения всех полей таблицы следует выполнить двойной щелчок мышью по заголовку таблицы, и установив указатель мыши на середину списка полей таблицы перетащить его на строку Поле макета запроса (каждое поле размещается в отдельном столбце макета).

v Для включения всех полей таблицы следует установить указатель мыши на строку * в списке полей таблицы и перетащить его на строку Поле макета запроса (Все поля помещаются в один столбец в виде *). Данный вариант можно использовать, когда для поля не задаются условия отбора.

v Для выбора отдельного поля необходимо выполнять двойной щелчок по полю в списке полей таблицы.

Для задания условия выбора необходимо установить указатель мыши в строку Условие макета запроса поля и набрать условие. При записи условия могут использоваться логические операторы (>, <, < >, > =, < =, =). Например,

“Иванов” -выбрать из поля Фамилия всех Ивановых
> 120 -выбрать из поля Размер оплаты значения больше 120
#11.02.04# -выбрать из поля Дата оплаты записи за 11.02.04.
Date() -выбрать из поля Дата оплаты значения за текущую дату.

Пример оформления Окна макета запроса показан на рис. 9.

Рис. 9. Окно макета запроса.

В дальнейшем при необходимости внесения изменений в макет запроса, в окне базы данных следует выбирать режим конструктор.

Запросы с группировкой.

Начальный этап работы с макетом запроса, аналогичен работе с запросом выборкой. В дальнейшем, после включения полей в макет запроса необходимо нажать пиктограмму групповых операций (рис. 9). В строке Групповые операции для полей по которым осуществляется группировка, остается слово Группировка. А для полей по которым необходимо сгруппировать данные, указывают функцию группировки (рис. 11).

Работа с формами.

Макеты форм удобнее создавать с помощью автоформ. Для создание формы на основании нескольких таблиц, удобнее использовать Мастер форм. Работа с мастером форм осуществляется в диалоговом режиме. После завершения создания макета на экране сразу открывается готовая форма (рис.12).

Работа с отчетами.

Макеты отчетов удобнее создавать с помощью автоотчетов. Для создание отчета на основании нескольких таблиц или с подведением итогов, удобнее использовать мастер отчетов. Работа с Мастером отчетов осуществляется в диалоговом режиме.

 

 
 

Рис.11. Окно формирования групповых операций.

 
 

Рис. 12. Окно формы созданной с помощью мастера форм.

Основные понятия об алгоритмизации задач

Алгоритм и его свойства

Алгоритм (алгорифм) – любая конечная последовательность основных математических и логических действий, однозначно определяющих процесс преобразования исходных данных в конечные результаты решения задачи. Название «алгоритм» произошло от латинской формы арабского по имени хорезмийского математика аль-Хорезми – Algorithmi. Алгоритм – одно из основных понятий математики и информатики.

нельзя понимать в узком смысле, т. е. только для цифровых вычислений. Исходными данными и результатами алгоритма могут служить самые разнообразные объекты. Это открывает возможность широкого применения понятия алгоритма. Например, можно говорить об алгоритмах перевода с одного языка на другой, об алгоритмах управления (диспетчеризация поездов, самолетов, городского транспорта, функционирования предприятий и.д.)

Основные свойства алгоритмов:

1. Понятность для исполнителя - исполнитель алгоритма должен знать, как его выполнять.

2. Дискретность - прерывность, раздельность. Алгоритм должен представлять процесс решения задачи как последовательное выполнение простых шагов (этапов).

  1. Определенность - каждое правило алгоритма должно быть четким, однозначным и не оставлять места для произвола. Благодаря этому свойству выполнение алгоритма носит механический характер и не требует никаких дополнительных указаний или сведений о решаемой задаче.
  2. Результативность (конечность). Это свойство состоит в том, что алгоритм должен приводить к решению задачи за конечное число шагов.
  3. Массовость - означает, что алгоритм решения задачи разрабатывается в общем виде, т.е. он должен быть применим для некоторого класса задач, различающихся лишь исходными данными.

Алгоритм линейной структуры

Пример 1. Определение длины окружности и площади круга по формулам:

Обозначения: S - площадь круга;

r - радиус;

pi - константа;

l - длина окружности.


Алгоритмы разветвленной структуры

Пример 2.

Вычисление функции F(x)=sinx/x, при х не равном нулю и F(x)=1, при х равном нулю.

Обозначения: F=F(x); sin(x)=sinx


Пример 3. Определить принадлежность двух точек к одной окружности с центром в начале координат, если заданы координаты этих точек x1, y1, x2, y2.


Алгоритмы циклической структуры

 

Пример 4. Найти сумму S значений i^2, где i меняется от 1 до 5 с шагом 1. Использовать цикл с заданным числом повторений.



Пример 5. Алгоритм вычисления значений функций y=sin2x при 4< =x< =5 с шагом h=0.1.

Краткие сведения об основах программирования. Введение в язык программирования высокого уровня Visual Basic for Applications(VBA).

Сначала разрабатывается алгоритм действий поставленной задачи, а затем он записывается на одном из языков программирования. Язык программирования – искусственный язык. Он опирается на словарь служебных слов и команд, а также систему правил записи конструкций языка. С помощью языка программирования создается исходный текст программы. Программа – полное и четкое описание алгоритма на языке программирования. Чтобы программа работала, ее нужно перевести в машинный код. Этим занимаются специальные программы – компиляторы и интерпретаторы. Интерпретаторы просматривают и сразу выполняют инструкции языка, содержащиеся в тексте программы, подробно информируя разработчика программы о возникающих проблемах.

Среди множества языков программирования высокого уровня Visual Basic по популярности стоит на первом месте во всем мире, используется в качестве учебного языка из-за простоты в изучении.

Работа в среде Windows с ее приложениями, решающими практические задачи, значительно облегчается с использованием языка Visual Basic for Applications. Visual Basic for Applications – объектно - ориентированный язык высокого уровня. Основным достоинством этого языка является относительная простота и доступность в изучении. Будучи языком, встроенным в какое-либо приложение Microsoft Office, он улучшает возможности данного приложения. В учебном курсе по изучению языка рекомендуется начинать свои первые шаги в программировании в среде Excel независимо от ее версии, поскольку Excel обладает достаточно простой объектной моделью.

Алфавит. Алфавит языка включает следующие символы:

53 буквы – прописные () и строчные буквы латинского алфавита и знак подчеркивания(_);

10 цифр(0 - 9);

23 специальных символа (+ - * /., : ; = < > ‘ “ ( ) [ ] & $ @ ^ пробел \);

составные символы (< > < = > = );

Неделимые последовательности знаков алфавита образуют слова, отделяемые друг от друга разделителями и несущие определенный смысл в программе. Разделителями могут служить пробел, двоеточие, точка и другие специальные символы и их комбинации.

Слова подразделяются на:

Ключевые;

Стандартные идентификаторы;

Идентификаторы пользователя.

Ключевые (зарезервированные) слова имеют фиксированное написание и однозначно определенный смысл, который не может быть изменен. Например, Until, Goto, If, Loop, For и т. д.

§ Идентификаторы пользователя применяются для обозначения имен констант, переменных, процедур и функций, типов данных, меток. Имена задаются программистом и должны отвечать следующим правилам:

§ Длина имени не должна превышать 255 символов;

§ Имя не может содержать знаков точки, пробела, %, & , ! , #, @, $;

§ Имя может состоять из любой комбинации букв, цифр и других символов, начинающейся с буквы;

§ Нельзя использовать имена, совпадающие с именами встроенных функций и процедур и ключевыми словами;

§ Имена должны быть уникальны внутри области, в которой они определены;

§ Регистр букв (верхний или нижний) не имеет значения, но для большей наглядности текста программы и облегчения ее понимания следует умело сочетать верхний и нижний регистры. Например, вместо имени товар лучше написать Товар, или вместо процентная_ставка написать Процентная_Ставка.

Типы данных в VBA

 

Тип данных определяет множество допустимых значений, которое может принимать указанная переменная.

 

Тип данных Размер(байт) Диапазон значений
Byte(байт) 0..255
Boolean(логический) True или False
Integer(целый) -32 768.. 32 767
Long(целый -длинный) -2 147 483 648.. 2 147 483 647
Single(вещественный) -3, 402823E38..- 1, 401298E-45для отрицательных значений; 1, 401298E-45.. 3, 402823E38 для положительных значений
Double 1, 79769313486232 E 308
Currency(с фиксированной десят. точкой) От 22337203685477, 58 до 922337203685477, 58
Date От January 1, 100 до December 31, 9999
String(символьный переменной длины) 10 байт+длина строки От 0 до 2000000000 символов
String(символьный фиксированной длины) 1 байт на 1 символ От 0 до 2000000000 символов
Variant  
Variant 22+длина строки Как для строки String переменной длины
Object Любой указатель объекта
Тип данных, определяемый пользователем с помощью ключевого слова Type Объем определяется элементами Диапазон каждого элемента определяется его типом данных

 

Если тип переменной не задан, то она по умолчанию получает тип Variant и далее результат зависит от ее значения.

После ключевого слова Dim следуют объявления переменных разделенных запятыми. Например, следующая инструкция описывает A и B, как переменные целого типа(Integer), а C – как переменную вещественного типа (Single). Dim A AS Integer, B AS Integer, C As Single.

Константы – элементы данных, значения которых, в процессе выполнения программы не меняются. Константы в программе могут быть заданы явно своим значением или обозначены именем. Если константа обозначена именем, то она должна быть описана в разделе описаний. Описание начинается со служебного слова Const и имеет следующий формат записи:

Const < имя константы > [AS Тип] = < Выражение>,

Где

Имя константы - имя, удовлетворяющее стандартным правилам VBA;

Тип – один из допустимых типов данных VBA, табл.1..

Выражение – литерал, другая константа или любое сочетание, включающее арифметические или логические операции, за исключением Is.

Пример объявления констант с именами Фирма и Процентная_ставка.

Const Фирма = «Бескрайние просторы»

Const Процентная_ставка As Single = 0.2

Встроенные функции

В VBA имеется большой набор встроенных функций и процедур, упрощающих программирование, которые можно разделить на следующие категории:

Математические;

Функции проверки типов;

Функции обработки строк;

Функция форматирования;

Функции преобразования форматов;

функции даты и времени.

 

Математические функции

Abs (x) - модуль аргумента x

Cos(x) - косинус аргумента x

Exp(x) - возведение основания натурального логарифма в степень x

Log(x) - логарифм натуральный аргумента х

Rnd - случайное число из интервала [0, 1]

Sin(x) - синус аргумента x

Sqr(x) - квадратный корень из х

Atn(x) - арктангенс от х

Tan(x) – тангенс от х

Sgn(x) – знак х

Fix(x) и Int(x) обе функции отбрасывают дробную часть числа и возвращают целое значение. Разница между этими функциями состоит для отрицательных значений аргумента. Int(x) возвращает ближайшее отрицательное целое число, меньшее или равное х, а Fix(x) – ближайшее отрицательное целое число, большее или равное х.

Функции проверки типов

Функция Проверка - является ли переменная:
IsArray(переменная) массивом
IsDate(переменная) датой
IsError(переменная) Кодом ошибки
IsNull(переменная) Пустым значением
IsNumeric(переменная) Числовым значением
IsObject(переменная) объектом

 

Функция форматирования возвращает значение типа Variant(String ), содержащее выражение, оформленное согласно синтаксиса функции:

Format(Выражение[, Формат [, Первый день недели[, Первая Неделя Года]]]), где:

Выражение – обязательный аргумент(любое допустимое выражение – комбинация ключевых слов, операторов, переменных и констант, результатом которой является строка, число или объект);

Формат – необязательный параметр(любое допустимое именованное или определенное пользователем выражение формата).

Если к имени функции добавляется знак $, то функция возвращает значение типа String.

При создании собственного числового формата можно использовать следующие символы:

0 – резервирует позицию цифрового разряда. Отображает цифру или нуль. Если у форматируемого числа есть какая-нибудь цифра в этой позиции разряда, где в строке формата находится 0, функция отображает эту цифру, если нет, то в этой позиции отображается нуль.

# - действие данного символа аналогично действию 0 с той лишь разницей, что незначащие нули не отображаются.

. – резервирует позицию десятичного разделителя, определяет, сколько разрядов необходимо отображать слева и справа от десятичной точки.

% - резервирует процентное отображение числа.

. – разделяет сотни от тысяч.

Если в формате стоит “FIXED”, то число форматируется до двух знаков после точки.

Пример.

Функция Format(Z, " ###0.0" ) возвращает переменной Z числовое значение в формате, указанном в кавычках.

 

Функции преобразования форматов

Val(строка) – возвращает числа, содержащиеся в строке, как числовое значение соответствующего типа.

Str(число) – возвращает значение типа Variant (String), являющееся строковым представлением числа.

Кроме функций Val и Str имеется ряд функций по преобразованию типов выражений.

Функции обработки строк

Среди множества функций можно выделить следующие:

Chr(код) – преобразует ASCII – код в строку. Например, Chr(10) осуществляет переход на новую строку, Chr(13) – возврат каретки.

Mid(string, pos[, length]) – возвращает подстроку строки, содержащую указанное число символов, где

String – строковое выражение, из которого извлекается подстрока;

Pos – позиция символа в строке String, с которого начинается нужная подстрока;

Length – число возвращаемых символов подстроки.

Len(строка) –возвращает число символов строки.

 

Функции времени и даты

Возвращают значение типа Variant, содержащее системную дату, текущее время и т. д. Например функция Date возвращает значение, содержащее системную дату.

Выражения

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

§ Операнды;

§ Знаки операций;

§ Круглые скобки.

В простейшем случае выражение может состоять из одной переменной или константы.

Операнды представляют собой данные, над которыми выполняются действия. В качестве операндов могут быть использованы константы, переменные, элементы массивов и функции. Операции определяют действия, которые выполняются над операндами. Круглые скобки используются для указания порядка выполнения операций.

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

В выражениях допускается использовать следующие операции над данными:

Арифметические - выполняются над числами и их результатом являются числа.

Отношения - выполняются над числами и их результатом являются логические значения True (истина) или False (ложь), например

x + y > z;

Логические True или False – используются в логических выражениях и их результатом являются логические значения, например A Or B, где A и B – переменные логического типа. Результат этой операции может быть True или False, и это зависит от того, какие значения имеют переменные A и B.

Операции над строками – используются в выражениях над строками и их результатом является строка символов.

Арифметические операции – сложение (+), вычитание (-), умножение (*), деление (/), целочисленное деление (\), возведение в степень (^), остаток от деления по модулю (mod).

Операции отношения – равно (=), не равно (< > ), меньше или равно (< =), больше или равно (> =), меньше (< ), больше (> ), сравнение двух строковых выражений (Like).

Логические операции – логическое умножение(And), логическое сложение(Or), логическое отрицание(Not), исключающее Or (Xor).

Операции над строками – соединение двух строк (+), предпочтительнее использовать знак &.

Примеры записи выражений

Математическая запись. Запись на VBA.

2ав+х 2*а*в+х^2

sqr(x+a)

е exp(x)

lntgx Log(Tan(x))

Sinx Sin(x)

Rnd+2a Rnd+2*a

 

Примеры комментария.

‘Заголовок процедуры общего вида с именем Prim1

SUB Prim1()

‘Объявление переменной C целого типа

Dim C As Integer

Sub DEMOLB9()

Dim A As Single ‘ описание переменной A вещественного типа

Dim B As Integer ‘ описание переменной B целого типа

Dim C As String ‘ описание переменной C строкового типа

Dim D As Single ‘ описание переменной D вещественного типа

A = Rnd ‘переменной A присваивается случайное число из [0, 1]

A = A + 12.7

B = Int(A) ‘переменной B присваивается целая часть числа A

D = -123.56

D = Fix(D) ‘переменной D присваивается целая часть числа D

C = " ГРУППА"

MsgBox " A= " & A & (Chr(10) & Chr(13)) _ ‘ Вывод результата в окно

& " B= " & B & (Chr(10) & Chr(13)) _ ’ в трех строках

& " D= " & D, vbInformation, Date & C

End Sub

Инструкции присваивания

Формат записи:

[Let]< Имя переменной> (или < Имя константы> = < Выражение> , где:

< Имя переменной>, < Имя константы> - конструкции, построенные по правилам VBA.

Выражение - выражение того же типа, что и составляющие его операнды.

Инструкция вычисляет значение выражения и присваивает это значение переменной или константе.

В частных случаях выражение может принимать значение константы, переменной или функции. Например:

Y=Sqr(X)

A=22.5

D=Exp(A)

S=S+R

F=X^2

В результате выполнения двух следующих операторов присваивания x=5: x=x+2 переменной x будет присвоено значение 7.

Ввод и вывод информации

Для ввода и вывода информации в VBA используются две разновидности диалоговых окон (ДО):

§ окна ввода (InputBox);

§ окна сообщений (MsgBox);

Ввод информации осуществляется с помощью функции Inputbox. Функция InputBox осуществляет следующие действия:

выводит на экран диалоговое окно, рис.10.1.а), б), содержащее заголовок, зону сообщения, поле ввода, значение по умолчанию;

устанавливает режим ожидания ввода текста пользователем или нажатия кнопки;

возвращает значение типа String, содержащее текст, введенный в поле.

Формат записи функции:

Inputbox(сообщение[, заголовок окна][, поле ввода][, значение по умолчанию][, …]), где

Сообщение – строковое выражение, отображаемое как текст сообщения в ДО. Сообщение может состоять из нескольких строк. Для их разделения допускается использование символа возврата каретки(Chr(13)), символа перевода строки(Chr(10)) или комбинации этих символов (Chr(13)) & (Chr(10)).

Заголовок окна – строковое выражение, отображаемое в строке заголовка диалогового окна. Если этот аргумент опущен, в строку заголовка помещается имя приложения.

Поле ввода – вводимое строковое выражение (строка знаков).

Помимо указанных аргументов в формате функции InputBox могут использоваться параметры[, …], регулирующие положение диалогового окна на экране, и имя файла справки о данном окне.

Пример записи операторов присваивания и задания переменным A и B значений, возвращаемых функцией InputBox, открывающей диалоговые окна для ввода, рис.5 а) – б).

A=InputBox(“Вычисление остатка”, “Bвод A”)

B= InputBox (“Вычисление остатка ”, ” Bвод B”)

 

 

           
 
Заголовок окна
 
 
   
 

 


Поле ввода
а) б)

 

Рис. 5 а), б) Диалоговые окна ввода

 

В приведенных окнах «Ввод А» и «Ввод В» расположены в строке заголовка окна, в зоне сообщения – «Вычисление остатка», а в поле ввода – 22 и 7.

Инструкция и функция MsgBox выводит простейшие сообщения пользователю в диалоговом окне.

Формат инструкции MsgBox:

MsgBox (Строковое выражение_1 [, числовое выражение или имена констант][, строковое выражение_2][, …]), где:

Строковое выражение_1 – сообщение, отображаемое в диалоговом окне;

числовое выражение – представляет число и тип отображаемых кнопок или тип используемого значка, табл.1.1.

строковое выражение_2 – строковое выражение, отображаемое в строке заголовка диалогового окна.

Таблица 1.1. Значения аргументов процедуры MsgBox, определяющих информационные значки в диалоговом окне.

Константа Значение Значок сообщения

VbCritical 16

VbQuestion 32

VbExclamation 48

VbInformation 64

 

Помимо указанных аргументов в формате MsgBox могут использоваться параметры, регулирующие положение диалогового кна на экране, и имя файла справки о данном окне[, …]

Следующая инструкция вывода демонстрирует расположение параметров MsgBox в диалоговом окне вывода, рис.6.

MsgBox ”C=A MOD B” & (Chr(13)) & (C(10)) & _

“При: ” & ” A= ” & A & ” B= ” & B & (Chr(13) & Chr(10)) & “Остаток: ” & “ C= ” & C,

_ Vbinformation, ”Сегодня: ” & Date & “ Выполнила Ким.”

Где:

Знак операции & используется для слияния строк;

комбинация функций (Chr(13) & Chr(10)) - для перевода строки и возврата каретки, чтобы результаты вычислений были напечатаны в три строки

 

Рис. 6. Диалоговое окно вывода.

 

Примеры программы алгоритма линейной структуры

Выполнить вычисления по формулам:

T=(1-x)/(3*x-2*y)

P=x*(X-y/(1+x))/2

Z=T-P

Sub primLin()

Dim X, Y, T, P, Z As Single

X = InputBox(" Окно ввода", " Ввести значение Х" )

Y = InputBox(" Окно ввода", " Ввести значение Х" )

T = (1 + X) / (3 * X - 2 * Y)

T = Format(T, " ###0.0" )

P = X * ((X - Y) / (1 + X)) / 2

P = Format(P, " ###0.0" )

Z = T - P

Z = Format(Z, " ###0.0" )

MsgBox " x= " & X & " y= " & Y & (Chr(10) & Chr(13)) & _

" T= " & T & " P= " & P & " Z= " & Z, _

vbInformation, " Расчет по формулам: " & Date

End Sub

 

 

 

Примеры алгоритмов разветвляющейся структуры и соответствующих им программ с использованием If.

Пример 1.

Sub условие()

Dim a, b, c

‘ Даны три числа: a, b, c. Определить, можно ли

‘ построить треугольник, если интерпретировать a, b, c

‘ как длины сторон треугольника.

a=Val( InputBox(“Введите 1 число ”))

b= Val( InputBox(“Введите 2 число ”))

c= Val( InputBox(“Введите 3 число ”))

If (a+b)> c And (a+c)> b And (b+c)> a Then

MsgBox “ треугольник построить можно”

Else

MsgBox “ треугольник построить нельзя”

End If

End Sub

 

При: а=8, в=5, с=4 а=10, в=5, с=4

 

 

Пример 2. Вычисление остатка

Используя функцию IsNumeric - проверки значений переменных A и B, вычислить и напечатать остаток C= A MOD B, если значение проверки условия True, иначе напечатать “Переменная не является числом”.

Sub Ostatok()

Dim A, B, C As Integer

A= Val(InputBox(“Вычисление остатка”, “Bвод A”))

B= Val(InputBox (“Вычисление остатка ”, ” Bвод B”))

If IsNumeric (A) And IsNumeric (B) THEN

C=A MOD B

MsgBox ”C=A MOD B” & (Chr(13)) & (C(10)) & _

“При: ” & ” A= ” & A & ” B= ” & B & (Chr(13) & Chr(10)) & “Остаток: ” & “ C= ” & C, _

Vbinformation, ”Сегодня: ” & Date & “ Выполнила Ким.”

Else

MsgBox “Переменная не является числом”

End Sub

 

 


Поделиться:



Последнее изменение этой страницы: 2017-03-14; Просмотров: 281; Нарушение авторского права страницы


lektsia.com 2007 - 2024 год. Все материалы представленные на сайте исключительно с целью ознакомления читателями и не преследуют коммерческих целей или нарушение авторских прав! (0.274 с.)
Главная | Случайная страница | Обратная связь