对话框实现,该怎么处理

对话框实现
想弹出一个用msgbox函数时一样的对话框，在对话框里面可以自己放一些文本框以输入数据，然后再返回文本框的内容。我用窗体把界面弄好后，没法子像弹出的对话框一样使用户不点确定之前不能对主窗体进行操作.

------解决方案--------------------

VB code

Private Sub Form_Load()
    Form2.Show 1
End Sub

Private Sub Form_QueryUnload(Cancel As Integer, UnloadMode As Integer)
    Cancel = -1
End Sub

------解决方案--------------------

form1.show vbmodal
以模式方式显示就能实现

相关推荐