<-- Previous || Up || Next -->

Sort Words Sample Sub
String Words Class

Private Sub SortWordsSample()
    ' Print some samples of the SortWords function.

    Debug.Print SortWords(Gettysburg, Null, Null, Null, True, False)
    Debug.Print SortWords(Gettysburg, Null, Null, Null, True, True)
    Debug.Print SortWords(Gettysburg, Null, Null, Null, False, True)
End Sub

Copyright 1996-1999 Entisoft
Entisoft Tools is a trademark of Entisoft.