Appearance Example for Visual Basic

Note: Also works with Access 95 and 97.

This example toggles the Appearance property.

If LEADRasterView1.Appearance = RASTERVIEW_APPEARANCE_FLAT Then
   LEADRasterView1.Appearance = RASTERVIEW_APPEARANCE_THREED
Else
   LEADRasterView1.Appearance = RASTERVIEW_APPEARANCE_FLAT
End If