ebNone (constant)

Description Bit value used to select files with no other attributes.
Comments This value can be used with the Dir$ and FileList commands. These functions will return only files with no attributes set when used with this constant. This constant is equal to 64.
Example This example dimensions an array and fills it with filenames with no attributes set.
Sub Main()
  Dim s$()
  FileList s$,"*",ebNone
  If ArrayDims(s$) = 0 Then
    MsgBox "No files found without attributes!"
    End
  End If
  a% = SelectBox("No Attributes", "Choose one", s$)
  If a% >= 0 Then
    MsgBox "You selected file " & s(a%)
  Else
    MsgBox "No selection made."
  End If
End Sub
See Also Dir, Dir$ (functions); FileList (statement); SetAttr (statement); GetAttr (function); FileAttr (function).