转至繁体中文版     | 网站首页 | 图文教程 | 资源下载 | 站长博客 | 图片素材 | 武汉seo | 武汉网站优化 | 
最新公告:     敏韬网|教学资源学习资料永久免费分享站!  [mintao  2008年9月2日]        
您现在的位置: 学习笔记 >> 图文教程 >> 软件开发 >> VB.NET程序 >> 正文
Visual Basic .NET中多 Windows 窗体的同步         ★★★★

Visual Basic .NET中多 Windows 窗体的同步

作者:闵涛 文章来源:闵涛的学习笔记 点击数:690 更新时间:2009/4/23 15:43:28

原著:Ken Spencer

翻译:小刀人



原文出处:MSDN Magazine April 2004 (Advance Basics)

原代码下载:AdvancedBasics0404.exe(135KB)

我用单个窗体的多实例构建一个 Windows 窗体应用程序。我想把它写成 这样一个程序:对该窗体任何一个实例的操作都会在所有其它实例上反映出来。我该怎么做?

这是一个有趣的问题。我保证某些聪明的编程好手会建议我使用委托。在这种事情发生之前,让我们 先探究一下这个问题的几种解决方案。
  假定我有两个窗体,每个窗体都有两个 textbox 控件:txt1stData 和 txt2ndData。我怎样才能保持这两个窗体中的控件同步呢?对于我们讨论的问题来说,有两个或十个窗体都不重要,问题是相同的。
  第一个办法相对简单。事实上,它甚至比我们直接使用委托更为简单,我想委托有时会给人用牛刀杀鸡的感觉。首先,我建立一个类它包含我希望与应用程序中的所有窗体共享的属性(参见 Figure 1)。例如,MyData 和 MoreData 拥有每个窗体都能显示的数据。我将很快回到这个类来。
  第二,正如我早先提到的我用相同的控件(txt1stData 和 txt2ndData)建立了两个窗体。你可以参考 Figure 2 的布局。两个窗体都有完全相同的数据,并且我将很快解释为什么。


Figure 2 窗体布局

下面,我建立一个名为 modGeneral 的模块并加入下面一行代码:

Friend DataStuff As DataClass 
  这一行代码为我的新类 DataClass 创建了一个友元变量,使你可以完全访问程序集,对这个简单例子来说,也就是指完整的应用程序。然后我添加了下面的代码到 Form1 的 Load 事件:
DataStuff = New DataClass Me.txt1stData.DataBindings.Add("Text", DataStuff, "MyData") Me.txt2ndData.DataBindings.Add("Text", DataStuff, "MoreData") 
  第一行建立一个 DataClass 新实例。下面两行代码将数据绑定到 textbox 控件。对这个窗体而言,就这么些操作!
  现在,你怎样让它们与 Form2 和其它窗体上的数据同步呢?将下面两行加入到 Form 2 的窗体load 事件中去:
Me.txt1stData.DataBindings.Add("Text",DataStuff, "MyData") Me.txt2ndData.DataBindings.Add("Text",DataStuff, "Moredata") 
  这个方法容易确保所有窗体上的几乎任何类型的数据处于同步状态。你可以简单地将控件绑定到某个类的相同实例上,这就行了。
  现在来看另一个方法。我创建了一个名为 frmBase 的新窗体。这时我在上面放一个 textbox (txtNextData)和 label。我想 让应用程序的每个窗体都共享这个 textbox 和 label,并且我希望它们互相之间保持同步,于是我重建这个工程。通过从新的 frmBase 中的继承 ,我创建了 Form1 和Form2,因此它们继承了所有新的控件。但是我怎样能保持这些控件同步呢?这时必须写一点代码去达到此效果,这些代码在单个的类中,通过简单地调用一个函数而被复用。
  Figure 3 中的代码展示了这个称为 modGeneral 模块。它的第一个任务是定义两个变量:MyForms 和 localNextData。MyForms 是一个 集合,它将包含我想要同步的窗体列表。localNextData变量将储存所有我想要在窗体里显示的数据。注意这些变量可以驻留于某个类中而不是某个模块里。
  AddForm 过程来自 modGeneral,带一个窗体实例参数,并将其加入 MyForms 集合中。我将在UpdateControlsNextData 过程中使用这个 集合以决定哪些窗体要更新。AddForm 也调用UpdateControlsNextData 来确保一个新窗体是用正确的数据更新的。
  modGeneral 中的其它代码是 NextData 属性。这些属性的 set 存取器更新 localNextData 并也调用 UpdateControlsNextData 去同步所有窗体。这时所有我需要做的是 在想要改变它时设置 NextData,通过调用 UpdateControlsNextData,所有窗体将被更新。
  第三个方法是定制链接,它是第二个方法的精华版。我创建它以获得多一些窗体控件处理的灵活性。例如,我只想跟踪和处理某些窗体,这些窗体包含必须同步的控件。这个方法 还可以让我自己定义拟同步的控件,并且只处理这些控件的窗体。
  我为这个办法添加了另一个模块 (modGeneralv2),如 Figure 4 所示。该模块包括一个集合(MyFormsToUpdate),其中包含所有我想要同步的窗体。这个模块 还有一个新的数组 (ControlsToUpdate),它提供一个我要同步的控件列表。该数组的定义如下:
Private ControlsToUpdate() As String = _ {"txtCustomer", "txtAddress", "txtName"} 
  这个模块里有一个新的替代 AddForm 的改良版本,叫做 AddFormToUpdate。该方法工作方式与AddForm 类似,但现在它只添加拥有一个或多 个 ControlsToUpdate 数组中控件的窗体,因此只有那些含有特定控件的窗体在更新集合中。它使我可以从每个窗体中调用该函数。如果我决定以后添加某个特定的控件,它将会被自动添加到窗体列表。我只需对窗体代码做细小的改动便可以实现。
  这个模块还包含 UpdateControlsOnAllForms 过程,它执行更新。代替上一个方法中使用的一个应用程序级变量,我现在使用主窗体的概念。因此我可以将那个窗体的值拷贝到集合中的所有其它窗体。UpdateControlsOnAllForms 其实就是一组简单的 For...Nexts 循环遍历某个窗体的所有控件,找到需要更新的控体,并更新它们。
  为了在我的窗体中实现这一功能,我在窗体的 Load 事件中加入了这一行代码:
AddFormToUpdate(Me) 
  另外一种可选的方法,我可以将它添加到构造函数。这一行代码将把当前窗体实例添加到集合进行更新。
  现在让我们考察单个事件过程:
Private Sub txt_Leave(ByVal sender As Object, _ ByVal e As System.EventArgs) Handles txtAddress.Leave, _ txtCustomer.Leave, txtName.Leave UpdateControlsOnAllForms(Me) End Sub 
  这段代码将我想要同步的所有三个控件 (txtAddress、txtCustomer 和 txtName)的 Leave 事件捆绑到一个事件句柄上。这时我可以添加一行代码 来调用 UpdateControlsOnAllForms。Me 被传递到该过程调用,从而导致其它窗体与该窗体同步。
  现在我有三个版本的代码,它们都可以同步窗体中控件,因此我可以进行选择。我可能已经使用了自定义事件,在 DataClass 中定义某个事件并让每个窗体都预订它。 然后当这个事件触发时,这些窗体可以从每个事件句柄中获取新的数据并设置适当的控件。但是这样做所需的代码量一点也不会比第一种方法中将控件绑定到类来得少。我可以构建单个实现更新的过程,并将该过程放到某个模块中。我需要向该过程传递窗体实例来实现更新。我可以用类中的某个事件句柄触发这个过程。此过程看起来就像这样:
Sub UpdateControls(ByVal ThisForm As frmBase) With ThisForm .txtNextData.Text = localNextData End With End Sub 

  ThisForm 参数被定义为 frmBase 类型,以便它可以访问 IntelliSense 并获得窗体的自定义属性。简单地将它写成 Form 将无法显示 frmBase 中的属性及其派生窗体。
  另一选择是使用委托。当然,委托可以让我将委托调用重定向到每个窗体的方法上。如果我使用多播机制,那么我可以让每个窗体都处理该事件并更新相应的控件。用委托建立这样的功能听起来确实简单,但 对我来说它更麻烦且没有实践价值。此外,与第三个方法中的 For...Next 循环嵌套相比,这个代码并不难理解。毕竟,一个应用程序花费最大的部分仍然是它的维护。

将你的问题以及对 Ken 的评论发送到 basics@microsoft.com

作者简介
  Ken Spencer 在 32X Tech 工作,在那里他负责培训,软件开发,和 Microsoft 技术的客户服务。

 



 


[系统软件]windows下Apache+php+mysql的安装与配置图解  [操作系统]在Windows中玩转Linux操作系统
[操作系统]死马还当活马医:6种方法挽救Windows系统  [聊天工具]四大更新 Windows Live Msn 8.1评测
[聊天工具]Windows Live Messenger最新0683版亮相_联络工具_…  [聊天工具]Windows Live Mail招人爱的N个理由_联络工具_Wind…
[聊天工具]Windows Live Mail Desktop多图欣赏_联络工具_Win…  [聊天工具]OE老了 微软开发新邮件客户端取而代之_联络工具
[聊天工具]Windows Live Messenger中文版试用报告(一)__天极…  [聊天工具]Windows Live Messenger 8 Beta1高清图赏__天极Ye…
教程录入:mintao    责任编辑:mintao 
  • 上一篇教程:

  • 下一篇教程:
  • 【字体: 】【发表评论】【加入收藏】【告诉好友】【打印此文】【关闭窗口
      注:本站部分文章源于互联网,版权归原作者所有!如有侵权,请原作者与本站联系,本站将立即删除! 本站文章除特别注明外均可转载,但需注明出处! [MinTao学以致用网]
      网友评论:(只显示最新10条。评论内容只代表网友观点,与本站立场无关!)

    同类栏目
    · C语言系列  · VB.NET程序
    · JAVA开发  · Delphi程序
    · 脚本语言
    更多内容
    热门推荐 更多内容
  • 没有教程
  • 赞助链接
    更多内容
    闵涛博文 更多关于武汉SEO的内容
    500 - 内部服务器错误。

    500 - 内部服务器错误。

    您查找的资源存在问题,因而无法显示。

    | 设为首页 |加入收藏 | 联系站长 | 友情链接 | 版权申明 | 广告服务
    MinTao学以致用网

    Copyright @ 2007-2012 敏韬网(敏而好学,文韬武略--MinTao.Net)(学习笔记) Inc All Rights Reserved.
    闵涛 投放广告、内容合作请Q我! E_mail:admin@mintao.net(欢迎提供学习资源)

    站长:MinTao ICP备案号:鄂ICP备11006601号-18

    闵涛站盟:医药大全-武穴网A打造BCD……
    咸宁网络警察报警平台