设为首页收藏本站Access中国

Office中国论坛/Access中国论坛

 找回密码
 注册

QQ登录

只需一步,快速开始

返回列表 发新帖
查看: 1939|回复: 4
打印 上一主题 下一主题

[Access本身] 【技巧】开发平台编辑子窗体为字段设置自定义自动编码

[复制链接]

点击这里给我发消息

跳转到指定楼层
1#
发表于 2015-4-18 23:29:30 | 只看该作者 回帖奖励 |倒序浏览 |阅读模式
用过开发平台的网友都非常喜欢平台的设置自定义自动编码。因为自定义编码有很多设置机制,可根据自己设置的前缀 后缀  日期格式 来定义自己的编码,而且 在自动创建窗体时就可为需要的字段来设置自定义编码但自定义编码只对编辑窗体的字段有效
有不少网友希望在编辑窗体的子窗体中希望使用自定义编码,但没有直接的方法。

其实非常简单,只要在编辑窗体的子窗体的窗体代码中加上这句就可以了


  1. '在窗体的更新前事件中加上代码
  2. Private Sub Form_BeforeUpdate(Cancel As Integer)
  3.   Me.FProductName.Value = gf_GetAutoNo(42)
  4. End Sub
复制代码



其它 FProductName 可改为你需要设置自定义编码 的字段名
42 是自动编码规则的ID,在自动编码规则窗体上可查看到。

分享到:  QQ好友和群QQ好友和群 QQ空间QQ空间 腾讯微博腾讯微博 腾讯朋友腾讯朋友
收藏收藏2 分享分享 分享淘帖 订阅订阅
2#
发表于 2015-4-19 04:43:31 | 只看该作者
{:soso_e156:}
3#
发表于 2015-4-19 11:04:05 | 只看该作者
试了下,没有成功,自动编号的字段名为“X-0000",自动编码ID为50,
'在窗体的更新前事件中加上代码
Private Sub Form_BeforeUpdate(Cancel As Integer)
  Me.X-0000.Value = gf_GetAutoNo(50)
End Sub
是结尾为EditSub的窗体,还是结尾是Edit?

点击这里给我发消息

4#
 楼主| 发表于 2015-4-19 23:51:08 | 只看该作者
EditSub的窗体

点击这里给我发消息

5#
 楼主| 发表于 2015-4-19 23:51:53 | 只看该作者
如果是编辑窗体(edit),则在创建窗体时,可在创建向导中直接指定 某个字段的自定义编码规则 ,不需要使用代码来设置
您需要登录后才可以回帖 登录 | 注册

本版积分规则

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

GMT+8, 2024-5-26 21:29 , Processed in 0.096634 second(s), 30 queries .

Powered by Discuz! X3.3

© 2001-2017 Comsenz Inc.

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