- |
Private Sub Form_Open(Cancel As Integer) Form.AllowAdditions = False .Visible = False If IsNull() Then .Caption = " " .Visible = True ElseIf = 1 Then Me..Caption = "()" Me..Visible = True ElseIf = 2 Then .Caption = " () ( )" .Visible = True End If End Sub
http://www.sql.ru/forum/1116110/ssylka-na-pole-ili-na-tablicu-chto-vozvrashhaet-znachenie