Как удалить скрытые файлы (VB 6.0)?
Формулировка задачи:
Как удалить скрытые файлы с помощю програмы сделаной у VB 6.0
Решение задачи: «Как удалить скрытые файлы (VB 6.0)?»
textual
Листинг программы
Private Sub Main() ' Переменные Dim strFile As String ' имя файла ' Код ' определение имени файла strFile = "c:1.txt" ' снятие аттрибутов "Скрытый", "Системный" и "Только для чтения" VBA.SetAttr strFile, (VBA.GetAttr(strFile) And vbArchive) ' удаление файла Kill strFile End Sub
ИИ поможет Вам:
- решить любую задачу по программированию
- объяснить код
- расставить комментарии в коде
- и т.д