読み取り専用のファイルを削除しようとすると、アクセス拒否のエラーが出てしまうので、
読み取り専用を外してから削除します。
Imports System.IO
Public Class FileSystemForm
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
'読み取り専用のファイルを削除する
Dim fl As New FileInfo("c:\test\test.txt")
If (fl.Attributes And FileAttributes.ReadOnly) = FileAttributes.ReadOnly Then
'読取専用を外す
fl.Attributes = FileAttributes.Normal
End If
'ファイルを削除する
fl.Delete()
End Sub
End Class