求助：在图片框里连续循环显示图片？

hongjian

如何通过读取“图片表”里的文件（链接的路径，在pic下的文件）

在图片框里连续循环显示图片？

　　多谢帮助！
本人开不清数据表里的数据如何才能循环读取？

下载：
http://www.accxp.com/club/other/usr/19/19_1421.rar

[此贴子已经被作者于2003-3-28 14:17:26编辑过]

hongjian

多谢！我总是修改不了我的例子，初学，不会，请指教！

我想学习　ADO　的使用方法，　请指教！


http://www.accxp.com/club/other/usr/19/19_1433.rar

[此贴子已经被作者于2003-3-28 21:37:12编辑过]

zhengjialon

应该增加一个for 循环，且里面有条往下移动记录的语句，ADO帮助里是有关于记录循环的例子或搜索论坛有关于ADO的。

hongjian

Sub FORM_Load()
Me.TimerInterval = 350
　
　Dim Rs As Recordset
Dim Dbs As Database
Set Dbs = CurrentDb()
Set Rs = Dbs.OpenRecordset("SELECT * From 图片表")

Dim i
For i = 0 To Rs.RecordCount - 1
Me.btnPicture.Picture = CurrentProject.Path & "\" & Rs.Fields(2)
Rs.MoveNext
Next
err:　 If err.Number = 3021 Then Rs.MoveFirst
　

如何通过 ADO/DAO　读取“图片表”里的文件,在图片框里连续循环显示图片？?

http://www.accxp.com/club/other/usr/19/19_1433.rar

[此贴子已经被作者于2003-3-28 21:36:26编辑过]