Office中国论坛/Access中国论坛

标题: 问题很菜，如何将查询的内容转换到表中。 [打印本页]

作者: sevencn 时间: 2003-2-28 02:47
标题: 问题很菜，如何将查询的内容转换到表中。
问题也许很菜，但是我想很长时间，不知道如何解决这个问题。我做了一个查询
SumOfPlanDurationTime ContractID
50                            1
47                            11
47                            1111111111
50，47，50 是时间的加总，1，11，111111111是合同号码。我想将一个功能来实现自动改变该合同的时间。

Public Function countTime()
On Error GoTo ERR
Dim StrSQL As String
      StrSQL = "SELECT * FROM qryPlanDurationTimeExtended where qryPlanDurationTimeExtended.contractID=" & "'" & ContractID.Value & "'"
这句是想表达选出相同的合同号码的时间
Debug.Print StrSQL
[Forms]![frmPlanDurationTime].DurationTime = StrSQL
Debug.Print Me.PlanDurationTime
Exit Function
ERR:
MsgBox ERR.Number & ERR.Description
End Function

我是想通过点击子窗体的时间来实现，主窗体里的时间变化的。如何解决这个问题呢。给予帮助。先谢谢了。

欢迎光临 Office中国论坛/Access中国论坛 (http://www.office-cn.net/)