时间戳

首页 > 解决方案 > VBA中日期之间的总和

ms-access - VBA中日期之间的总和

问题描述

此处的代码不适用于该过程，totaldate因为我检查它没有减去date1，date2但它们已经得到了它们的值，例如

Text1 = 2/10/2019

Text2 = 2/8/2019

我正在尝试从两个文本框中减去两个日期，Text1并且Text2我已经确保它们的格式是短日期。

我确实做到了，totaldate = Text1 - Text2但也没有用

Sub tgl()
    date1 = Text1
    date2 = Text2
    totaldate = date1 - date2
    fine = totaldate * 50
End Sub

在这个输出中，当总结所有日期时，它会剩下 2 天，因为你减去Text1然后Text2你乘以50所以你会得到变量的值fine = 100

标签： ms-accessvba

解决方案

使用DateDiff功能

DateDiff("d", date1 , date2)

推荐阅读