高分请教？

请教？
使用vb6.0数据工程新建一数据工程，导入acess建的学生信息表，表名为xueshengxinxi
有sno,sname,.sage.sdept.sclass五个属性，配置相应内容后，在窗体frmdataenv上拖入相应五个属性，建立两个command按钮，写入如下代码：
Private Sub cmdnext_Click()
 On Error GoTo MoveErr
 If Not DataEnvironment1.Recordsets.EOF Then
  DataEnvironment1.Recordsets.MoveNext
 End If
 
 Exit SubMoveErr:
 MsgBox Err.Description 
End SubPrivate Sub cmdprevious_Click()
'setup an error catching/reportiong routine
On Error GoTo MoveErr
'Check if the current record is the beginning
'of the file
If Not DataEnvironment1.Recordsets.BOF Then
  'move the displayed record to the previous one
 DataEnvironment1.Recordsets.MovePrevious
End If
 Exit Sub
MoveErr:
 MsgBox Err.Description
End Sub运行工程，只可浏览表内第一组数据，点击command按钮，出现msgbox Dataproj提示
对象不支持该属性或方法，
请问怎么解决，谢谢