在VB6中是否有类似于对话框中的DialogResult的东西？

Question

我有一个 VB6 表单，其中的按钮带有文本“继续”和“取消”。我想检查一下哪一个被点击了。在 C# 中，每个表单都有一个对话框结果，我可以在退出表单之前设置它，具体取决于单击的按钮。我在 VB6 中没有看到这一点。

有对话结果吗？如果不是，检查对话框结果的最佳实践是什么？

Answer 1

在VB6中，对话框通常返回一个整数值，它可能对应于vbYes、vbNo、vbCancel等。
有关详细信息，请参阅本文：http://www.vb6.us/tutorials /理解-msgbox-命令-视觉-基本

http://www.code-vb.com/fragments/Dialogs.htm #Msgbox OK-Cancel

如果您自己创建了表单，则必须在表单上指定它。

这篇文章中的最后一个答案有一个可能有帮助的提示： http:// www.xtremevbtalk.com/archive/index.php/t-306663.html

Answer 2

要模拟 .net WinForms 行为，您的表单代码中需要一个辅助函数：

Public Function ShowDialog() As VbMsgBoxResult
  Me.Show vbModal
  ShowDialog = Iif(Cancelled, vbCancel, vbOk)
  Unload Me
End Function

在调用 .Hide()Cancelled 变量code> 或 .Close()，或者您可以有一个直接包含结果代码的变量。