| 以文本方式查看主题 - Foxtable(狐表) (http://www.foxtable.com/bbs/index.asp) -- 专家坐堂 (http://www.foxtable.com/bbs/list.asp?boardid=2) ---- 菜单保存按钮请教 (http://www.foxtable.com/bbs/dispbbs.asp?boardid=2&id=56783) |
| -- 作者：hbhb -- 发布时间：2014/9/12 11:20:00 -- 菜单保存按钮请教 大师：好！请教 菜单中设置一保存按钮，在不同的窗口中也有单个的保存按钮，而这些保存按钮的单击事件中有保存及其他代码，为了便于习惯操作，可否将单个按钮的代码全部再放到菜单按钮中，如果可以，是用模拟单击事件？，那如何判断判断哪个按钮？
|
| -- 作者：有点甜 -- 发布时间：2014/9/12 11:22:00 -- 菜单按钮不能模拟单击。
你把代码拷贝到自定义函数里面，然后调用函数吧。 |
| -- 作者：hbhb -- 发布时间：2014/9/12 13:01:00 -- 谢谢！函数中可否先判断控件的类型，再判断控件的名字，然后再用模拟单击事件？ |
| -- 作者：有点甜 -- 发布时间：2014/9/12 14:06:00 -- 呃，你写一个函数，把之前的代码拷贝进去，报错的地方，你改成参数传递进去。 |
| -- 作者：hbhb -- 发布时间：2014/9/12 14:10:00 -- 菜单里这样写是否正确？ For Each c As WinForm.Control In Forms("main").Controls If Typeof c Is WinForm.button Then \'判断控件是否是文本框 Dim t As WinForm.button = c \'使用特定类型的变量引用控件 Select Case t.text Case "保存1" t.PerformClick Case "保存2" t.PerformClick Case "保存3" t.PerformClick End Select End If Next |
| -- 作者：有点甜 -- 发布时间：2014/9/12 14:13:00 -- 你想做什么？按下同一个按钮，执行不同的代码？怎么可能知道你按下哪个按钮？ |
| -- 作者：hbhb -- 发布时间：2014/9/12 14:20:00 -- 自定义函数里写以上代码？然后菜单的按钮调用此函数，通过窗口中按钮的标题进行判断是哪个按钮，再模拟单击此按钮！ Select Case t.text Case "保存1" t.PerformClick 以上代码错在哪里？
|
| -- 作者：有点甜 -- 发布时间：2014/9/12 14:22:00 -- 回复7楼。你想实现什么？点击菜单的按钮，执行窗口按钮的代码？
点击菜单按钮后，你要执行哪一个按钮的代码？ |
| -- 作者：hbhb -- 发布时间：2014/9/12 14:47:00 -- 1、一种情况以上三个按钮都执行，有无问题? 2、如果要执行某一按钮的，如何设置传递参数？，用全局变量直接控制，还是什么？
|
| -- 作者：Bin -- 发布时间：2014/9/12 14:53:00 -- 把菜单里的CLick代码,写到自定义函数里去.然后调用. |