16,554
社区成员
发帖
与我相关
我的任务
分享form在load的时候如果出现错误怎么不显示窗体？
比如说：
在form_load代码中：
try
do something
catch
end try
怎么控制do something出错时,窗体不加载，以前vb好像有个unload，现在没有了，该怎么实现呢？
在form_load代码中：
try
do something
catch
end try
怎么控制do something出错时,窗体不加载，以前vb好像有个unload，现在没有了，该怎么实现呢？
...全文
请发表友善的回复…
发表回复
yuhang001 2005-03-31
- 打赏
- 举报
Application.exit
zzzjaychung 2005-03-31
- 打赏
- 举报
用EXIT呢。
兔子-顾问 2005-03-31
- 打赏
- 举报
好像有的代码不可以写在load里，写到active里试试
weiljj 2005-03-31
- 打赏
- 举报
Load中不能關閉自已的窗體,只能在外面關閉.
AntingZ 2005-03-31
- 打赏
- 举报
1)如果不是MDI子窗体,可以用me.Close()关闭
2)如果是MDI子窗体,你可以把try内的do something 的这些代码写再一个函数里面,再MDI主窗体显示它之前先判断是否抛出异常,比如
Public Function myfunc() As Boolean
Try
'do something
Catch ex As Exception
Return False
End Try
Return True
End Function
然后你这样调用:
Dim frm As New FormChild1
If frm.myfunc() = True Then
frm.MdiParent = Me
frm.Show()
Else
frm.Dispose()
frm = Nothing
End If
2)如果是MDI子窗体,你可以把try内的do something 的这些代码写再一个函数里面,再MDI主窗体显示它之前先判断是否抛出异常,比如
Public Function myfunc() As Boolean
Try
'do something
Catch ex As Exception
Return False
End Try
Return True
End Function
然后你这样调用:
Dim frm As New FormChild1
If frm.myfunc() = True Then
frm.MdiParent = Me
frm.Show()
Else
frm.Dispose()
frm = Nothing
End If
jsfeiyu 2005-03-30
- 打赏
- 举报
如果是子窗体就用me.close,如果是主窗体就用application.exit
tttt0945 2005-03-30
- 打赏
- 举报
me.close不行啊
因为当时form还没打开，如果用close就会说addhandle错误什么的，以前我也一直写me.close，记过老报错
因为当时form还没打开，如果用close就会说addhandle错误什么的，以前我也一直写me.close，记过老报错
hamadou 2005-03-30
- 打赏
- 举报
可以使用closing和closed
抬头望天边一只雁 2005-03-29
- 打赏
- 举报
close()
