.NET中窗体间相互访问的几种方式
在我们的程序中，窗体之间经常要相互访问彼此的成员，调用彼此的方法，或者激发彼此的事件。下面就我的经验，简单谈谈在.NET中窗体间相互访问的几种方式。
以下给出了C#.NET和VB.NET的示例代码。用Form1、Form2类分别表示主、从窗体。
1、内部成员访问法，适合于主窗体访问它所创建的从窗体对象中的成员。只需将从窗体允许主窗体访问的那些成员加上internal或Friend限定符。例如：
C#主
private void ShowForm2Info() {
Form2 f2 = new Form2();
f2.Show();
MessageBox.Show(f2.MyName);
}
C#从
internal string MyName = "A Form2 Object";
VB主
Private Sub ShowForm2Info()
Dim f2 As New Form2
f2.Show()
MsgBox(f2.MyName)
End Sub
VB从
Friend MyName As String = "A Form2 Object"
2、将以上方法反过来用，让从窗体访问创建它的主窗体中的成员，需要增加一个步骤：在从窗体的构造函数中传入一个主窗体的引用，以便找到创建它的主窗体（新建的构造函数中不要忘了调用InitializeComponent()函数）。主窗体创建从窗体对象时传入自身的引用。例如：
C#主
private void ShowForm2() {
Form2 f2 = new Form2(this);
f2.Show();
}
internal string MyName = "A Form1 Object";
C#从
private Form1 f1;
public Form2(Form1 _f1) {
InitializeComponent();
f1 = _f1;
}
private void ShowForm1Info() {
MessageBox.Show(f1.MyName);
}
VB主
Private Sub ShowForm2()
Dim f2 As New Form2(Me)
f2.Show()
End Sub
Friend MyName As String = "A Form1 Object"
VB从
Private f1 As Form1
Public Sub New(ByVal _f1 As Form1)
MyBase.New()
InitializeComponent()
f1 = _f1
End Sub
Private Sub ShowForm1Info()
MsgBox(f1.MyName)
End Sub
3、从窗体访问主窗体中的成员，如果主窗体只有一个实例，或者被访问对象是全局性的，可以将主窗体中要求访问的成员设置为静态的，加上static或Shared限定符即可：
C#主
private void ShowForm2() {
Form2 f2 = new Form2();
f2.Show();
}
internal static string MyName = "A Form1 Object";
C#从
private void ShowForm1Info() {
MessageBox.Show(Form1.MyName);
}
VB主
Private Sub ShowForm2()
Dim f2 As New Form2()
f2.Show()
End Sub
Friend Shared MyName As String = "A Form1 Object"
VB从
Private Sub ShowForm1Info()
MsgBox(Form1.MyName)
End Sub
4、还可以运用.NET的事件委托机制，实现更加灵活的相互调用。下例是从窗体激发主窗体的事件。事件委托机制的功能事实上远比此例强大，大家可以找书看看它的详细用法。
C#主
private void ShowForm2() {
Form2 f2 = new Form2();
f2.Show();
f2.SendMessage += new Form2.DelegateOfSendMessage(ShowMessage);
}
private void ShowMessage(string str) {
MessageBox.Show(str);
}
C#从
public delegate void DelegateOfSendMessage(string str);
public event DelegateOfSendMessage SendMessage;
private void Send() {
SendMessage("A Message From Form2");
}
VB主
Private Sub ShowForm2()
Dim f2 As New Form2
f2.Show()
AddHandler f2.SendMessage, AddressOf ShowMessage
End Sub
Private Sub ShowMessage(ByVal str As String)
MsgBox(str)
End Sub
VB从
Public Delegate Sub DelegateOfSendMessage(ByVal str As String)
Public Event SendMessage As DelegateOfSendMessage
Private Sub Send()
RaiseEvent SendMessage("A Message From Form2")
End Sub
5、同样的道理，结合方法2和方法4可以实现主窗体激发从窗体的事件，这个请读者自己实验。当然这样一来代码会显得比较乱。一个较好的解决方法是将事件封装入一个接口，同时在事件的发布方和订阅方实现。这种技术在.NET Remoting远程对象操作技术中尤为重要，有一篇不错的文章给大家参考：《Remoting事件处理全接触》（http://www.cnblogs.com/wayfarer/articles/75213.html）
6、习惯了VB6中全局变量的朋友可能觉得.NET中不支持全局变量对于窗体间的交互很不方便，那么再请大家参考这篇文章：《.NET窗体之间的交互》（http://blog.csdn.net/warsgrobe/archive/2005/07/29/438013.aspx），里面叙述了用VB.NET模拟全局变量的方法。
OK，就说到这里。.NET是一个强大而灵活的体系，只要肯动脑筋，一定能发现不少这样的技巧。
