接到昨天的来。。。。？

hjy611

把昨天的哪个以数据表的形式显出来只有放在另一个窗体里。但这样后代码不知道怎么写了。望高手帮改改。

hjy611

这是没有子窗体的代码：Private Sub 组合12_AfterUpdate()

Dim strsql As String

   

     strsql = "SELECT * FROM [业务查询] WHERE [客户编号] =" & "'" & [组合12].Value & "'"

     Me.RecordSource = strsql

     [txt主叫号码] = [主叫号码]

     [txt被叫号码] = [被叫号码]

     [txt摘机时间] = [摘机时间]

     [txt挂机时间] = [挂机时间]

     [txt时长(秒)] = [时长(秒)]

     [txt话费(元)] = [话费(元)]

     Me.Refresh

End Sub

把“主叫号码”这行放在一个窗体里后载入原来窗体后上面代码改怎么改才可以显示出来。