如何自动在VB中单击Msgbox ok按钮

Question

我的Vb程序中有这样的msg框

MsgBox（“记录插入成功”）

如何从代码中自动单击ok按钮有没有办法在Visual Basic中执行此操作... 我是Visual Basic的新手，请帮帮我

Answer 1

您可以通过获取MessageBox的hWnd然后向其发送消息来模拟Ok click来完成此操作。然而，相对于期望的结果，这是非常复杂的，如果它甚至可能那样。

我建议您创建自己的模板，模仿消息框并公开一个允许您控制它的公共方法。

Answer 2

这有很长的路要走。您必须调用许多API等...我建议您创建一个对话框表单，其中包含带有“Record inserted successfully”文本的标签和一个带有文本“OK”的按钮。通过这样做，您可以更轻松地控制它。

您可以显示如下对话框：

    Dim newdialog As New Dialog1
    Me.ShowDialog(newdialog)

模拟按下按钮，这意味着关闭对话框：

    newdialog.Close()