示例代码（用户表单、模块）

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

有没有人有一些来自模块（函数）的简单代码；用户窗体并再次返回
谢谢你们容忍我，伙计们
给自己的提示：记住你的VB书明天愚蠢

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

是的，马上回来

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

函数还是子&nbsp；它应该是&#039；没关系&nbsp；无论如何，我不能#039；我没有找到我想要的确切函数，但它的jist是sub Whatever（）
做一些事情。Show（窗体执行其操作，在按钮单击事件中，put me.hide）
焦点返回此处

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

如果你&#039；重新寻找一本合理的VB书籍Francesco Balena#039；s“；编程Microsoft Visual BASIC 6.0“&书信电报；ISBN 0-7356-0558-0&gt；是值得的
回到定期节目。。。

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

谢谢Michael，好的，我有这个（见链接），一切正常，我希望它能正常工作
[http://www.theswamp.org/screens/mark/images/vba_simple_test-1.png到目前为止还好吗

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

议员或基思可能会在这里伸出援手，但我认为你会想改变两件事&nbsp；1是生成一个公共子RunMe，而不是一个函数（或者我可能完全错了）；2，click事件的结束是终止整个程序还是仅仅终止表单&nbsp；我以为你会用我。隐藏来摆脱表单，而不退出整个程序，希望能有所帮助

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

&书信电报；IMO&gt
我同意Cmdr，使用End并不是一个好主意（尤其是如果代码发现它进入了一个动态链接库——确实很糟糕）。最好让调用者实例化并终止表单。副标题：[Exit]按钮应该只隐藏表单；我会试着在一点时间内为你编写一个小框架，尽管这对我来说可能有点牵强（我从来没有在ACAD VBA中编写过代码，只有VB6）
&lt/IMO&gt；

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

那么是这样吗

copy

Private Sub CommandExit_Click()
    MyForm.Hide
End Sub

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

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

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

同意——应该尽可能避免硬编码。你知道C++对吗？VB[A]&#039；s&039；me#039
大致相当于C++/C#&#039；s&039；本#039
（表单只是一个专门的类）

示例代码（用户表单、模块）

发表回复

精选推荐