磁盘免疫自己写的还不太完美 磁盘免疫 Private Function mkname(id As Long) On Error GoTo a Dir1.Path = Drive1.List(id) MkDir Left(Dir1.List(0), 3) & "Autorun.inf" SetAttr Left(Dir1.Lis