This example retrieves the setting of the IsWeb property for a WebFolder object.
Private Sub CheckExecutable()
Dim myFolder As WebFolder
Dim myWebStatus As Boolean
Set myFolder = ActiveWeb.RootFolder.Folders("images")
myWebStatus = myFolder.IsWeb
End Sub