主题：[求助] 窗体加载的网页，如何屏蔽脚本运行错误？

以下内容为程序代码:

1 Dim web As New System.Windows.Forms.WebBrowser()
2 web.Navigate("https://kodakalaris.my.salesforce.com/00O16000007eXrD")
3 Do Until web.ReadyState = 4
4 Application.DoEvents
5 Loop
6
7 '取数据
8 Dim Cols() As String = { "第一列","第二列","第三列","第四列","第五列","第六列","第七列","第八列","第九列","第十列","第十一列","第十二列","第十三列","第十四列"}
9 Dim elems As object = web.Document.GetElementsByTagName("table")(5).GetElementsByTagName("tr")
10 Dim m As Integer = 0
11 For Each elem As object In elems
12 Dim i As Integer = -1
13
14 m = m + 1
15 If m ＞ 1 Then
16 Tables("临时表").AddNew
17 End If
18
19 Dim tdelems As object = elem.GetElementsByTagName("td")
20 For Each tdelem As object In tdelems
21 i = i + 1
22 Tables("临时表").Current(Cols(i)) = tdelem.Innertext
23 Next
24 Next
25 Tables("临时表").save