能不能做出象msgbox一样有返回值的窗体。

[大鸟的小天空]

谢了。

[zhsu]

定义全局变量，在窗体操作时改变变量值就可以了。

[load]

把窗体做成类,里面定义属性vReturn
用
dim frm as new form1
frm.show 1 打开

然后用frm.vReturn就能得到返回值啊

[gdyaojie]

可以在窗体(假设对话窗体名称frmMsg.frm)中定义变量:
Option Explicit
Public mReturnValue As String '模块变量
... ...
在frmMsg.frm窗体的过程中处理业务,给mReturnValue赋值

然后在其他窗体中:

frmMsg.Show vbModal
读出 frmMsg.mReturnValue的值.

[冰霜icefrost]

用form 的tag 属性可以吗

[happybeyond]

定义全局变量，窗体关闭的时候给变量赋值就可以了！

[whoke]

1。定义一个类，包含有form的各种内容（lable,buttons,click events and an integer SelectedWhat）
2.在myMSGBox中使用该类，并设置对应属性。
3.执行类中的show方法，要使用vbmodal
4.myMsgBox=该类中的SelectedWhat,返回