【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两种方式实现即时更...(03.01)
- Access隐藏与显示lacc...(01.12)
- 【Access高效办公】将每个...(12.23)
- Access21点游戏源代码(12.13)
- 【Access窗体导出Exce...(11.15)
- 【Access开发】Acces...(11.14)
- 通过Access宏录入数据到选...(11.10)
- 用DLOOKUP函数将需求表中...(10.31)
- Access日期区间段查询数据...(10.25)
学习心得
最新文章
- Access快速开发平台--在WI...(03.08)
- 使用SQL语句删除xscj表中学号...(03.08)
- Access快速开发平台进销存教程...(03.07)
- Access快速开发平台--frm...(03.06)
- 【Access删除查询】删除数字最...(03.06)
- Access快速开发平台进销存教程...(03.05)
- Access快速开发平台进销存教程...(03.04)
- Access快速开发平台--IsL...(03.02)
- Access两种方式实现即时更新月...(03.01)
- Access开发的资金管理系统;基...(02.29)