run time error 94 invalid use of null access
|
|
, 28 2015 . 18:30
+
!!!!
:
Private Sub cmdOpenReport_Click()
Dim S As String
S = " "
If Me("cbx4") Then
S = S & ",[ ].[ ]"
End If
If Me("cbx5") Then
S = S & ",[ ].[ ]"
End If
If Me("cbx6") Then
S = S & ",[ ].[ ]"
End If
If Me("cbx7") Then
S = S & ",[ ].[ ]"
End If
If Me("cbx8") Then
S = S & ",[ ].[ ]"
End If
If Me("cbx9") Then
S = S & ",[ ].[ ]"
End If
If Me("cbx10") Then
S = S & ",[ ].[ ]"
End If
CurrentDb.QueryDefs!Query01_Query.SQL = "SELECT [ ].[],[ ].[ ],[ ].[],[ ].[] " & S & " FROM [ ] WHERE [ ].[ ] IS NULL;"
DoCmd.OpenReport "Report02_Report", acViewPreview
End Sub
?? - chebox' , , , ... .
checkbox' , ...
, )))
http://www.sql.ru/forum/1154272/run-time-error-94-invalid-use-of-null-access
