Description

Bit position of a file attribute indicating that a file is hidden.

Comments

This constant is equal to 2.

Example

This example dimensions an array and fills it with filenames using the ebHidden attribute.

Sub Main()
  Dim s$()
  FileList s$,"*",ebHidden
  If ArrayDims(s$) = 0 Then
    MsgBox "No hidden files found!"
    End
  End If
  a% = SelectBox("Hidden Files","Choose one", s$)
  If a% >= 0 Then
    MsgBox "You selected hidden 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).

E