代码之家 › 专栏 › 技术社区 › Dabblernl

当通过Tabstrip单击事件启动新表单时,首先单击在父表单上注册的

vb6

1

Dabblernl · 技术社区 · 15 年前

Private Sub Tabstrip1_Click()
   Form2.Show vbModal, Me
end sub

窗体2只有一个关闭按钮。第一次在窗体2上单击鼠标没有可见的效果,除非窗体2位于调用窗体上,然后会出现一个错误,即不能显示两次模态窗体!因此,发生的情况是第一个mouseclick在父窗体上注册。我尝试了各种各样的解决方法(主要是通过Tabstrip1_gotfource),但如果不做一些非常复杂的事情,我就无法让它工作。

有简单的解决办法吗?

2 回复 | 直到 15 年前

1

4

wqw 15 年前

使用此代码修复特定情况下的鼠标捕获问题TabStrip控件显示

Private Declare Function ReleaseCapture Lib "user32" () As Long

Private Sub TabStrip1_Click()
    Call ReleaseCapture
    Form2.Show vbModal, Me
End Sub

2

0

gbr 10 年前

问题描述如下: https://support.microsoft.com/en-us/kb/262441 .

ReleaseCapture 在显示模态形式之前。

旁白:

“引入外部依赖项” ??? 根据我的经验,权威性的推荐并不是坏事,我认为这个链接对某些人是有用的。

推荐文章

StayOnTarget Charlie Flowers · “完全编译开始”和“生成Exe”之间的区别?

8 年前

Mathieu Guindon · DefVar是否有一个单一的合法用例?

8 年前

Joaquim Ribeiro · 确定是否在ListView中单击了项目或未单击任何内容

8 年前

Stefan van de Laarschot · VB6代码到VB。净额

8 年前

jac · VB6能否调用C#COM对象重载方法

8 年前

Gabriel Intriago · 包含来自的WebServices的Dll。Net到vb6-如何设置应用程序。配置

8 年前

Shadow Moon · 如何在VB 6.0中读写逗号分隔的文本值

8 年前

Davide Redaelli · vb6:如何检测字符串是否为unicode

9 年前

Balagurunathan Marimuthu Mandeep Singh · 如何在VB6中基于匹配值合并两个CSV文件

9 年前

Karlos Garcia · 使用VB6的WebBrowser从URL保存文件

9 年前

关于移动版

代码之家 - 一站式码农服务社区

沪ICP备11025650号