vb
eop()--------------------------------------------------------------------------------------------------