设为首页收藏本站Access中国

Office中国论坛/Access中国论坛

 找回密码
 注册

QQ登录

只需一步,快速开始

返回列表 发新帖
楼主: 红尘如烟
打印 上一主题 下一主题

[模块/函数] [原创源码分享]只有几行代码的自定义自动编号函数

[复制链接]
21#
发表于 2008-8-21 09:15:16 | 只看该作者
很实用的功能
22#
发表于 2008-8-21 10:21:27 | 只看该作者
高,,,,,顶
23#
发表于 2008-8-21 12:10:07 | 只看该作者
For i = 1 To Digit
strNumberFormat = strNumberFormat & "0"
Next
三行的改为一行代码
strNumberFormat  = String(Digit, "0")


这样又少了二行代吗了
24#
发表于 2008-8-31 16:31:13 | 只看该作者
很实用的功能
25#
发表于 2008-9-5 11:34:15 | 只看该作者

回复 1# 的帖子

谢谢分享
26#
发表于 2008-9-6 18:03:08 | 只看该作者
不错!收藏.
27#
发表于 2008-9-9 10:29:39 | 只看该作者
收下,谢谢
28#
发表于 2008-11-19 09:38:57 | 只看该作者
支持一下!
29#
发表于 2008-11-19 14:53:29 | 只看该作者
11111111111
30#
发表于 2008-11-20 12:44:34 | 只看该作者
....................
您需要登录后才可以回帖 登录 | 注册

本版积分规则

QQ|站长邮箱|小黑屋|手机版|Office中国/Access中国 ( 粤ICP备10043721号-1 )  

GMT+8, 2024-12-1 17:22 , Processed in 0.096406 second(s), 33 queries .

Powered by Discuz! X3.3

© 2001-2017 Comsenz Inc.

快速回复 返回顶部 返回列表