IBM Rational 系统开发最佳实践工具包	WebSphere MQ 最佳实践 TOP 15

多窗体之间的调用

楼主hwmweimin（）2005-07-22 15:55:24 在 VB / 非技术类提问

请问一下各位高手，我真的是百思不得其解啊
我在Form1 里写了这样的代码
Private Sub Form_Click()
Form1.Hide
Form2.Show
End Sub

Private Sub Form_DblClick()
End
End Sub

在Form2 里写了这亲的代码
Private Sub Form_Click()
Form2.Hide
Form1.Show
End Sub

Private Sub Form_DblClick()
End
End Sub

我怎样也无法双击窗体来结束程序问题点数：10、回复次数：11Top

1 楼GrassDragon（被蚊子咬了一下，就失眠了！）回复于 2005-07-22 18:02:56 得分 5

道理很简单,你这样运行一下就知道为什么了.
Private Sub Form_Click()
Form1.Hide
Form2.Show
Debug.Print "Click"
End Sub

Private Sub Form_DblClick()
End
Debug.Print "DblClick"
End Sub
Top

2 楼900126（息夫人）回复于 2005-07-23 01:45:04 得分 0

click事件中已经隐藏了窗口，执行不到dblclick啊。Top

3 楼lc_mtt（柠檬把大飞猪裤子一脱...被大飞猪投诉了）回复于 2005-07-23 14:17:39 得分 0

楼上正解Top

4 楼WallesCai（女人之美,在于蠢得无怨无悔,男人之美,在于撒谎撒得白日见鬼）回复于 2005-07-24 22:58:45 得分 0

第一次单击已经把窗体隐藏了，又哪里来的双击事件呢
Top

5 楼haen_zhou（Haen）回复于 2005-07-25 21:25:33 得分 0

先:弄清click 和 dblclick 的发生条件...Top

6 楼zjlang（阿亮）回复于 2005-07-25 22:36:43 得分 0

双击鼠标时,首先驱动的时单击事件.......Top

7 楼xiaoyuepk（月亮弯弯）回复于 2005-07-25 22:59:10 得分 0

要知道事件的驱动顺序,你单击的时候,窗体已经隐藏了
永远也不可能触发双击时间
你写的代码有严重的逻辑错误Top

8 楼hwmweimin（）回复于 2005-08-01 10:04:39 得分 0

其实我想程序的功能是要单击隐藏窗体,而双击即结束程序啊

但我不知怎样解决啊Top

9 楼xiaoMONKEY（小猴）回复于 2005-08-01 10:41:39 得分 0

Private Sub Form_Click()
unload form2
Form1.Show
End Sub

Private Sub Form_DblClick()
End
End Sub
Top

10 楼hwmweimin（）回复于 2005-08-02 11:33:30 得分 0

我的程序是想在 Form1和Form2 之间用单击事件来进行切换

而双击任何一个窗体就结束程序啊Top

11 楼tb01412（tb）回复于 2005-08-03 14:38:41 得分 5

可以采用折衷的方案，就是加入定时器的方式，用一个变量来标识你是双击或是单击，然后启用定时器，当定时器到时间时，就去判断变量的值，而采取相应的操作

注意：无论是单击或是双击的事件中第一条语句就是要中止定时器，然后修改变量，然后再开启定时器
而当定时器超时后，处理完所需的事情后，同样要关闭定时器，且两个Form都要用定时器Top