假如是从A窗口点击进入的C窗口，则在C窗口上点击按钮时，在A窗口的textbox里显示按钮的caption
如果是从B窗口进入的C窗口，点击按钮时，是在B窗口的textbox里显示按钮的caption，

请问各位高手如何实现？

[ 本帖最后由 hackcan 于 2015-7-30 15:46 编辑 ]

form3 的代码：

Option Explicit

Public TxtBoxObj As TextBox                '保存着用来显示内容的对象引用

Private Sub Command1_Click()
    On Error Resume Next
    TxtBoxObj.Text = Command1.Caption
End Sub

二个窗体上的按钮代码是一样的，内容是：

Private Sub Command1_Click()
Load Form3                        '加载
Set Form3.TxtBoxObj = Text1        '设置显示对象
Form3.Show                        '显示窗体
End Sub

这貌似很简单的。
在c窗口里写一个public类型的sub用于接收不同窗口里传来的text控件即可，c窗口里的代码如下：
Dim ttt As TextBox
Public Sub abcd(tin As TextBox)
  Set ttt = tin
  Me.Show
End Sub

Private Sub Command1_Click()
  ttt = Command1.Caption  '往不同窗口的text控件里写caption
End Sub


Private Sub Command2_Click()
  ttt = ""   '清空不同窗口里的text控件文本
End Sub


a、b窗口打开c窗口的代码为：Form3.abcd Text1   '假定Form3为c窗口名称




[ 本帖最后由 wmf2014 于 2015-7-30 16:06 编辑 ]