Advertisement
Guest User

Untitled

a guest
Oct 24th, 2014
114
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 0.31 KB | None | 0 0
  1. Private Sub Form_Current()
  2. Dim VARSET As Object
  3. Dim VAR As String
  4. VARSET = DLookup("TITLE", Table!LSE_FORM_ADMIN, "") 'keep getting error here
  5. VAR = VARSET
  6. If Me!CB = "-1" Then
  7. Form_LSE_FORM_ALL!VAR.Visible = True
  8. Else
  9. Form_LSE_FORM_ALL!VAR.Visible = False
  10. End If
  11. End Sub
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement