【access源码通用函数】在窗体中实现动态行号(连续序号)
时 间:2010-12-01 00:00:00
作 者:红尘如烟 ID:10768 城市:成都
摘 要:在窗体中显示记录的行号。
正 文:
以前有一阵子需要这个功能,不过没有找到好的办法,后来无意中在微软网站的帮助中心中见到一个实现方法,思路很好,不过感觉还能再改进,于是按照这个思路重新写了一个通用函数,效率更高,用起来更简单。微软KB原文地址:http://support.microsoft.com/kb/120913
源代码:
'=============================================================== '函数名称: GetLineNumber '功能描述: 在窗体中显示记录的行号 '输入参数: DataForm 必需的,要显示行号的绑定数据窗体 '返回参数: 每一行记录的行号 '使用说明: 在绑定窗体中创建一个文本框,然后将控件来源设为:=GetLineNumber([Form]) 即可。 '兼 容 性: '作 者: 红尘如烟 '创建日期: 20010-11-26 '=============================================================== Function GetLineNumber(DataForm As Form) On Error GoTo Err_GetLineNumber With DataForm.RecordsetClone .Bookmark = DataForm.Bookmark GetLineNumber = .AbsolutePosition + 1 End With Err_GetLineNumber: End Function |
附 件:
图 示:
Access软件网QQ交流群 (群号:483923997) Access源码网店
常见问答:
技术分类:
源码示例
- 【源码QQ群号19834647...(12.17)
- 【Access小作品】简单的待...(04.30)
- 【Access窗体导出PDF】...(04.08)
- 【Access窗体导出PDF】...(04.07)
- Access两种方式实现即时更...(03.01)
- Access隐藏与显示lacc...(01.12)
- 【Access高效办公】将每个...(12.23)
- Access21点游戏源代码(12.13)
- 【Access窗体导出Exce...(11.15)
- 【Access开发】Acces...(11.14)
学习心得
最新文章
- 【Access小作品】简单的待办任...(04.30)
- 从另一个ACCESS数据库批量导入...(04.29)
- Access日期格式的数据导出Ex...(04.28)
- ACCESS精华集锦资料.CHM(04.25)
- Access VBA语句If Me...(04.24)
- 【Access修改记录示例】编辑选...(04.22)
- 【Access表名称命名建议】将A...(04.20)
- Access学习笔记--用Acce...(04.19)
- 【Access重复项查询示例】将A...(04.17)
- Access快速开发平台企业版--...(04.16)