Форум программистов, компьютерный форум, киберфорум
Microsoft Access
Войти
Регистрация
Восстановить пароль
Блоги Сообщество Поиск Заказать работу  
 
Рейтинг 5.00/8: Рейтинг темы: голосов - 8, средняя оценка - 5.00
0 / 0 / 0
Регистрация: 11.03.2013
Сообщений: 8

Откликнитесь, пожалуйста. =)

11.03.2013, 08:32. Показов 1642. Ответов 14
Метки нет (Все метки)

Студворк — интернет-сервис помощи студентам
Здравствуйте все те, кто понимает в программировании..... Я, к сожалению, полный дуб в подобном вопросе...
Мне очень нудна помощь в выполнении задания....
Читала-читала, да всё равно поняла только частично...

1.1. Создать базу данных, а в ней – таблицу с записями приве-денной структуры:

Предприятие Продукция Вып_1 Вып_2 Вып_3 Вып_4 Вып_5 Вып_6

Предприятие – название предприятия, Продукция – название продукции, Вып_1, … Вып_6 – данные о выпуске продукции (целые числа) по месяцам полугодия, выраженные в одной и той же единице измерения.
1.2. Заполнить таблицу данными (примерно 15 – 20 записей). Дан-ные выбирать произвольно. Данные должны демонстрировать различные варианты выполнения последующего запроса, для чего их в процессе работы нужно корректировать.
1.3. Создать общий модуль, а в нем – пользовательскую функцию для определения характера изменения значений в массиве числовых переменных (от первого к последнему). Возможные варианты : «Рост», «Падение», «Колебание», «Постоянен».
1.4. Создать запрос для получения справки следующего вида:

Предприятие Продукция Динамика изменения выпуска
В запросе должно присутствовать обращение к созданной пользова-тельской функции.
1.5. Выполнить запрос.
Самостоятельно я смогла лишь создать таблицу... А вот с модулем уже не понимаю.
Visual Basic
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
Public Function Dinam(ParamArray А() As Variant) As String
Dim flr As Boolean
Dim flp As Boolean
Dim i As Integer
Dim st As String
flr = True
flp = True
For i = 1 To UBound(a)
If a(i) > a(i - 1) Then flp = False
If a(i) < a(i - 1) Then flr = False
Next i
If flr And flp Then st = " Постоянен"
If flr And Not flp Then st = " Рост"
If flp And Not flr Then st = " Падение"
If Not flr And Not flp Then st = " Колебание"
Dinam = st
End Function
вот это дано как пример выполнения задания, но немного иначе там условия обозначены.
Я создала модуль... дала ему имя, и просто тупо вставила туда этот текст. Но я даже не понимаю как связать модуль с той таблицей, что у меня составлена......

Мне нужно, что бы какая-либо добрая душа помогла понять как доделать.... Чувствую себя беспомощной :-)
Очень надеюсь на поддержку!
0
cpp_developer
Эксперт
20123 / 5690 / 1417
Регистрация: 09.04.2010
Сообщений: 22,546
Блог
11.03.2013, 08:32
Ответы с готовыми решениями:

Пожалуйста откликнитесь, не могу разобраться!
Требуется определить рекурсивную функцию, которая по заданным вещественному x и целому n, вычисляет величину x^n согласно формуле. Решение...

Пожалуйста откликнитесь срочно у меня банер на ноутбуке!!!
У меня вчера появился банер написано типа мол переведите на кошелек webmoney 850 гривен иначе ваш компьютер самоуничтожится(обратите...

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

14
Эксперт MS Access
 Аватар для alvk
7459 / 4592 / 302
Регистрация: 12.08.2011
Сообщений: 14,380
11.03.2013, 09:12
1. Задание 1.1 сильно удивляет. Что будет в июле?
2. "Полный дуб в программировании" и уже массивы, которые кстати довольно редко встречаются в Акцесс, ибо есть рекордсет.
3. Где собственно сама БД?
0
0 / 0 / 0
Регистрация: 11.03.2013
Сообщений: 8
11.03.2013, 09:42  [ТС]
Я учусь на заочном. Это и есть к сессию.
Одна лекция без объяснений и, пожалуйста, делайте ребятки контрольное задание....
Конечно же, ничего никто не понимает.. То есть - либо покупай на сайтах... либо учись. Вот я пыталась вникнуть сама... Безполезно...
Создать базу данных - это и есть задание.
Предприятие-продукция-выпуск и тд - это таблица, данные произвольно забиваются. Это видимо и есть база данных...
а к ней уже нужно создать модуль (как я понимаю)... на отборку данных, или на анализ данных из этой таблицы....
Чтобы он проанализировав данные, числа, которые забиты в выпуске - показал какое колебание идет по данному предприятию по выпуску продукции.
Вот... как-то так...
0
Эксперт MS Access
26827 / 14507 / 3192
Регистрация: 28.04.2012
Сообщений: 15,782
11.03.2013, 10:04
Функция
Visual Basic
1
2
3
4
5
6
7
8
9
10
11
12
13
14
Public Function Dinam(ParamArray v())
    Dim s, t, i, u
    u = UBound(v)
    For i = 1 To u
        t = Sgn(v(i) - v(i - 1))
        s = s + t
    Next
    Select Case s
        Case u: Dinam = "Рост"
        Case 0: Dinam = "Постоянен"
        Case -u: Dinam = "Падение"
        Case Else: Dinam = "Колебание"
    End Select
End Function
SQL-выражение запроса
SQL
1
2
3
SELECT Предприятие, Продукция, 
 Dinam(Вып_1, Вып_2, Вып_3, Вып_4, Вып_5, Вып_6) AS [Динамика изменения выпуска]
FROM Таблица
0
0 / 0 / 0
Регистрация: 11.03.2013
Сообщений: 8
11.03.2013, 10:32  [ТС]
О! Уже спасибо.... Это очень похоже на моё...
Скажу еще раз... я Дуб... мне, конечно, неудобно задавать море глупых вопросов, но придется...
В модуль я просто контрлЦ-контрлВ ту функцию, что Вы написали.
а второе... Что с этим сделать надо?..

Добавлено через 14 минут
а.... Я поняла куда вставить второе.
Только вот в чем дело...
я так понимаю, что в конце у меня должна появляться таблица из 2 столбцов, где уже и отобразяться результаты анализа динамики.
а у меня при запросе вылезает сначала окошечко "предприятие", там что-нибудь пишеь, он потом выдает "продукция"....
не то, видимо..
0
Эксперт MS Access
 Аватар для alvk
7459 / 4592 / 302
Регистрация: 12.08.2011
Сообщений: 14,380
11.03.2013, 11:25
Цитата Сообщение от ОльгаОльга Посмотреть сообщение
1.1. Создать базу данных, а в ней – таблицу с записями приве-денной структуры:
Предприятие Продукция Вып_1 Вып_2 Вып_3 Вып_4 Вып_5 Вып_6

Цитата Сообщение от ОльгаОльга Посмотреть сообщение
а у меня при запросе вылезает сначала окошечко "предприятие", там что-нибудь пишеь, он потом выдает "продукция"....
Какое из двух утверждений ложное?
1
0 / 0 / 0
Регистрация: 11.03.2013
Сообщений: 8
11.03.2013, 11:34  [ТС]
заданиче состоит в том, что я создаю базу данных, в виде таблицы, куда произвольно заношу данные.
А потом нужно создать "выборку", скажем так, которая проанализирует данные таблицы (на колебание) и создаст что-то вроде отчета в новой таблице.
0
Эксперт MS Access
26827 / 14507 / 3192
Регистрация: 28.04.2012
Сообщений: 15,782
11.03.2013, 12:08
Повторю вслед за alvk
Цитата Сообщение от ОльгаОльга Посмотреть сообщение
1.1. Создать базу данных, а в ней – таблицу с записями приве-денной структуры:

Предприятие Продукция Вып_1 Вып_2 Вып_3 Вып_4 Вып_5 Вып_6
Цитата Сообщение от ОльгаОльга Посмотреть сообщение
а у меня при запросе вылезает сначала окошечко "предприятие", там что-нибудь пишеь, он потом выдает "продукция"....
В созданной вами таблице, по условию должны быть поля "Предприятие" и "Продукция". Запрос, при компиляции не находит полей с такими названиями и предполагает, что вы хотите ввести их как просто значения. Поэтому и спрашивает эти значения. Если поля называются иначе, то в запрос надо ввести правильные имена таблиц, полей
0
0 / 0 / 0
Регистрация: 11.03.2013
Сообщений: 8
11.03.2013, 12:13  [ТС]
аааа......
Может дело в том, что пока я сама химичила там (как указано в методичке), то называла на латинском столбцы???
и поэтому всё запуталось?

Добавлено через 2 минуты
в общем... в конструкторе таблицы я называла на латинском
prod
pred
v1
v2
и тд.
а в графе "подпись" уже указывала на русском языке.... вот...
я правильно Вас понимаю? =((( или меня совсем не в ту степь клонит?
0
Эксперт MS Access
 Аватар для alvk
7459 / 4592 / 302
Регистрация: 12.08.2011
Сообщений: 14,380
11.03.2013, 12:15
пора новую тему открывать, про подписи в таблицах....
0
0 / 0 / 0
Регистрация: 11.03.2013
Сообщений: 8
11.03.2013, 12:31  [ТС]
В общем, Вы меня не понимаете. да? :-((((((
Я даже не знаю как правильно объяснить всё...

я вложила файл с заданием и файл с моей бедовой базой данных... Может, если посмотрите, сможете понять что я там напортачила.....
Вложения
Тип файла: doc Пакеты прикладный программ КЗ - копия.doc (35.0 Кб, 21 просмотров)
Тип файла: rar Архив WinRAR.rar (19.6 Кб, 21 просмотров)
0
Эксперт MS Access
26827 / 14507 / 3192
Регистрация: 28.04.2012
Сообщений: 15,782
11.03.2013, 13:02
Запрос ничего не знает о свойстве поля Caption (подпись) и использует только его Name - имя поля
Вложения
Тип файла: rar задание.rar (21.6 Кб, 40 просмотров)
1
0 / 0 / 0
Регистрация: 11.03.2013
Сообщений: 8
11.03.2013, 13:13  [ТС]
я правда не понимаю теперь совсем...
открыла Ваш файл, а там и сама таблица изменена...
0
Эксперт MS Access
26827 / 14507 / 3192
Регистрация: 28.04.2012
Сообщений: 15,782
11.03.2013, 13:21
Цитата Сообщение от ОльгаОльга Посмотреть сообщение
я правда не понимаю теперь совсем...
открыла Ваш файл, а там и сама таблица изменена...
Я всего лишь добавил несколько записей в таблицу для иллюстрации всех возможностей функции. И автоматом, с помощью мастера форм, создал ленточную форму на основе Запроса1. В Параметрах указал, что эта форма должна быть загрузочной. Все.
0
0 / 0 / 0
Регистрация: 11.03.2013
Сообщений: 8
11.03.2013, 14:40  [ТС]
ЭЭх.... понимаете, проблема в том, что задание у меня поставлено конкретно. И я так понимаю, что и выполнено оно должно быть именно в таком виде, какой они пример дают.
Поэтому, мне кажется, что у Вас как-то иначе получилось это, потому что при запросе новая таблица у меня не образовывается....
0
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
raxper
Эксперт
30234 / 6612 / 1498
Регистрация: 28.12.2010
Сообщений: 21,154
Блог
11.03.2013, 14:40
Помогаю со студенческими работами здесь

Android программисты, откликнитесь!
Где-то год назад начал заниматься программированием на pascal. Писал на Pascal месяца 2, но это было вступительное ознакомление с...

Любители тяжелой музыки откликнитесь
Проста интересна, а кто какую тяжелую музыку предпочитает и в каком стиле.... Мне лично больше по душе Панк... Делитесь соображениями

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

Кто делает хороший дизайн, откликнитесь
Всем привет! У меня есть приложение, которое я для себя писал. По части функциональности я уже редко чего добавляю. Хотелось бы...

кому известен движок БД HyTech ! Откликнитесь !!!
Есть база, нужно ее расковырять. скачал сервак для HyTech, требует пароль. С базой прога шла, в проге пароль сломал, но это не пароль к...


Искать еще темы с ответами

Или воспользуйтесь поиском по форуму:
15
Ответ Создать тему
Новые блоги и статьи
Функция установки текстового статуса в реквизите формы документа
Maks 01.04.2026
Алгоритм из решения ниже реализован на нетиповом документе "ВыдачаОборудованияНаСпецтехнику" разработанного в конфигурации КА2, в дополнении к предыдущему решению. На форме документа создается. . .
К слову об оптимизации
kumehtar 01.04.2026
Вспоминаю начало 2000-х, университет, когда я писал на Delphi. Тогда среди программистов на форумах активно обсуждали аккуратную работу с памятью: нужно было следить за переменными, вовремя. . .
Идея фильтра интернета (сервер = слой+фильтр).
Hrethgir 31.03.2026
Суть идеи заключается в том, чтобы запустить свой сервер, о чём я если честно мечтал давно и давно приобрёл книгу как это сделать. Но не было причин его запускать. Очумелые учёные напечатали на. . .
Модель здравосоХранения 6. ESG-повестка и устойчивое развитие; углублённый анализ кадрового бренда
anaschu 31.03.2026
В прикрепленном документе раздумья о том, как можно поменять модель в будущем
10 пpимет, которые всегда сбываются
Maks 31.03.2026
1. Чтобы, наконец, пришла маршрутка, надо закурить. Если сигарета последняя, маршрутка придет еще до второй затяжки даже вопреки расписанию. 2. Нaдоели зима и снег? Не надо переезжать. Достаточно. . .
Перемещение выделенных строк ТЧ из одного документа в другой
Maks 31.03.2026
Реализация из решения ниже выполнена на примере нетипового документа "ВыдачаОборудованияНаСпецтехнику" с единственной табличной частью "ОборудованиеИКомплектующие" разработанного в конфигурации КА2. . . .
Functional First Web Framework Suave
DevAlt 30.03.2026
Sauve. IO Апнулись до NET10. Из зависимостей один пакет, работает одинаково хорошо как в режиме проекта так и в интерактивном режиме. из сложностей - чисто функциональный подход. Решил. . .
Автоматическое создание документа при проведении другого документа
Maks 29.03.2026
Реализация из решения ниже выполнена на нетиповых документах, разработанных в конфигурации КА2. Есть нетиповой документ "ЗаявкаНаРемонтСпецтехники" и нетиповой документ "ПланированиеСпецтехники". В. . .
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2026, CyberForum.ru