能不能这样做

不务实　发表于：2009-11-07 09:06:51 　

主窗体中:

Dim str1 As String
Dim str2 As String

子窗体中:
Dim strz As String

Function 复杂条件()
strz=me.aa '这里只是简化的比如,

End Function

主窗体中能不能调用子窗体中的 strz ?

Private Sub 确定_Click()
Me.子窗体.SetFocus
Me.子窗体.Form.复杂条件
str2=str1 & strz 能不能这样做?
End Sub

我也想过把strz设为Public公用的,但设为公有的,窗体退出后strz的值还在

竹笛发表于：2009-11-07 10:21:21

Dim str1 As String
Dim str2 As String

上面的两行删除,在模块中声明:

Public str1 As String
Public str2 As String

不务实发表于：2009-11-07 10:29:32

楼上可能没看明白我的意思,就是不Public 的情况下,能不能调用?

还有你可能看错了str2与strz ,

竹笛发表于：2009-11-07 10:41:54

你可以在窗体的卸载事件中让 strz=""

andymark 发表于：2009-11-07 12:20:04

在主窗体调用子窗体的FUNCTION 或过程是可以的

子窗体的FUNCTION

Function Test() As String
Test = Me.A
End Function

在主窗体中调用子窗体的FUNCTION

Dim Frm As Form
Set Frm = Me.子窗体.Form
MsgBox Frm.Test

楼主子窗体这样声明,是不可能被主窗体正常调用的

不务实发表于：2009-11-07 15:31:13

谢谢你,就是我要的结果

不务实发表于：2009-11-12 09:13:01

结

总记录：6篇页次：1/1 9 1 :

Access交流中心