vb异常处理
vb中怎样实现像vb.net异常处理(try....Catch ex As Exception...end try)功能？
友情帮顶
无非是On error Goto 和Err.Number判断吧?
想用vb6.0实现以下vb.net的功能：
dim str as string '这个一个应用程序或者是一个网址
Try
System.Diagnostics.Process.Start(str)
Catch ex As Exception
MsgBox("路径不正确！")
End Try
请各位看看！
看你准备捕捉的错误的等级了.
普通等级的错误就如上面所说即可以.
如果是内存错误之类VB保姆也没办法的错误,需要使用SEH来捕捉.
是普通等级的错误！能不能写出代码？
aaa:
On Error Resume Next
'这里写容易出错的代码
bbb=MsgBox("出现错误,想再来一次么?",VbExclamation + VbRetryCancel,"错误")
if bbb=VbRetry Then Goto aaa:
on error goto errH
'中间代码块
exit sub '或function
errH:
select case err.number
case 11
msgbox "除数为零."
case xxxxx '其它类型的错误
'相应处理代码
case else '所有未处理的错误
'相应处理代码
end select
.net的异常处理机�
相关问答：
Printer.ScaleMode = 6
6表示毫米
Printer.PaperSize = vbPRPSA4
'初始坐标
x = 1
y = 4
'最大的线筐
Printer.DrawStyle = 0
Printer.Line (x, y)-(x + 132.5, y) ......
用什么？
VB自己好像有画图函数吧,另外VB也是可以用API的,而且很方便
引用
VB自己好像有画图函数吧,另外VB也是可以用API的,而且很方便
为什么vc没有自己的画图函数？
引用
引用 1 楼 wltg2001 � ......
从网页通过inet控件的Inet1.GetChunk读取其代码，然后想转换为汉字，转换代码如下
Private Sub Inet1_StateChanged(ByVal State As Integer)
Dim strRecText As String
Dim st ......
这段程序中
Begin VB.Forms_frmmain BorderStyle = 1 'fixed single
Caption = "速算24"
clientHeight = 6375
clientLeft = 154 ......
