共享或类成员

共享变量

我们还可以创建另外一种共享成员。有时候类的所有实例需要共享一个数值，有时候每个特定类型的对象要共享相同的变量，这些时候都可以通过使用共享变量来实现目的。

一个共享变量可以使用Shared关键字来声明，这一点很象共享方法的声明：

Public Class MyCounter

  Private Shared mintCount As Integer

End Class

跟共享方法一样，我们也可以根据需要来设置共享变量的作用域。在缺省状态下两者就不一样了，共享方法是Public,而共享变量是Private。

总而言之，我们要养成一个好的习惯：定义方法和变量的作用域而不使用缺省值，以避免混乱。

关于共享变量的一件重要的事情是它们在所有类的实例中都是公用。我们可以键入如下的代码来加强我们的类：

Public Class MyCounter

  Private Shared mintCount As Integer

  Public Sub New()

mintCount += 1

  End Sub

  Public ReadOnly Property Count() As Integer

Get

Return mintCount

End Get

  End Property

End Class

仔细看看上面的代码：当我们为类创建了实例时，计数器就增一。+=操作符是一个在VB.NET新有的。

在任何时候我们可以通过Count属性来取出count数值。这样，如果我们运行下面的客户代码，我们可以得到结果为3。

Protected Sub Button4_Click(ByVal sender As Object, _

ByVal e As System.EventArgs)

  Dim obj As MyCounter

  obj = New MyCounter()

  obj = New MyCounter()

  obj = New MyCounter()

  MsgBox(obj.Count, MsgBoxStyle.Information,counter)

End Sub

如果我们再次运行这段程序，将可以得到6、9等等。只要我们的应用程序继续运行计数器就保持有效，也就是说一旦我们结束应用程序计数器就不再起作用。

这项计数对于服务器的处理过程是十分有用的，因为它可以轻松地不停地进行计数。这个数值只有在处理过程重新开始地时候才被复位。

全局变量

对于共享变量另外一个通常的应用是提供了全局变量的类型。给定一个Public作用域的共享变量：

Public Class TheClass

  Public Shared MyGlobal As Integer

End Class

我们可以在客户代码中使用这个变量。

TheClass.MyGlobal += 5

这个变量将在我们应用程序的任何地方都是有效的，它提供了一个很好的机理来在组件、类、模块等等之间来共享数值。