急急急！窗体已经显示，不能显示为有模式的；

Question

本人窗体的功能是当单击datalist后弹出一个新窗体（模式）进行选择操作，选择后释放窗体返回主窗体。出现在新窗体中进行选择操作后，再单击datalist就会出现“窗体已经显示，不能显示为有模式的；”（不进行选择操作也就是不改变dadalist.boundtext的值就不会出现这种情况），可问题是新窗体已经unload了啊！请高手拘赐教！急!!!!部分代码如下：
主窗口FrmAppend
Private Sub DataLstFrom_Click()
Frmcho_jg.Show vbModal
End Sub选择窗口Frmcho_jg
Private Sub CmdCancel_Click()'退出
Unload Me
End Sub
Private Sub CmdSelect_Click()'选择
frmAppend.DataLstFrom.BoundText = DataList3.BoundText
Unload Me
End Sub

Answer 1

主窗口FrmAppend
Private Sub DataLstFrom_Click()
on error resume next
Frmcho_jg.Show vbModal
End Sub这样就可以了

Answer 2

Private Sub CmdCancel_Click()'退出
me.hide
End Sub主窗口FrmAppend
Frmcho_jg.Show vbModal
If Module1.loginsucceeded Then
  Frmmain.Show
  Unload Frmlogin
ElseIf Module1.loginsucceeded = False Then
  End
End If

Answer 3

Private Sub CmdCancel_Click()'退出
me.hide
loginsucceeded=true
End Sub