问个问题:怎么才能让text1.text里显示当前查询里的记录,然后用timer 操作 text1.text显示下一条记录  主要是后面的用timer做下一条记录显示 我不会,请教各位

解决方案 »

  1.   

    做个public 的recordset
    在timer 响应函数中
    rs.movenext
    text1.text=....
      

  2.   

    说白了 就上指针下移
    重新给TEXT赋值啊
      

  3.   

    写的很详细了。你哪里不明白呢
    1.连接数据库,adodb, connection, recordset其中recordset是结果数据集合我们定义成public的形式
    2.设置timer开始,在函数中 rs.open sql, conn, 1,1 找到你要找的数据集然后把timer设置成为true
    3利用timer改变,在timer相应函数中
     if rs.eof=false then
        text1.text=rs.fields.....
        rs.movenext
     else
        rs.close  '关闭结果集
        timer.enable=false '暂停记时
     end if很详细了,再多说一句。我是女子,并非哥哥