Are you using a microsoft word document to read from, eg "vehicles.d oc"?
Normally I would only use a text file to read from, this could explain your blank lines. Otherwise read the line into a variable then test to see if its blank before adding it to the array eg
strTemp = sr.ReadLine
If Trim(strTemp) <> "" Then
LstRent.Items.A dd(strTemp)
End If
Both the...
Nathan G
Last Activity: Jan 16 '07, 03:08 AM
Joined: Nov 23 '06
Location:
-
Try this
Dim strText As String
Do
strText = InputBox("Pleas e enter a numeric value", "Title to Input Box")
Loop Until IsNumeric(strTe xt) = True
If you have additional requiredments other than just testing if its numeric, add them to the last line, basically it will keep looping until the "Loop Until" line is satisfied.Leave a comment:
No activity results to display
Leave a comment: