Show method is not working (Error 438)

[Lee]

HI there,
When I run the following code,
Public Sub rptTotalNetAssets()
If LogonDB = False Then Exit Sub
frmTotalNetAssets.Show 'Where I got Error 438
End Sub

But this piece worked before today. How do I avoid this
error in the future? Thanks

Regards,

Lee