vb.net - 变量 'fs' 在封闭 block 中隐藏变量

Question

我目前正在使用以下代码:

    Public Sub CreateScore()
    ' open isolated storage, and write the savefile.
    Dim fs As IsolatedStorageFileStream = Nothing
    Using fs = savegameStorage.CreateFile("Score")
    If fs IsNot Nothing Then

        ' just overwrite the existing info for this example.
        Dim bytes As Byte() = System.BitConverter.GetBytes(Scorecount)
        fs.Write(bytes, 0, bytes.Length)
    End If

    End Using

End Sub

然而，使用后的 fs 以蓝色下划线并给出错误变量“fs”隐藏在封闭块中的变量。

有谁知道我该如何解决这个问题？

Answer 1

您正在声明变量，然后在 Using 中使用相同的变量名块(它试图再次声明它)。

改成这样:

Public Sub CreateScore()
    ' open isolated storage, and write the savefile.
    Using fs As IsolateStorageFileStream = savegameStorage.CreateFile("Score")
    If fs IsNot Nothing Then

        ' just overwrite the existing info for this example.
        Dim bytes As Byte() = System.BitConverter.GetBytes(Scorecount)
        fs.Write(bytes, 0, bytes.Length)
    End If

    End Using

 End Sub