我的问题是, 当 没有打开成功的时候, 返回上一个
Case ,不行么? 自己测试 不行.. 没反应..无法 循环 打开-判断-没打开- 打开 这种循环
Public lb As String
Select Case lb '分别根据LB标志的值来执行不同的操作
Case "打开"
Sendkeys.Send("%(o)") '发送打开信息
Case "程序"
If FileIsOpened(file.FullName)= True Then '判断文件是否已经打开
ShowAppWindow("yahoo_quantity[1].csv",5) '关闭文件
Else
lb="打开"
End If
End If
End Select