vb.net 更正错误工具 System.IDisposable

Question

我只是迷失了尝试更正这个错误
错误 BC36010 'Using' 类型 'Boolean' 的操作数必须实现 'System.IDisposable'

仅当我从下面的代码中删除 If End If 设计并实施 Using
时才会出现错误使用 Using End Using 的原因是垃圾清理
所以问题是如何实现 System.IDisposable ?

Public Sub haveFILE()
    'Dim path As String = "C:\Users\Me\source\repos\TestForms\TestForms\Resource\"
    Using Not My.Computer.FileSystem.FileExists(path & "Check.txt") Then
        tbHaveDB.Text = "File NOT Found"
        ' Create or overwrite the file.
        Dim fs As FileStream = File.Create(path & "Check.txt")
        fs.Close()
    End Using
End Sub

Answer 1

错误大约是using

Using Not My.Computer.FileSystem.FileExists(path & "Check.txt") Then
End Using

My.Computer.FileSystem.FileExists(path & "Check.txt") returns 布尔值。只是不要使用 using。在这种情况下使用 if then。 Using 是当你创建 IDisposable 对象时

您的代码在不同的块之间似乎很混乱。您有一半 if 一半在使用。我想，应该是这样

if Not My.Computer.FileSystem.FileExists(path & "Check.txt") Then
    tbHaveDB.Text = "File NOT Found"
    ' Create or overwrite the file.
else
     using fs As FileStream = File.Create(path & "Check.txt")
         ' write to stream here
         fs.Close()
     End Using
End If

vb.net 更正错误工具 System.IDisposable

vb.net correct error implement System.IDisposable

vb.net

idisposable

try-catch