rs.Open "select sno,begintime,numb,statement  from info  where sno='" & Trim(text2.Text) & "' and statement=1 ", conn
today1 = rs.Fields.Item("begintime")
   num = rs.Fields.Item("numb")
statement = rs.Fields.Item("statement")
sno = rs.Fields.Item("sno")
bof 或eof中有一个是”真“或者当前的纪录已被删除，所需的操作要求一个 当前的记录

类似的问题我以前也遇到过，不知道怎么了，现在就解决不了了，帮忙看看吧

谢谢啦
问题解决了，因为需要得到 前面的数据，所以这里出错了。