Office中国论坛/Access中国论坛

标题: 请教各位有关弹出窗口参数传递的问题 [打印本页]

作者: smilingkiss 时间: 2013-11-19 08:54
标题: 请教各位有关弹出窗口参数传递的问题
本帖最后由 smilingkiss 于 2013-11-19 09:11 编辑

如附件，窗体“2”是设计为弹出窗口，窗口“1”中已经成功通过按钮“2”实现弹出窗体的参数传递了，现在我想在vba的某个private函数里面调用弹出窗体，在函数里我设置了一个用来测试的字符串变量“test”，并且希望弹出窗体能够传递“test”到窗体"1"里面的这个private函数里面,请问如何能够实现呢?(按钮"test"就是用来实现这个功能的,请大神们能够帮帮忙完善一下,谢谢!)

作者: 盗梦 时间: 2013-11-19 09:10
窗体1 docmd.openform "窗体2",,,,acDialog,"测试"
窗体2 load_form text1=me.OpenArgs

作者: smilingkiss 时间: 2013-11-19 09:18

盗梦发表于 2013-11-19 09:10
窗体1 docmd.openform "窗体2",,,,acDialog,"测试"
窗体2 load_form text1=me.OpenArgs

盗梦大哥,先谢谢你,但我还是不太明白,能否在附件的示例中帮我点明一下?谢谢!

作者: 盗梦 时间: 2013-11-19 09:25

smilingkiss 发表于 2013-11-19 09:18
盗梦大哥,先谢谢你,但我还是不太明白,能否在附件的示例中帮我点明一下?谢谢!

通过OpenArgs传递参数是一种方法。

还有一种是设置公共变量。这个应该不用说了吧。public str as string '我是一个公共变量

作者: smilingkiss 时间: 2013-11-19 09:30

盗梦发表于 2013-11-19 09:25
通过OpenArgs传递参数是一种方法。

还有一种是设置公共变量。这个应该不用说了吧。public str as stri ...

我拜读过了,谢谢
还有不明白的,就是如何回传呢?通过控件的方法我是做到了,但是通过函数参数的传递,我还是没参透
恳请盗梦大哥帮帮忙修改一下我的附件实例,谢谢!

作者: 盗梦 时间: 2013-11-19 09:32

smilingkiss 发表于 2013-11-19 09:30
我拜读过了,谢谢
还有不明白的,就是如何回传呢?通过控件的方法我是做到了,但是通过函数参数的传递,我还 ...

回传？你用公共变量吧。那个就简单很多

作者: 盗梦 时间: 2013-11-19 09:33

smilingkiss 发表于 2013-11-19 09:30
我拜读过了,谢谢
还有不明白的,就是如何回传呢?通过控件的方法我是做到了,但是通过函数参数的传递,我还 ...

private function getText () as string
'....
getText="返回值"
end function

作者: smilingkiss 时间: 2013-11-19 09:39

盗梦发表于 2013-11-19 09:33
private function getText () as string
'....
getText="返回值"

大哥,我还是有点跟不上你的思路...反而有点乱了思绪(我是菜菜鸟)
如果方便,在我的附件中更改一下给我学习吧,或者等你有空再帮我改一下,谢谢!

作者: 盗梦 时间: 2013-11-19 09:46

smilingkiss 发表于 2013-11-19 09:39
大哥,我还是有点跟不上你的思路...反而有点乱了思绪(我是菜菜鸟)
如果方便,在我的附件中更改一下给我学 ...

加油。其实你想要表达的东西挺乱的。

作者: smilingkiss 时间: 2013-11-19 09:52

盗梦发表于 2013-11-19 09:46
加油。其实你想要表达的东西挺乱的。

是啊,大哥,我是按照附件里面的情况表达出来的,如果大哥你可以看着附件的文件,可能会容易理解我说的情况,无论如何,还是先谢谢你了

作者: smilingkiss 时间: 2013-11-19 10:04

盗梦发表于 2013-11-19 09:46
加油。其实你想要表达的东西挺乱的。

还有啊,大哥,在我的例子中,窗体"1"的按钮"2"功能,如果增加了acDialog参数,会造成错误提示的,不加acDialog参数倒是可以通过,为什么呢?

作者: 盗梦 时间: 2013-11-19 11:17

smilingkiss 发表于 2013-11-19 09:52
是啊,大哥,我是按照附件里面的情况表达出来的,如果大哥你可以看着附件的文件,可能会容易理解我说的情况, ...

你的代码好乱。。。

作者: smilingkiss 时间: 2013-11-19 11:21

盗梦发表于 2013-11-19 11:17
你的代码好乱。。。

啊……不会吧，每个函数才几行哦
嘻嘻，大哥，帮我完善一下！

作者: smilingkiss 时间: 2013-11-19 11:24

盗梦发表于 2013-11-19 11:17
你的代码好乱。。。

大哥，就看看窗体1里面的“test”按钮吧

作者: 盗梦 时间: 2013-11-19 11:47

smilingkiss 发表于 2013-11-19 11:21
啊……不会吧，每个函数才几行哦
嘻嘻，大哥，帮我完善一下！

没注释

作者: smilingkiss 时间: 2013-11-19 11:48

盗梦发表于 2013-11-19 11:47
没注释

大哥，需要我重新注释一下再上传吗？
如果需要，我马上做一下

作者: 盗梦 时间: 2013-11-19 11:58

smilingkiss 发表于 2013-11-19 11:48
大哥，需要我重新注释一下再上传吗？
如果需要，我马上做一下

好的。

作者: smilingkiss 时间: 2013-11-19 12:06

盗梦发表于 2013-11-19 11:58
好的。

大哥，你再看看

作者: 盗梦 时间: 2013-11-19 12:18

smilingkiss 发表于 2013-11-19 12:06
大哥，你再看看

你是主席吗？

作者: smilingkiss 时间: 2013-11-19 12:27

盗梦发表于 2013-11-19 12:18
你是主席吗？

大哥，什么意思？什么主席？

作者: smilingkiss 时间: 2013-11-19 12:29

盗梦发表于 2013-11-19 12:18
你是主席吗？

大哥，这个附件好像不是我那个哦

作者: 盗梦 时间: 2013-11-19 12:30

smilingkiss 发表于 2013-11-19 12:27
大哥，什么意思？什么主席？

问问看你是不是网名【席主习】而已

作者: 盗梦 时间: 2013-11-19 12:41

smilingkiss 发表于 2013-11-19 12:29
大哥，这个附件好像不是我那个哦

原理一样的。

作者: 盗梦 时间: 2013-11-19 12:42

smilingkiss 发表于 2013-11-19 12:29
大哥，这个附件好像不是我那个哦

加多一个公共变量而已

作者: smilingkiss 时间: 2013-11-19 13:00

盗梦发表于 2013-11-19 12:42
加多一个公共变量而已

大哥，好像没有看到有公共变量哦，和你第一次传给我的是一样的哦

作者: smilingkiss 时间: 2013-11-19 13:01
大哥吃过饭没有？要不你先吃饭，有空在帮我捣鼓这个事情，谢谢^_^

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