ebNone (constant)


Bit value used to select files with no other attributes.


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.


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 If
  a% = SelectBox("No Attributes", "Choose one", s$)
  If a% >= 0 Then
    MsgBox "You selected file " & s(a%)
    MsgBox "No selection made."
  End If
End Sub

See Also

Dir, Dir$ (functions); FileList (statement); SetAttr (statement); GetAttr (function); FileAttr (function).

More information