网站 › 『编程语言讨论求助区』 › 如何实现CAD内用lsp或vb点击弹出窗口中的按钮

ma344578245 发表于 2024-9-23 16:12

如何实现CAD内用lsp或vb点击弹出窗口中的按钮

如何实现CAD内用lsp或vb点击弹出窗口中的按钮，现在是弹窗窗口后代码就暂停不执行了，手动关闭窗口才往后继续执行代码，求教

lxb187 发表于 2024-9-23 16:32

点个赞先。

submariner 发表于 2024-9-23 17:43

可以试试:1、采用按键精灵之类的软件关闭，2、或者用findwindows等api函数捕捉窗口句柄，然后发送关闭消息

二零一八小王子 发表于 2024-9-23 20:23

ahk也可以～～～

lxb187 发表于 2024-9-26 14:03

点个赞先。

yueguangxiaxian 发表于 2024-10-1 18:01

点赞不错想法

woflant 发表于 2024-10-4 17:05

vb自带的提示msgbox没有这个功能，要使用自定义窗口

'在窗口激活事件中添加如下代码
Private Sub UserForm_Activate()
   
    Dim t As Double
    Dim t2 As Double
    t = Timer
    Do
   
      t2 = Timer
      If ((t2 - t) > 1) Then
            Exit Do
      End If
      
      DoEvents
   
    Loop
    Me.Hide

End Sub

代码示例工程文件及演示图：https://wwyp.lanzoul.com/ii1nG2blkrjg

查看完整版本: 如何实现CAD内用lsp或vb点击弹出窗口中的按钮