vb.net写的代码运行大约10个小时后出现报错代码 0XC0000005，代码截图如下，该怎么调试

[soberjim]

Public Sub DelayTime(ByVal T As Integer) '延时毫秒数 用定时器2
Form1.Timer2.Interval = T
Form1.Timer2.Enabled = True
If T <= 0 Then
T = 1
End If

Do While Form1.Timer2.Enabled = True
Windows.Forms.Application.DoEvents()
Loop
End Sub

[soberjim]

自己结贴吧 是由于数据库断开了