zyjq52uys的博客一、暴露问题——窗体假死 新建一个Windown窗体应用程序,在窗体代码里写入如下代码: Public Class MainForm Dim intTime As Integer = 0 Private Sub Button1_Click(sender As Object, e As EventArgs) ...
weixin_44679146的博客 FilePath End If Next File Set GetAllExcelPaths = FilePathDict End Function 特殊处理 Do While True DoEvents ' 执行循环时容易出现假死状态,此方法可防止假死出现 Loop 如存在不正确的地方,请指正。