设为首页收藏本站Access中国

Office中国论坛/Access中国论坛

 找回密码
 注册

QQ登录

只需一步,快速开始

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

[窗体] 在窗体中输入记录,大部分内容重复如何默认上一条内容

[复制链接]
跳转到指定楼层
1#
发表于 2011-10-14 11:58:02 | 只看该作者 回帖奖励 |倒序浏览 |阅读模式
如题,
在一个窗体中输入记录,然后存在表里,每条记录大部分内容重复时,如何在文本框内默认上一条记录内容.
谢谢!
分享到:  QQ好友和群QQ好友和群 QQ空间QQ空间 腾讯微博腾讯微博 腾讯朋友腾讯朋友
收藏收藏 分享分享 分享淘帖 订阅订阅
2#
发表于 2011-10-14 12:20:15 | 只看该作者
用Dlast函数
3#
发表于 2011-10-14 13:06:58 | 只看该作者
简单操作,可以设置在窗体中 要输入的这栏的属性的默认值填写重复的内容,这样既可
4#
 楼主| 发表于 2011-10-14 14:06:32 | 只看该作者
大侠可以详细说一下吗?

点击这里给我发消息

5#
发表于 2011-10-14 21:37:37 | 只看该作者
本帖最后由 wang1950317 于 2011-10-14 21:37 编辑

也可以用复制记录按钮来完成,复制后不同处稍作改动保存即可。
6#
发表于 2011-10-15 11:53:45 | 只看该作者
  1. Dim rs As Recordset
  2.         If NewRecord Then
  3.             Set rs = Me.RecordsetClone
  4.             rs.MoveLast
  5.             Me.销售明细_品名 = rs.Fields(1)
  6.             Me.产品 = rs.Fields(2)
  7.             Me.规格 = rs.Fields("规格")
  8.             Me.颜色 = rs.Fields("颜色")
  9.             Me.单位 = rs.Fields("单位")
  10.             Me.单价 = rs.Fields("单价")
  11.             Me.缸号 = rs.Fields("缸号")
  12.         End If
  13.     Set rs = Nothing
复制代码
7#
发表于 2011-10-15 11:54:42 | 只看该作者
在当前事件中
您需要登录后才可以回帖 登录 | 注册

本版积分规则

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

GMT+8, 2024-11-19 12:22 , Processed in 0.086227 second(s), 31 queries .

Powered by Discuz! X3.3

© 2001-2017 Comsenz Inc.

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