Dim d As Date

d=d.Today

3.3.4.5 共享成员

例如我们定义了一个日期变量d，那么通过该变量的Month属性可得到其月份值：

Dim d As Date = #12/31/2008# Dim i As integer = d.Month

上面的代码通过Month属性获得日期型变量d的月份值，并保存在整数型变量i中。 Month属性和具体的日期变量相关，不同的日期变量，Month属性返回不同的值；事实上，绝大多数属性，都和Month属性一样，是和具体变量相关的。

但是有一些属性是不同的，它不是通过变量，而是通过类型名称访问，例如要得到今天的日期值：

Dim d As Date d = Date.Today

上面的代码将今天的日期值保存在变量d中。 请注意用于返回当天日期值的Today属性，它不属于任何一个日期型变量，而是属于日期类型Date，我们直接通过Date类型来访问这个属性。 这很好理解，Today这个属性返回的是今天的日期值，和具体的日期变量无任何关系。

我们将这种直接通过类型名称访问的属性，称为共享属性。 同样直接通过类型名称执行的方法，称为共享方法。

在这里，共享的意思就是：大家共用的，不属于某个具体变量的。