> For Each IEApp In CreateObject("Shell.Application").Windows()
>             If InStr(1, IEApp.FullName, "iexplore.exe", vbTextCompare) > 0 Then
>                 IEApp.Quit()
>             End If
> Next
> ピーピーピー！あなたのPCはウィルスに感染しています(;´Д`)

こう書くとﾙｰﾌﾟのたびにCreateObjectするの？(;´Д`)それとも初回だけ生成しておしまい？

参考：2017/11/22(水)00時47分28秒