Office中国论坛/Access中国论坛

标题: 下载进度条(知道的朋友进来一下啊!) [打印本页]

作者: lixun005 时间: 2008-3-21 16:08
标题: 下载进度条(知道的朋友进来一下啊!)
1,我想用VBA循环读取一个表中的所有记录,知道的朋友回一下,谢谢!(完成请看二楼程序)
2.我现在做出一个下载图片的程序,不知道怎么进度条啊,知道的朋友发一下程序,谢谢!

[ 本帖最后由 lixun005 于 2008-3-21 17:48 编辑 ]

作者: roseika 时间: 2008-3-21 16:16
Dim myrsLend1 As DAO.recordSet
Dim db As DAO.Database
Set db = CurrentDb
Set myrsLend1 = db.OpenRecordset(sql文)
If Not rs.EOF Or rs.BOF Then
rs.MoveFirst
Do Until rs.EOF
。。。。。（rs!域名）
rs.MoveNext
Loop
End If

作者: lixun005 时间: 2008-3-21 17:48
第二个没有人知道吗?郁闷啊!

欢迎光临 Office中国论坛/Access中国论坛 (http://www.office-cn.net/)