200分求助关于vb显示数据库数据的问题
现在我已经连接好ACCESS数据库了,可以进行填加删除修该等功能,但是我需要的主要功能还是没实现。就是用5个标签显示不同的数据内容,比如5个标签分别显示字段NAME里的前...
现在我已经连接好ACCESS数据库了,可以进行填加删除修该等功能,但是我需要的主要功能还是没实现。
就是用5个标签显示不同的数据内容,比如5个标签分别显示字段NAME里的前5条数据,然后用按钮可以进行对5个标签的翻页查询,也就是说可以实现上一页和下一页的功能
问题解决追加150分,决不失言 展开
就是用5个标签显示不同的数据内容,比如5个标签分别显示字段NAME里的前5条数据,然后用按钮可以进行对5个标签的翻页查询,也就是说可以实现上一页和下一页的功能
问题解决追加150分,决不失言 展开
2个回答
展开全部
我以前做过一个相册是可以向前向后翻12条记录的.我大致讲一讲完成你要求的方法.
1.首先要有5个label1(i),i=0 to 4
2.统计记录总数/5计算总共有的页数(取整)
3.向下翻页和向上翻页按钮
向下翻页时,记录同时向下移动5个,
for i=0 to 4
data1.Recordset.MoveNext
label1(i).caption=Data1.Recordset.Fields("你要显示的字段")
next i
4.设一个变量记录向上或向下翻的次数.
如a=1,第一次显示5个记录,向下翻的按钮.Enable=false,再向下翻时,再用上述(3)的方法向下移动5个记录,a=a+1显示为第二页.如此类推到最后一页.当a>上述(2)项时,向后翻.enbale=false
5.向上翻则用data1.Recordset.MovePrevious,a=a-1实现页数向前翻动.
1.首先要有5个label1(i),i=0 to 4
2.统计记录总数/5计算总共有的页数(取整)
3.向下翻页和向上翻页按钮
向下翻页时,记录同时向下移动5个,
for i=0 to 4
data1.Recordset.MoveNext
label1(i).caption=Data1.Recordset.Fields("你要显示的字段")
next i
4.设一个变量记录向上或向下翻的次数.
如a=1,第一次显示5个记录,向下翻的按钮.Enable=false,再向下翻时,再用上述(3)的方法向下移动5个记录,a=a+1显示为第二页.如此类推到最后一页.当a>上述(2)项时,向后翻.enbale=false
5.向上翻则用data1.Recordset.MovePrevious,a=a-1实现页数向前翻动.
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询