添加自动填充字段VBA MSAccess的时间

Question

我正在使用VBA在MSAccess上预订系统。在我的表单上，我有用于创建新预订的字段，然后将其添加到SQL Server上的数据库中。我有一个组合框设置允许用户选择和活动，然后填写活动的ID和活动的持续时间。这个持续时间是1或2或3等等，活动需要多少小时。

然而，我的问题涉及计算用户的完成时间。当用户从时间列表中选择开始时间时，我希望自动填写结束时间文本框，例如，9：00：00（以匹配时间存储在sql server上的格式）并选择了一个活动通过将这些加在一起。到目前为止，我尝试过这样的事情。

    Me.txtFinishTime.Text = Me.cmbStartTime.Value + Me.txtDuration.Value       

Answer 1

可能是：

Me!txtFinishTime.Value = DateAdd("h", Me!txtDuration.Value, CDate(Me!cmbStartTime.Value))