怎样显示vb的所有的错误信息？？为什么下面的代码无效？

只看楼主
收藏
回复

385762
函数调用
6

dim i%
on error resume next
for i=1 to 100
err.raise i
debug.print err.description
next

谷歌VIP用户
递归爆栈
7

    Dim i%
    On Error Resume Next
    For i = 1 To 100
      Err.Raise i
      List1.AddItem "Error: " & i & "| Info: " & Err.Description
      Err.Clear
    Next

385762
函数调用
6

恩刚刚我也发现了，要clear的，准备上来说下的，没想到被你抢先了呵呵不过还是谢谢你

扫二维码下载贴吧客户端

下载贴吧APP
看高清直播、视频！

贴吧页面意见反馈
违规贴吧举报反馈通道
贴吧违规信息处理公示

2回复贴，共1页

<<返回vb吧

分享到:

日	一	二	三	四	五	六