Comparison Operators

Result = Expression1 { = | < | > | <= | >= } Expression2

Sub ExampleUnequal

Dim sFile As String

DIM sRoot As String REM ' Root directory for file in and output

    sRoot = "c:\"

    sFile = Dir$( sRoot ,22)

    If sFile <> "" Then

        Do

            MsgBox sFile

            sFile = Dir$

        Loop Until sFile = ""

    End If

End Sub