ConnectToConnectionPoint Windows function not return Token for dynamic Textbox to catch Enter or Exit event(ConnectToConnectionPoint Windows函数未为捕获Enter或Exit事件的动态文本框返回Token)

转载 作者：bug小助手 更新时间：2023-10-22 13:51:03 33 4

Private Declare Function ConnectToConnectionPoint Lib "shlwapi.dll" (ByVal punk As stdole.IUnknown, ByRef riidEvent As eventguide, ByVal fConnect As Long, ByVal punkTarget As stdole.IUnknown, ByVal pdwCookie As Long, Optional ByVal ppcpOut As Long) As Long
Private oTextBox As MSForms.TextBox
Private Type eventguide
data1 As Long
data2 As Integer
data3 As Integer
data4(7) As Byte
End Type

Public Property Let SetControlEvents(ByVal TextBox As Control)
Dim conIID As eventguide
With conIID
   .data1 = &H20400
   .data4(0) = &HC0
   .data4(7) = &H46
End With
       Set oTextBox = TextBox
       Dim RetVal As Long
         a = StrPtr("{00020400-0000-0000-C000-000000000046}")
         Debug.Print a
         RetVal = IIDFromString(a, testvalue)
        If RetVal = 0 Then
            Debug.Print "Connection ID:   ", testvalue
        Else
            Debug.Print "Error:   ", RetVal, Hex(RetVal)
        End If
        
    conreturn = ConnectToConnectionPoint(Me, conIID, True, TextBox, cookie)
    Debug.Print conreturn, Hex(conreturn), cookie
    
End Property

Dim firs As TextBoxCreator
Private Sub UserForm_Activate()
Set newtextbox = UserForm1.Controls.Add("forms.textbox.1", , True)
Set demobox = UserForm1.Controls.Add("forms.textbox.1", , True)
demobox.Top = 30
End Sub

Private Sub UserForm_AddControl(ByVal Control As MSForms.Control)
Set firs = New TextBoxCreator
firs.SetControlEvents() = Control

End Sub

 29616520 
Connection ID:               132096 
 0            0             
 29616520 
Connection ID:               132096 
 0            0             

33 4 0

• .net - catch(Exception)、catch() 和 just catch 之间的区别

  我想知道是否可以安全地编写 catch() 来捕获所有 System.Exception 类型。或者我是否必须坚持使用 catch(Exception) 来完成此任务。我知道对于其他异常类型(例如 I

• c# - C# 中的 3 个 catch block 变体( 'Catch' 、 'Catch (Exception)' 和 'Catch(Exception e)' )有什么区别？

  在 C# 中，'Catch'、'Catch (Exception)' 和 'Catch(Exception e)' 之间有什么区别？ MSDN article on try-catch在其示例中使用了

• javascript - 如何修复在前一个 promise 的 .then block 中处理的 .catch 中返回的停止 promise 。即 .catch 应该保留在 .catch 中

  然后一个 Promise 调用另一个 Promise，并且内部 Promise 从 catch .then block 中的外部 Promise 返回 我一般都在这里和谷歌上搜索过。尝试使用简单的 t

• try-catch - 为什么要使用多个 catch block ？

  我们可以在 Try-Catch 中使用多个 catch 块。 但我的问题是:为什么可以使用单个 catch 块完成时使用多个 catch 块？ 假设我想要我的问题的确切原因，我可以通过 Ex.mess

• javascript - 尝试...catch 与 .catch

  所以我在 service.ts 中有这个用户服务功能其中包括数据库的东西。 export const service = { async getAll(): Promise { try {

• c++ - 为什么 `catch` 在这里 catch ？

  我不确定这里发生了什么。很明显为什么内扣会捕获throw 2 ，但为什么外面catch(int x)捕获 throw ?我以为catch(int x)应该只捕获整数值。第二个throw有可能吗？抛出什

• c# - 在 catch 子句中尝试 catch

  我目前正在以不同的方式加载图像，如下所示: try { // way 1 } catch { // way 1 didn't work try { // way 2 }

• javascript - then catch 和 then catch 之间的区别

  这两者有什么区别？一个比另一个快吗？两者似乎都有效。有人请解释 没有 promise 的人: client.query(query1) .then(data => { callback(null

• try-catch - try ... catch ... [finally] 是如何工作的？

  它几乎可以在所有语言中找到，而且我大部分时间都在使用它。 我不知道它是内部的，不知道它是如何真正起作用的。 它如何在任何语言的运行时在 native 级别工作？ 例如:如果在 try 内部发生 sta

• c# - 用单个全局try catch block 替换多个try catch

  Closed. This question is opinion-based。它当前不接受答案。 想改善这个问题吗？更新问题，以便editing this post用事实和引用来回答。 1年前关闭。

• java - Try-Catch 的 Catch 部分未执行

  我正在编写一个用于学习目的的短代码，要求用户输入密码才能登录 Facebook。我正在测试异常处理，由于某种原因，当密码错误时，Catch 部分没有执行。代码是: import java.util.S

• try-catch - try catch finally 执行流程

  如果try-catch的catch block 中抛出异常，那么finally block 会被调用吗？ try { //some thing which throws error } cat

• java - Try-Catch While 循环，Catch 不允许新输入？

  try { while ((inputLine = bufferedReader.readLine()) != null) { String[] words = inputLine.s

• c# - Try-Catch 中的 "catch"是什么类型的数据结构或构造

  在 C# 上下文中，可以使用如下代码: try { ... } catch { ... } 在其他情况下，代码可以是: try { ... } catch (Exc

• c# - catch block 中try-catch-rethrow没有额外处理的原因是什么？

  有时我在探索 ServiceStack 的代码库时遇到以下构造: try { ... } catch (Exception) { throw; } 在我看来，这种结构没有任何作用。这样做的

• Javascript Try Catch 与 Catch 链

  我最近遇到了一个 Javascript 问题，捕获错误，因此在抛出异常时崩溃。 funcReturnPromise().then().catch() 我必须将其更改为: try { funcRet

• c++ - Catch 测试框架问题:无法使用 Catch::Session()

  我在编写一些测试的 C++ 文件中遇到此错误: error: no member named 'Session' in namespace 'Catch' testResult = C

• c++ - catch(...) 与 catch(CException *) 之间有什么区别？

  CException 是VC++抛出的所有异常的基类型，所以它应该捕获所有的异常吧？ 最佳答案 CException 不是所有扩展的基类型(它可能是 MFC 代码使用的所有异常的基类型，但仅此而已)。

• c++ - 是否存在使用 catch all 子句 : catch (. ..) 的情况？

  每次我看到 catch all 语句时: try { // some code } catch (...) { } 它一直是一种滥用。 反对使用 cache all 子句的论点是显而易见的。它会捕

• c# - 为什么这个 catch all block 实际上并没有 catch all

  代码相当简单——问题是 groupPath 字符串中有一个无效字符(准确地说是“/”)。 我正在尝试做的(至少作为权宜之计)是跳过我无法获得 cn 的 DirectoryEntries --- 不管为