安徽彩票大奖 欧洲百万乐透大奖 七星彩17049规律大奖 双色球中大奖领奖过程 3d近期中大奖故事 广州番禺中福彩大奖的 鸡男注定会中大奖 2016江苏彩民中大奖 趣彩网大奖网黑平台 大乐透4.97亿大奖 霍邱一彩民6元中双色球547万大奖 双色球黑龙江中大奖图 体育彩票中大奖名单 什么样的人能中大奖 彩票大奖作假

access子窗体数据移动的代码(第一条,上一条,下一条,最后一条)

2018-08-18 16:18:00
tmtony8
原创
1544

在access中,我们喜欢用子窗体来显示数据集。系统也?#28304;?#20102;记录导航按钮。非常方便。


只需要设置窗体航按钮属性为“是” 即可


但是?#28304;?#30340;导航是固定的。如果想修改一下样式,位置。那?#27425;?#20204;就需要自定义导航按钮了。如何自定义呢:

在窗体中添加4个按钮。分别是“第一条”,“上一条”,“下一条”,“最后一条”。这里以图片的形式显示


详细源码:

'第一条记录
Private Sub cmdFirst_Click()
    
    On Error Resume Next
    
    Me.sfmsub.Form.Recordset.MoveFirst
    
End Sub


'上一条记录
Private Sub cmdPrevious_Click()
    On Error Resume Next
    
    With Me.sfmsub.Form.Recordset
        .MovePrevious
        If .BOF Then .MoveNext
    End With
End Sub


'下一条记录
Private Sub cmdNext_Click()
    
    On Error Resume Next
    
    With Me.sfmsub.Form.Recordset
        .MoveNext
        If .EOF Then .MovePrevious
    End With
    

End Sub


'最后一条记录
Private Sub cmdLast_Click()
    
    On Error Resume Next
    
    
    Me.sfmsub.Form.Recordset.MoveLast
    
End Sub





通过点击按钮,自动跳转记录

    分享
    ? 1999-2019 Office交流网?? 中山市天鸣科技发展有限公司 粤ICP备10043721号-5 SQL查询:3
    内存占用:4.50MB
    PHP 执行时间:0.08
    双色球大奖2000年
    安徽彩票大奖 欧洲百万乐透大奖 七星彩17049规律大奖 双色球中大奖领奖过程 3d近期中大奖故事 广州番禺中福彩大奖的 鸡男注定会中大奖 2016江苏彩民中大奖 趣彩网大奖网黑平台 大乐透4.97亿大奖 霍邱一彩民6元中双色球547万大奖 双色球黑龙江中大奖图 体育彩票中大奖名单 什么样的人能中大奖 彩票大奖作假
    赫拉克勒斯fate弓兵 泰山传奇注册 北京pk计划下载安装 矮木头电子 北京赛车全天单期计划 森林舞会电玩城大厅app下载 莆田体彩31选7走势图 女海盗王电影 古墓奇兵电子 广西快乐十分计划在线