更新:如何在主窗体中文体显示子窗体的数据((图)重传例子)

luhao

提取子窗体当前记录分别到主窗体的TXT中显示。已上传不正确例子
请给予修正
请各位指教

koutx

在相应子窗体的成为当前事件中
Private Sub 相应子窗体名_Current()
me.parent.form.文本框名.value=me.产品名称
End Sub

紫风

在子窗体的"成为当前"事件写下:
Private Sub Form_Current()
    Me.子窗体名.Form.A1 = Me.TEXT_A1
    Me.子窗体名.Form.A2 = Me.TEXT_A2
End Sub

luhao

在子窗体的"成为当前"事件写下:
Private Sub Form_Current()
    Me.子窗体名.Form.A1 = Me.TEXT_A1
    Me.子窗体名.Form.A2 = Me.TEXT_A2
End Sub
紫风 发表于 2009-2-22 09:34

你的效果，与我的要求相反了。
我要子窗体的每列的数据显示在主窗体的文本框中

luhao

2# koutx
你的效果与我第一个的效果一样
我想要子窗体每列的数据在主窗体中反应出来。可有其它办法吗，我朋友说在DEPHL中可做到。用盾环可以做到。但在ACCESS不知怎做。。。

koutx

噢!楼主的主贴又重新编辑了，但我实在不明白你最终要达到什么结果？
如按你的图示效果，可于主窗体建一文本框，比如名字为xianshi
而后：
在相应子窗体的成为当前事件中
Private Sub 相应子窗体名_Current()
dim ming as string
ming=""
if InStr(ming,me.产品名称)<=0 then
ming=ming & ";  " & me.产品名称
end if
me.parent.form.xianshi.value=ming
End Sub

luhao

噢!楼主的主贴又重新编辑了，但我实在不明白你最终要达到什么结果？
如按你的图示效果，可于主窗体建一文本框，比如名字为xianshi
而后：
在相应子窗体的成为当前事件中
Private Sub 相应子窗体名_Current()
di ...
koutx 发表于 2009-2-22 13:02

行不通喔，老大

Henry D. Sy

传例子

ly

1# luhao

由于没有看到你的数据，只能假设销售明细表中含有“流水单号”和“行号”这二个字段且为键值，可尝试用DLookup这个函数。

koutx

这就对了:
Private ming As String

Private Sub 相应子窗体名_Current()
On Error Resume Next
If InStr(ming, me.产品名称) > 0 Then
Else
ming = ming & "  " & me.产品名称
End If
Forms("主窗体名").xianshi.value = ming
End Sub