powered by simpleCommunicator - 2.0.61     © 2026 Programmizd 02
Целевая тема:
Создать новую тему:
Автор:
Закрыть
Цитировать
Форумы / Microsoft Access [игнор отключен] [закрыт для гостей] / Pomogite dobavitm pustie stroki v otchot
5 сообщений из 5, страница 1 из 1
Pomogite dobavitm pustie stroki v otchot
    #32299339
BATON
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
У меня есть таблица, в которой есть поле [ЧислоВакансий], необходимо чтобы в отчёте после данных добавлялось "пустое" число строк = [ЧислоВакансий]
...
Рейтинг: 0 / 0
Pomogite dobavitm pustie stroki v otchot
    #32299475
Хам трамвайный
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Option Compare Database
Option Explicit
Dim d As Integer

Private Sub ОбластьДанных_Print(Cancel As Integer, PrintCount As Integer)
Dim i As Integer
i = Nz([ЧислоВакансий], 0)
If d < i Then
Me.MoveLayout = True
Me.NextRecord = False
Me.PrintSection = False
d = d + 1
Else
d = 0
End If
...
Рейтинг: 0 / 0
Pomogite dobavitm pustie stroki v otchot
    #32299502
Alex_2003
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Можно через объединение:
SELECT [Field1], [Field2], [Field3]
FROM Table
UNION
SELECT [Field1] Is Null, [Field2] Is Null, [Field3] Is Null FROM Table
ORDER BY [Field1] DESC
...
Рейтинг: 0 / 0
Pomogite dobavitm pustie stroki v otchot
    #32299523
Хам трамвайный
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
пардон.
я делал наспех
поэтому получилось
что вставляет пустые
строки не ПОСЛЕ,
а ДО.
идея я думаю понятна
переправь сам
...
Рейтинг: 0 / 0
Pomogite dobavitm pustie stroki v otchot
    #32299625
BATON
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
Спасибо Вам огромное !!!
Работает, но я VB не знаю, подскажите что переправить?
...
Рейтинг: 0 / 0
5 сообщений из 5, страница 1 из 1
Форумы / Microsoft Access [игнор отключен] [закрыт для гостей] / Pomogite dobavitm pustie stroki v otchot
Найденые пользователи ...
Разблокировать пользователей ...
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


Просмотр
0 / 0
Close
Debug Console [Select Text]