Rambler's Top100
Форум: MS ACCESSVBVBA MS OfficeMS SQL server
Новые сообщения: 0000

Форум: MS ACCESS

Вопросы связанные с MS ACCESS

Обновить визитку
Участники «Online»
Все участники

 
 

Доброго времени суток, Посетитель!

вид форума:
Линейный форум Структурный форум

тема: присвоение значения полю при открытии отчета
 
 автор: joka   (28.05.2009 в 11:40)   личное сообщение
 
 

подскажите пожалуйста почему не хочет работать такой код
на Report_Open ставлю код

If Not IsNull([Forms]![usys_f_people]![ПолеДатаРож].Value) Then
dd = Left([Forms]![usys_f_people]![ПолеДатаРож].Value, 2)
mm = Mid([Forms]![usys_f_people]![ПолеДатаРож].Value, 3, 2)
yyyy = Right([Forms]![usys_f_people]![ПолеДатаРож].Value, 4)
If dd <> "00" And mm <> "00" Then Me.ПолеДР = dd & "." & mm & "." & yyyy
End if

ругается на присвоение, говорит невозможно присвоить? объясните почему и можно ли вообще присваивать значения полям отчет в коде VBA?

  Ответить  
 
 автор: joka   (28.05.2009 в 12:10)   личное сообщение
 
 

нашел методом тыка вариант рабочей строчки

так работает
If dd <> "00" And mm <> "00" Then Me.ПолеДР.ControlSource = "= #" & dd & "/" & mm & "/" & yyyy & "#"

оказывается почему то с полями отчета работать сложнее както...

  Ответить  
 
 автор: osmor   (28.05.2009 в 12:30)   личное сообщение
 
 

если поле вычисляемое, то ему значение присвоить нельзя.
в форме тоже

  Ответить  
 
 автор: joka   (28.05.2009 в 16:21)   личное сообщение
 
 

поле обычное не вычисляемое вроде! постом выше написал рабочую строку с которой все работает! Была ошибка что неправильную строку писал и присваивал не тому параметру.

  Ответить  
 
 автор: osmor   (28.05.2009 в 16:45)   личное сообщение
 
 

В той строке которая "выше" как раз изменяется свойство определяющее как вычисляется поле.
Хотя конечно, я с отчетами не очень дружу, да и забываю уже...

  Ответить  
 
 автор: joka   (29.05.2009 в 09:07)   личное сообщение
 
 

ну у меня значит проблемы с терминалогией:) я подразумевал под "значение" видимо "формулу вычисления этого значения":)

  Ответить  
HiProg.com - Технологии программирования
Rambler's Top100 TopList