[原创]没事闲的....纯后台内部通讯（更新版）[之前的帖子无法编辑，只得重开一贴] - 专家坐堂 - Foxtable(狐表) - 新一代数据库软件，完美融合Access、Foxpro、Excel、vb.net之优势，人人都能掌握的快速软件开发工具!

楼主，能否在消息撰写的地方，加一个快捷键alt+S，这样可以快速的提交消息，有时间的话，请楼主完善，谢谢！

---------------------------------------------------------

自己搞定，在keydown事件中，使用下面的方法就可以了：

PerformClick

模拟单击此按钮。

示例

假定窗口有两个按钮，单击按钮1执行A操作，单击按钮2执行A、B两项操作，我们可以将按钮2的Click事件代码设置为：

Dim btn As WinForm.Button = Forms("窗口1").Controls("Button1")
btn.PerformClick()
'B操作代码

这样就无需重复在两个按钮中编写A操作的代码，只需在按钮1中编写一次即可。

[此贴子已经被作者于2014-3-17 19:29:32编辑过]

主题：[原创]没事闲的....纯后台内部通讯（更新版）[之前的帖子无法编辑，只得重开一贴]