VB 2010“变量”没有声明。由于其保护级别，它可能无法访问

Question

我对 VB 有点陌生，想知道如何使变量在多个 Sub 中可用。这只是一个熟悉 VB 的测试应用程序。 我的代码：

Public Class Sentences

Private Sub SentenceBox_TextChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles SentenceBox.TextChanged
    If Me.Text = Trim(Sentence) Then
        MsgBox("Good job!")
        Main_Menu.Show()
        Me.Close()
    End If
End Sub

Private Sub ABCs_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
    Dim random As Integer = CInt((Rnd() * 10) + 1)
    Dim Sentence As String


    Select Case random
        Case 1
            Sentence = "The quick brown fox jumped over the lazy dog!"
        Case 2
            Sentence = "Hi there, how are you doing?"
        Case 3
            Sentence = "What is the answer to life?"
        Case 4
            Sentence = "The cat in the hat was fat."
        Case 5
            Sentence = "John and Sam had always been fat."
        Case 6
            Sentence = "The snow is falling hard."
        Case 7
            Sentence = "Here, dinner is always served nightly."
        Case 8
            Sentence = "The dog barks at the passing cars."
        Case 9
            Sentence = "The dust settles on the books."
        Case 10
            Sentence = "Fire burns brightly when you add kerosene."
    End Select
End Sub

Private Sub Button3_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button3.Click
    SentenceBox.Text = Sentence

    End Sub
End Class

我的错误是：

“句子”未声明。由于其保护级别，它可能无法访问。”

Answer 1

VB.NET 中的变量有一个非常特殊的范围，限制了它们的可用性代码的各个部分取决于它们的声明方式和位置。

您的Sentence变量具有过程级作用域，这意味着它仅在声明它的过程中可用。在您的情况下，它是在中声明的ABCs_Load 方法（“Sub”），因此它仅适用于该方法中的代码。

相反，如果您希望能够访问类中任何方法中的Sentence变量（Forms始终是VB中的类） .NET），您可以使用模块级作用域声明变量。为此，您需要将私有字段添加到您的Sentences 类，任何特定方法（Sub 或 Function）的外部。该声明将如下所示：

Private Sentence As String

当然，您也可以将变量声明为 Public 而不是 Private，这将使其可供当前类之外的其他类使用。例如，如果您有一个第二表单，您希望能够访问Sentence变量的内容，则可以将其声明为Public 在第一个表单的类中，然后从第二表单类中的一个方法访问它，如下所示：

MessageBox.Show(myForm1.Sentence)

请注意，因为它确实位于另一个表单中（与正在访问的类不同的类）在）中，您必须完全限定对它的引用。这就像你的家人可能会叫你“迈克”，但其他人必须叫你“迈克·琼斯”才能将你与“迈克·史密斯”区分开来。

如需进一步阅读，另请参阅 MSDN 上的相关文章：

• Visual Basic 中的访问级别
• 如何：控制变量的范围 (Visual Basic)

Answer 2

您应该将：

Private Sentence As String

放在公共类句子下

阅读此内容以了解更多信息：http://msdn.microsoft.com/en-us/library/43s90322%28v=VS.80%29.aspx

Answer 3

将行 Dim Sentence As String 从 ABCs_Load 移至紧接在 Public Class Sentences 之后。

这将使变量 Sentence 可用于 Sentences 类中的所有子函数和函数。

Answer 4

如果页面上的每个 Web 控件都出现此情况，请右键单击出现错误的项目或文件夹，并“转换为 WebApplication” 自动生成其 Designer.vb 文件（其中它们在同名的分部类中声明）。

Answer 5

你应该将其声明为公共变量 public Sentence as string=string.empty
但如果是你我就会在全班宣布
样本

public class NameOfClass
  dim sentence as string=string.empty

  public sub nameOfSub
    --you can use the variable 'sentence' here
  end sub
  public sub nameOfSub2
    --you can use the variable 'sentence' here
  end sub
end class

Answer 6

将 SentenceBox.Text = Sentence 放在 End select 之后，这将解决问题。它不允许您这样做，因为 Button3 中未定义 Sentence :) 希望这会有所帮助。

Answer 7

将其放在“公共类句子”下：

Dim Sentence As String = String.Empty

并从 ABCs_Load 范围中删除该声明。