java 两个窗口 贴_粘贴子窗体中的多个记录时的子窗体校准错误
我对子窗体上的所有三个事件进行计算以更新主窗体:
Private Sub Form_AfterDelConfirm(Status As Integer)
Me.Parent.UpdateStunden
End Sub
Private Sub Form_AfterInsert()
Me.Parent.UpdateStunden
End Sub
Private Sub Form_AfterUpdate()
Me.Parent.UpdateStunden
End Sub
Public Sub UpdateStunden(Optional BeforeUpdateEvent As Boolean = False)
On Error GoTo ErrorHandler
Dim rst As Recordset
Dim sql As String
Dim NewStunden As Variant
If Me.NewRecord Then Exit Sub
sql = _
"SELECT Sum(Stunden) AS SumStunden " & _
"FROM Tätigkeiten " & _
"WHERE Tätigkeitsdatum = #" & Format(Me!Tätigkeitsdatum, "yyyy-mm-dd") & "#;"
Set rst = CurrentDb().OpenRecordset(sql, dbOpenSnapshot)
If Not rst.EOF Or Not rst.BOF Then
NewStunden = rst!SumStunden
If Nz(NewStunden) <> Nz(Me.Stunden) Or IsNull(Me.Stunden) Then
Me.Stunden = NewStunden
End If
End If
ExitPoint:
On Error Resume Next
If Me.Dirty And Not BeforeUpdateEvent Then Me.Dirty = False
rst.Close
Set rst = Nothing
Exit Sub
ErrorHandler:
Select Case Err
Case Else: LogNTEvent Now & "Error: " & Err & ": " & Err.Description & ": UpdateStunden", EVENTLOG_ERROR_TYPE, 1000, "Error: " & Err.Number
End Select
Resume ExitPoint
End Sub
这通常很好 .
但是如果我将多个记录复制并粘贴到子表单中,则会出现错误 . 当我将多个记录从一个子表单复制并粘贴到同一个子表单但在另一个主表单记录上时,计算错误 .
这应该作为标准,因为我到处使用它 .
我们需要一个After Paste事件!
有谁知道如何做到这一点?
关心理查德
java 两个窗口 贴_粘贴子窗体中的多个记录时的子窗体校准错误相关推荐
- java 两个url对比_一个URL模式中的两个slu ..
如何将两个slu in放在一个url模式中?我有一个与模型类别有多对一关系的模型链接 . url( regex=r'^(?P[\w-]+)/(?P\d+)(?:/(?P[\w\d-]+))?/$', ...
- java 两个窗口 贴_求助Java窗口菜单如何实现复制粘贴剪切等功能(内附源代码)...
该楼层疑似违规已被系统折叠 隐藏此楼查看此楼 if(e.getActionCommand()=="进入注册") {new CommFrame(); }}class Handle ...
- JAVA两个表相关联_关于Java:如何将多对多关联映射到映射到两个不同表的类?...
我有一个凭证-POJO映射到两个表. 第一个映射分配一个实体名称" voucherA",并将POJO映射到TableA. 第二个映射使用" voucherB"作 ...
- java低层源码_如何查看javaJDK中底层源码
展开全部 在初次使用java时,往往我32313133353236313431303231363533e4b893e5b19e31333363393735们对最基本的java类会忽略对其内部基本的实现 ...
- appium java 点击事件_“按钮点击”在Appium Android测试中给出“处理命令时出现未知的服务器端错误 . ”...
info:[debug]将命令推送到appium工作队列:["element:getSize",{"elementId":"2"}] inf ...
- npm中node更新_如何在Node中管理NPM和功能时保持理智
npm中node更新 by Ted Gross 泰德·格罗斯(Ted Gross) 如何在Node中管理NPM和功能时保持理智 (How to keep your sanity while manag ...
- java两个对象赋值_一起学Java(二十六)----- 对象之间赋值
不积跬步,无以至千里:不积小流,无以成江海. Java语言基础 Java对象之间赋值 赋值是用等号运算符" = "进行的,在对对象进行"赋值"时,实际就是将句柄 ...
- java两种不同单例模式_关于Java里的两种单例模式
没有系统学习过设计模式,只是项目中遇到一些常用的.单例模式就是最常用的之一了,还以为无非就那样的,原来单例模式的种类也有很多,不过现在我经常用到的就这两种.还有别的比如登记式单例是通过工厂方法来获得单 ...
- java 两个字段排序_如何在Java中按两个字段排序?
使用Java 8流方法..//Creates and sorts a stream (does not sort the original list) persons.stream().sorted( ...
最新文章
- Model层的两种写法
- bzoj1202[HNOI2005]狡猾的商人
- spring boot + vue + element-ui全栈开发入门——项目部署
- codeblock socket 编译错误_从Linux源码看Socket(TCP)Client端的Connect
- xshell vim 不能粘贴_编辑器之神——vim的入门指南
- INF DestinationDirs Section
- 初中变成了菜园子了!
- tomcat 在WIN10 上运行出现500错误的解决方法
- (204)浮点数的表示
- 你有进一步深入理解二分查找吗?
- 太火!这本 AI 图书微软强推,程序员靠它拿下 50K!
- Android usb audio录音(四)
- idata 单片机 新唐_半导体新唐单片机怎么样_新唐单片机是台湾的吗
- sql 获取日期时分秒_SQL获取系统年月日时分秒 | 学步园
- 51单片机培训计划(新订)
- Mplayer SMplayer 软件配置
- V6H--升级3种方式和修改版本号
- Ubuntu-18.04.5-desktop安装教程
- 致我们渐行渐远的青春——给曾经的你
- vue中如何引入jquery详解