is this the right code for move next?

Code:
Dim Ssql As String
Set rs = New ADODB.Recordset
Ssql = "select * from StuName order by Fname"
rs.Open (sql), conn, adOpenStatic, adLockOptimistic
If Not rs.EOF Then
rs.MoveNext
If rs.EOF Then
rs.MovePrevious
End If
End If