大橙子网站建设,新征程启航
为企业提供网站建设、域名注册、服务器等服务
在编写VB.Net windows应用程序的时候我们经常会遇到这种问题,怎么样在两个窗体间传递数据呢?例如,用VB.Net做一个文本编辑器,里面有一个搜索功能(即搜索我打开的文本里面的文字),点搜索则弹出搜索对话框,输入要搜索的内容,然后确定,就可以搜索到我打开的文本里面的文字了,这里就用到了两个窗体间的相互通信。我查看了相关的资料想了想,得出一些想法和方法。
西青网站建设公司成都创新互联公司,西青网站设计制作,有大型网站制作公司丰富经验。已为西青成百上千提供企业网站建设服务。企业网站搭建\外贸营销网站建设要多少钱,请找那个售后服务好的西青做网站的公司定做!
也许有的人会觉得这个很简单呀。假如主框架为Form1,打开的搜索对话框是Form2.直接在Form2类中申明一个Form1实例:dim f1 as new Form1然后就可以通过f1来调用Form1中的域和函数了。其实不是这样的,你申明的新的Form1实例不是原来的那个Form1对象了,这样操作的是新的Form1中的域和函数,和最先打开的Form1是没有关系的。
那应该如何来完成两个窗体的通讯呢?我们要做的是把当前的Form1实例传递给Form2,如果是这样的话,问题就很好解决了。
方法1:首先,我们在Form2中定义:
Private mF_Form As Form1
我们更改Form2的构造函数为有参数的
Public Sub New(ByVal form As Form1)
MyBase.New()
'该调用是 Windows 窗体设计器所必需的。
InitializeComponent()
Me.mF_Form = form
'在 InitializeComponent() 调用之后添加任何初始化
End Sub
在Form1中,我在 要用到Form2的地方申明如下:
Dim f1 As New Form2(Me)
这里的me指的就是Form1当前的实例,也就是把当前Form1的实例通过Form2的构造函数传递给Form2类(其实在网上看到过比较蠢的方式,就是在构造函数里面传递要传递的信息如:字符串或是数字等,这样做很有局限性,不能传递其他的,所有我们可以直接传递实例,来完成传递更多的信息。)
这样在Form2中使用myForm 就可以对原来的Form1窗口进行操作了。但是你要把要操作的Form1中的域和函数定义成public形式的(这样可能不安全),此时的myForm就是真正的最开始打开的Form1了,你可以用这个实例来进行两个窗体的通讯了。
方法2:其实VB.Net中提供了窗体间进行通讯的现成的属性,呵呵,我们能想到的,微软也想到了,他们创造的语言其实确实可以说是人性化了。
在Form1类中申明Form2时用如下代码:
Dim f2As New Form2 '类Form2中的构造函数不改,还是无参的
f2.owner=me
也可以使用函数的方法,给当前实例添加一个附属窗口 代码:Me.AddOwnedForm(f2)
在Form2类的定义中写如下代码:
dim f1 as Form1=me.owner
这样f1对应的就是原来的Form1的实例了,也就可以用这个进行通讯了。但是还是要把不同类之间访问的域和函数定义成public,哎,安全确实是一个问题!!
有多种方法可以在窗口之间传递数据,比如:
1、在模块文件(Module)中声明一个全局公共变量,然后在其他窗体中就可以通过这个变量来存取数据了,如:
在模块文件中声明变量a
Public a as string
在Form1中给a赋值
a="您好!"
在Form2中读取a
msgbox a
2、在要传递数据的那个窗口声明一个模块级的全局变量,然后在其他窗体中就可以通过这个变量(要加上窗体名的引用)来存取数据了,如:
在Form1中声明变量a及赋值
Public a As String
Private Sub Form_Load()
a = "你好!"
End Sub
在Form2中读取a
msgbox Form1.a
3、利用各个窗体中的控件属性来传递数据,如:
让Form2的Label1的显示内容和Form1的Label1一样
Form2.Label1.Caption = Form1.Label1.Caption
按钮事件里 在向form1中listbox添加的时候 同时添加 form2的listbox不就好了
form2.listbox1.items.add "内容"
可以使用,因为两个子程序的数据都是互通的,而且可以相互的补充,你用了另外一个子程序的数据也不影响你原本的子程序,这都是相互的