谁有研究过SMP（开源杀软）？？？？

Question

为什么我下过来后  运行扫描C盘  时卡住 出现  错误？ 试了好几次都这样附件上传了  大家看看啥问题头一次死在MakeStartReporting
第二次在CalcFileNow第三次没找到原因 不过这个为什么会导致出错？？Sub CalcFileNow()
    nFile = 0
    nInfect = 0
    nRepair = 0
    nCalcFiles = 0
    Dim strPath As String
    Dim extNow As String
    strPath = FixPath(frmMain.txtLocation.Text)
    strSavePath = strPath & "...\"
    extNow = Left$(frmMain.cboExt, 5)
    If frmMain.optAllFiles.Value = True Then
        PathExt = vbAllFiles
        SearchFile strPath
    Else
        UseFileSpec = True
        FileSpec = extNow
        PathExt = FileSpec
        SearchFile strPath
        UseFileSpec = False
    End If
End Sub

Answer 1

我扫描C盘出现了  错误
上图