Цитата

Все что тебе надо сделать - это открыть в MS Access базу данных, выбрать тот отчет, который тебе нужно, открыть его констpуктором и написать в значение поля то, что я тебе написал.

Ну так не работает же!

ты указала (где не могу сказать, так как Access нет под рукой) с какой таблицeй твое поле работает? я забыл тебе это написать...

Цитата

ты указала (где не могу сказать, так как Access нет под рукой) с какой таблицeй твое поле работает? я забыл тебе это написать...

Да в отчете стоит такой код:

Код

Private Sub Report_Open(Cancel As Integer) Dim strsql As String strsql = "SELECT check FROM table1 " Me.RecordSource = strsql End Sub

Вот , а в отчете стоит TextBox с именем check и с значеним check в свойстве Control Source.
(Так как раз тут я и пишу твой код теперь)

ладно, подожди до четверга (или пятницы), я посмотрю в MS Access, где я прописывал название таблицы

Вообщем еще раз по порядку:
1. Открываем Access.
2. Создаем новый отчет при помощи конструктора (Вставка -> Отчет -> Конструктор).
3. Наводим стрелку мыши на темно серый фон (справа снизу например, короче там где не верхний колонтитул и не область данных (и вся эта фигня), а просто темно серый background) и и после нажатия правой кнопки мыши на нем нажимаем на слово "Свойства" в открывшемся окне "Отчет".
4. Там стираем все, что написано в разделе "Данные" в поле "Источник записей" и потом выбираем таблицу, где сидят твои нули или единички и потом выбираем в открывшемся окне то поле, в котором они сидят. Закрываем окно "Отчет".
5. В область данных суем "поле" (не надпись!) и в его свойствах прописываем в поле "Данные" мой код.
6. Закрываем окно конструктора записав все, что мы сделали.
7. Double Click по отчету теперь откроет тебе окно, в котором будут единицы и нолики заменены на тебе нужные значки.

Надеюсь в этот раз проблем не будет, а то уже тема красная, а она не стоит того...

p.s. На будущее могу посоветовать поставить MSDN для того, чтобы можно было там почитать полезные вещи на тему VB (и VBA так как они похожи). А вообще книжек надо как можно больше. В справке Microsoft Access, помоему, врятли можно что-то найти дельное, когда не знаешь что искать (как в этом случае), а вот в книге одной умной, Microsoft Access for Windows 95 (Microsoft Press, John Viescas) например, я все быстро нашел. А уже потом можно и в справке найти эту функцию, вот что там написано:

Switch Function Example
The following example uses the Switch function to determine the appropriate language for a specified city based on the values of the ShipCountry and ShipCity fields in an Orders table. You can enter the following expression in a calculated control on a form or report. The expression is shown on multiple lines for clarity; you can also enter it on a single line.

= Switch([ShipCity] = "Madrid", "Spanish", _
[ShipCity] = "Berlin", "German", _
[ShipCity] = "Torino", "Italian", _
[ShipCountry] = "France", "French", _
True, "English")
If the city is Madrid, the Switch function returns "Spanish"; if it is Berlin, it returns "German"; and so on. If the city is not one of those listed, but the country is France, it returns "French". If the city in question is not in the list, the Switch function returns "English".

Во так все просто.

Успехов!

Да ... развели вы тут полемику !!!
Мне кажется лучше ее объяснить так !
Сделай транзитную форму на основе своей таблицы , и втыкай туды цикл при открытии на обработку условия этого поля. Цикл отработал - форма закрылась - таблица готова - открываем отчет !


Private Sub Form_Load()
DoCmd.GoToRecord , , acFirst
ross:

If IsNull(Индексоное поле) Then Goto Rep
Поле1 = IIf(Поле1 = 0, " ", "V")
DoCmd.GoToRecord , , acNext
GoTo ross

Rep:
DoCmd.OpenReport "Имя отчета", acPreview
DoCmd.Close
End Sub

По временя открытия конечно подольше , но .......тогда не надо искать что и куда прописывать в отчете ))

А... то что таблица тоже транзитная наверно говорить не нужно !!??

100 км. для бешенной собаки не крюк ! ))

Тут полемики нет никакой. Просто автор вопроса хочет, чтобы ей готовое на блюдечке с голубой каемочкой принесли, разжевали и в рот положили. Посмотрите сколько она вопрсов никадала в форум? Может мы все вместо нее и работать на ее фирме будем?

Точно !!! Автор берешь нас на полставки ? мы тебе в каждое поле будем усе прописывать ))

sergeeff

Знаешь что, если тебя что не устраивает, то я тебя в свою тему читать не заставляю
Alles- и тебя тоже

Какие мы обидчивые !!! Прежде всего надо сказать спасибо , что тебе все разжували и в рот положили , а потом возмущайся сколько угодно !!!