Access开发培训
网站公告
·Access专家课堂QQ群号:151711184    ·Access快速开发平台下载地址及教程    ·欢迎加入Access专家课堂微信群!    ·如何快速搜索本站文章|示例|资料    
您的位置: 首页 > 技术文章 > 源码示例

Access追加查询(初学者一看就会),Access对文本型、数值型、日期型追加查询的示例

时 间:2012-06-07 09:11:36
作 者:风行   ID:16058  城市:江阴
摘 要:zhg:老师好!请教我如何把主窗体数据向子窗体填充相同数据,比如向子窗体填充相同编码,填充序号。 
正 文:

回帖问题:

http://www.accessoft.com/bbs/showtopic.asp?id=15551


代   码:

Private Sub 追加_Click()
    Dim strSQL As String
    'E是文本型,F是数值型,G是日期型
    strSQL = "insert into 表1(E,F,G) values('" & Me.E & "'," & Me.F & ",#" & Me.G & "#)"
    DoCmd.SetWarnings False        '关闭系统提示语
    DoCmd.RunSQL strSQL            '执行追加查询
    DoCmd.SetWarnings True
    Me.sfrChild.Requery           '子窗体刷新
    MsgBox "追加成功!"
End Sub


附   件:

点击下载此附件

点击下载此附件(允许日期为空追加成功)

说   明:

第二个附件为2022年7月8日根据学员李锋需求,需要对追加查询允许日期为空的情况也能追加保存到表中,特此更正了一下附件,欢迎大家下载学习。


图   示:



Access软件网官方交流QQ群 (群号:54525238)       Access源码网店

常见问答:

技术分类:

相关资源:

专栏作家

关于我们 | 服务条款 | 在线投稿 | 友情链接 | 网站统计 | 网站帮助