OLEDropAllowed example for Visual Basic

Note: Also works with Access 95 and 97.

This example toggles the OLEDropAllowed property.

If Lead1.OLEDropAllowed = False Then
  Lead1.OLEDropAllowed = True
Else
  Lead1.OLEDropAllowed = False
End If