How do you obtain the number of lines that a specified file contains using VB 6?

Thank you