@Rob123: you'd probably be better using Trim$ for that line: VB Code: If Len(Trim$(Data)) = 0 Then Exit Do
If Len(Trim$(Data)) = 0 Then Exit Do
Take a moment to rate useful posts VB6 CodeBank: Glass Form & Tracing App , MouseWheel with Any Control , Form Previewer Utility VB6 Snippets: RTB: Disable Smooth Scrolling , Form: Left & Right Justified Text in TitleBar , ListBox: As-You-Type Filtering (fast) , MSFlexGrid: Non-Adjacent Col/Row Selection , IsProcessRunning: PSAPI / WMI , PictureBox: Frame Look-A-Like , Open Folder in a Particular View , Form: Always on Bottom VBA Snippet: Generic Mouseover Workaround
Forum Rules
Reply With Quote