ник: joka
подскажите пожалуйста почему не хочет работать такой код
на 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?