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

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

如何实现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没有这个功能，要使用自定义窗口

[Visual Basic] 纯文本查看 复制代码

'在窗口激活事件中添加如下代码
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

帐号		自动登录	找回密码
密码			注册[Register]

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