示例代码(用户表单，模块)

mark · 发表于 2006-10-17 08:47:13

有没有人有一些简单的代码从模块（函数）->用户表单，然后再返回？
谢谢你忍受我的人！
自我注意：
明天记住你的VB书愚蠢！

本帖以下内容被隐藏保护；需要你回复后，才能看到！

游客，如果您要查看本帖隐藏内容请回复

mark · 发表于 2006-10-17 08:48:01

我做，马上回来

mark · 发表于 2006-10-17 08:51:19

函数还是子函数？应该没关系。不管怎样，我找不到我要找的确切函数，但它的jist是
sub无论如何（）
做一些事情
frmFormName.Show
（表单做它的事情，在按钮单击事件中，放me.hide）
焦点返回这里
end sub

mark · 发表于 2006-10-17 09:07:14

题外话，马克，如果你正在寻找一个合理的VB书籍弗朗切斯科巴莱纳的“编程微软Visual BASIC 6.0”
值得。
回到定期安排的节目...

mark · 发表于 2006-10-17 09:29:36

谢谢迈克尔
好，我有这个(见链接)和所有工作，我希望它。
[http://www . the swamp . org/screens/mark/images/VBA _ simple _ test-1 . png]
目前为止还好吗？

mark · 发表于 2006-10-17 09:32:57

议员或基思可能会伸出援手，但我认为你想改变两件事。1是生成一个公共子运行库而不是一个函数（或者我可能完全错了），2是在click事件中终止整个程序还是仅仅终止表单？我以为你会使用一个Me.Hide来摆脱表单，而不退出整个程序
希望能有所帮助

mark · 发表于 2006-10-17 09:45:11

我同意Cmdr，使用End不是一个好主意（尤其是如果代码在一段时间后进入dll-确实非常糟糕）。最好让调用者实例化并终止表单。副标题：[Exit]按钮应该只是隐藏表单。
我会尝试为您编写一个小框架，但这对我来说可能有点难度（我从来没有用ACAD VBA编写过代码，只有VB6）。

mark · 发表于 2006-10-17 09:53:31

像这样的吗

Private Sub CommandExit_Click()
    MyForm.Hide
End Sub

mark · 发表于 2006-10-17 09:54:58

假设你的表单名是MyForm，那么是的，但是我。隐藏应该也可以。Me关键字很好，因为VBA知道什么是焦点，并使用我来代替我的表单。

mark · 发表于 2006-10-17 10:13:57

同意 - 应该尽可能避免硬编码。你知道马克C++吗？VB[A]的
“me”
大致
等同于C++/C#的
“this”
（表单只是一个专门的类）。