![]() |
Архитектура Аудит Военная наука Иностранные языки Медицина Металлургия Метрология Образование Политология Производство Психология Стандартизация Технологии |
РАЗДЕЛ 2. ПРОЕКТИРОВАНИЕ И УПРАВЛЕНИЕ БАЗАМИ ДАННЫХСтр 1 из 5Следующая ⇒
Введение Использование современных компьютерных технологий в производственной деятельности, научной и учебной работе студентами заочного обучения требует знаний (на уровне пользователя) технических средств и программного обеспечения ПК. Опыт работы со студентами заочного обучения показывает, что большинство из них сталкивается с необходимостью создания в своей работе текстовых документов, решения задач учета и статистики, эксплуатации различных производственных баз данных. Целью курса «Информатика» является подготовка специалистов разного профиля, способных решать производственные задачи с использованием новейших информационных технологий. В данном курсе студенты изучают новейшие компьютерные средства обработки информации: · Современный компьютер (базовый состав и дополнительные средства). · Операционные системы. ОС 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. – через Меню «Файл» Пояснения к разделу 3: Вариант 1 Раздел 2. БД Торговая фирма» Генеральный список полей: Товар, артикул, оптовая цена, розничная цена, фирма - производитель, поступило товара, заказывалось товара, дата поступления, дата заказа, единица, измерения. Примечание. Запросы составить с условием отбора (по производителю, дате заказа); с расчетом размера оплаты в оптовых и розничных ценах; групповые расчеты для определения поставки по одному товару в оптовых и розничных ценах; групповые расчеты для определения доходов по месяцам и за год в целом.
Раздел 3. 1. Даны числа X и Y. Вычислить Z=f(T, P) (Линейный алгоритм). T= 2. Даны два числа А и В. Если А> В, то А присвоить значение В, а В - значение А. Вывести полученные значения А и В. ( Разветвленный алгоритм )
Вариант 2 Раздел 2. БД «Учет движения транспортных потоков со склада» Генеральный список полей: Раздел 3. 1. Даны числа X и Y. Вычислить Z=f(T, P). (Линейный алгоритм) T= 2. Даны два числа А и В. Если А> В, то возвести А в квадрат и вывести полученное значение, в противном случае вывести значение В.( Разветвленный алгоритм ) Вариант 3 Раздел 2 БД «Учет персонала фирмы» Генеральный список полей: Раздел 3 1. Даны числа X и Y. Вычислить Z= f(T, P) (Линейный алгоритм) T= 2. Даны два числа А и В. Если А+В> 1, то вычислить А+В, если нет вычислить Sin(А-В). Полученные результаты вывести. ( Разветвленный алгоритм ) Вариант 4 Раздел 2 БД «Учет расходов материала» Генеральный список полей: Раздел 3. 1. Даны числа X и Y. Вычислить Z= f(T, P) (Линейный алгоритм) T= Sin(x+y); P= x 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 Для выбора отдельного поля необходимо выполнять двойной щелчок по полю в списке полей таблицы. Для задания условия выбора необходимо установить указатель мыши в строку Условие макета запроса поля и набрать условие. При записи условия могут использоваться логические операторы (>, <, < >, > =, < =, =). Например,
В дальнейшем при необходимости внесения изменений в макет запроса, в окне базы данных следует выбирать режим конструктор. Запросы с группировкой. Начальный этап работы с макетом запроса, аналогичен работе с запросом выборкой. В дальнейшем, после включения полей в макет запроса необходимо нажать пиктограмму групповых операций (рис. 9). В строке Групповые операции для полей по которым осуществляется группировка, остается слово Группировка. А для полей по которым необходимо сгруппировать данные, указывают функцию группировки (рис. 11). Работа с формами. Макеты форм удобнее создавать с помощью автоформ. Для создание формы на основании нескольких таблиц, удобнее использовать Мастер форм. Работа с мастером форм осуществляется в диалоговом режиме. После завершения создания макета на экране сразу открывается готовая форма (рис.12). Работа с отчетами. Макеты отчетов удобнее создавать с помощью автоотчетов. Для создание отчета на основании нескольких таблиц или с подведением итогов, удобнее использовать мастер отчетов. Работа с Мастером отчетов осуществляется в диалоговом режиме.
Рис.11. Окно формирования групповых операций.
Рис. 12. Окно формы созданной с помощью мастера форм. Основные понятия об алгоритмизации задач Алгоритм и его свойства Алгоритм (алгорифм) – любая конечная последовательность основных математических и логических действий, однозначно определяющих процесс преобразования исходных данных в конечные результаты решения задачи. Название «алгоритм» произошло от латинской формы арабского по имени хорезмийского математика аль-Хорезми – Algorithmi. Алгоритм – одно из основных понятий математики и информатики. нельзя понимать в узком смысле, т. е. только для цифровых вычислений. Исходными данными и результатами алгоритма могут служить самые разнообразные объекты. Это открывает возможность широкого применения понятия алгоритма. Например, можно говорить об алгоритмах перевода с одного языка на другой, об алгоритмах управления (диспетчеризация поездов, самолетов, городского транспорта, функционирования предприятий и.д.) Основные свойства алгоритмов: 1. Понятность для исполнителя - исполнитель алгоритма должен знать, как его выполнять. 2. Дискретность - прерывность, раздельность. Алгоритм должен представлять процесс решения задачи как последовательное выполнение простых шагов (этапов).
Алгоритм линейной структуры Пример 1. Определение длины окружности и площади круга по формулам: Обозначения: S - площадь круга; r - радиус; pi - константа; l - длина окружности.
Пример 2. Вычисление функции F(x)=sinx/x, при х не равном нулю и F(x)=1, при х равном нулю. Обозначения: F=F(x); sin(x)=sinx
Пример 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
Тип данных определяет множество допустимых значений, которое может принимать указанная переменная.
Если тип переменной не задан, то она по умолчанию получает тип 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) – ближайшее отрицательное целое число, большее или равное х. Функции проверки типов
Функция форматирования возвращает значение типа 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ав+х
е 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; Просмотров: 306; Нарушение авторского права страницы