主题：共享成员(Shared Member)


??????  内容  ??????
v 1. 共享资料成员
v 2. 共享程序成员
 
 您已经习惯像 New Employee("Tom", 25)这样的指令了，看到这个指令可以想向它是：Employee.New("Tom", 25)，于是不难想象到，原来类别也是对象！这个类别对象(Class Object)接到New()讯息时，就去诞生一个对象，原来类别对象就是妈妈对象(Meta Object)！妈妈是小孩共有的，妈妈的资料值是小孩共享的，妈妈的程序是小孩共享的。本文就介绍这种共享的资料成员和程序成员。



1. 共享资料成员
 对象拥有自己的空间﹐也拥有自己的资料﹔对象之间的沟通（交换资料）方法是个重要问题。如果只想传递某项资料时﹐该如何呢﹖

 
 图1、 对象间之沟通

 有数种可行方法﹐请看个例子﹕

'ex01.bas
Imports System.ComponentModel
Imports System.Drawing
Imports System.WinForms
'----------------------------------------------------
Class Employee
 Private emp_name As String
 Public salary As Double
 Public Overloads Sub New(ByVal na As String)
 emp_name = na
 End Sub
 Public Overloads Sub New(ByVal na As String, ByVal s As Double)
 emp_name = na
 salary = s
 End Sub
 Public Sub Display()
 MessageBox.Show("Name: " + emp_name + "  Salary: " + str(salary))
 End Sub
End Class
'-----------------------------------------------------
Public Class Form1
 Inherits System.WinForms.Form
 Public Sub New()
 MyBase.New()
 Form1 = Me
 'This call is required by the Win Form Designer.
 InitializeComponent()
 'TODO: Add any initialization after the InitializeComponent() call
 End Sub