Студопедия

КАТЕГОРИИ:


Архитектура-(3434)Астрономия-(809)Биология-(7483)Биотехнологии-(1457)Военное дело-(14632)Высокие технологии-(1363)География-(913)Геология-(1438)Государство-(451)Демография-(1065)Дом-(47672)Журналистика и СМИ-(912)Изобретательство-(14524)Иностранные языки-(4268)Информатика-(17799)Искусство-(1338)История-(13644)Компьютеры-(11121)Косметика-(55)Кулинария-(373)Культура-(8427)Лингвистика-(374)Литература-(1642)Маркетинг-(23702)Математика-(16968)Машиностроение-(1700)Медицина-(12668)Менеджмент-(24684)Механика-(15423)Науковедение-(506)Образование-(11852)Охрана труда-(3308)Педагогика-(5571)Полиграфия-(1312)Политика-(7869)Право-(5454)Приборостроение-(1369)Программирование-(2801)Производство-(97182)Промышленность-(8706)Психология-(18388)Религия-(3217)Связь-(10668)Сельское хозяйство-(299)Социология-(6455)Спорт-(42831)Строительство-(4793)Торговля-(5050)Транспорт-(2929)Туризм-(1568)Физика-(3942)Философия-(17015)Финансы-(26596)Химия-(22929)Экология-(12095)Экономика-(9961)Электроника-(8441)Электротехника-(4623)Энергетика-(12629)Юриспруденция-(1492)Ядерная техника-(1748)

Прямі (1) паралельні, якщо виконується умова





Доверь свою работу кандидату наук!
1500+ квалифицированных специалистов готовы вам помочь

Data Access Objects (DAO)

ActiveX Data Objects (ADO)

Объекты ADO

Current Project (Текущий проект)

End Function

Dim strFullName As String

Dim strLastName As String

Dim strFirstName As String

End Sub

Dim strFullName As String

Dim strLastName As String

Dim strFirstName As String

VBA (Visual Basic for Applications)

FROM (ПОСТАВЩИКИ

FROM ЗапросПТ

FROM ЗапросОт

GROUP BY ЗапросОт.[Код товара], ЗапросОт.Месяц;


SELECT ЗапросПТ.[код товара], Sum(ЗапросПТ.поступление) AS [Sum-поступление], ЗапросПТ.месяц

GROUP BY ЗапросПТ.[код товара], ЗапросПТ.месяц

ORDER BY ЗапросПТ.месяц;


SELECT ТОВАРЫ.[наименование товара], ПОСТАВЩИКИ.Поставщик, ПОСТАВЩИКИ.Страна, [ПОСТУПЛЕНИЕ ТОВАРА].поступление, [ПОСТУПЛЕНИЕ ТОВАРА].цена, [цена]*[курс] AS [Стоимость в руб]

INNER JOIN ТОВАРЫ ON ПОСТАВЩИКИ.[Код поставщика] = ТОВАРЫ.[код поставщика])

INNER JOIN ([КУРС ВАЛЮТЫ]

INNER JOIN [ПОСТУПЛЕНИЕ ТОВАРА] ON [КУРС ВАЛЮТЫ].дата = [ПОСТУПЛЕНИЕ ТОВАРА].[дата поступления]) ON ТОВАРЫ.[код товара] = [ПОСТУПЛЕНИЕ ТОВАРА].[код товара];


Sub concat()

strFirstName = "Access"

strLastName = "VBA"

strFullName = strFirstName & " " & strLastName

Debug.Print strFullName

View ->immediate window


Function concatFunc() As String

strFirstName = "Access"

strLastName = "VBA"

strFullName = strFirstName & " " & strLastName

concatFunc = strFullName

Debug.Print concatFunc

Application.CurrentProject.Report (“myReport”)

семейство Forms, Reports, Modules, References, и объекты Screen и DoCmd.


Откройте VBA Editor, выберите Tools®References.

.

Поможем в написании учебной работы
Поможем с курсовой, контрольной, дипломной, рефератом, отчетом по практике, научно-исследовательской и любой другой работой




Дата добавления: 2014-11-20; Просмотров: 288; Нарушение авторских прав?;


Нам важно ваше мнение! Был ли полезен опубликованный материал? Да | Нет



ПОИСК ПО САЙТУ:


Читайте также:
studopedia.su - Студопедия (2013 - 2022) год. Все материалы представленные на сайте исключительно с целью ознакомления читателями и не преследуют коммерческих целей или нарушение авторских прав! Последнее добавление




Генерация страницы за: 0.017 сек.