Loading...
  所在位置:论坛首页 -> ┈┋电脑网络技术区┋┈ -> Asp/Asp.Net技术 -> 关于如何操作其他窗体的控件或变量的方法
标题:关于如何操作其他窗体的控件或变量的方法收藏 编辑 删除 楼主 | 上一篇 下一篇
兜迷儿
等级:大侠
权限:普通用户
积分:81
金钱:5071
声望:115
经验:115
发帖数:1309
注册:2006年8月20日
资料 短消息2008-5-18 10:22:44
关于如何操作其他窗体的控件或变量的方法!

其实解决的方法有很多,在这里只做简单的总结。

1.  定义全局变量

其实这个方法比较简单也很好理解,我们只要在一个module里面定义了两个全局变量就可以了。

例如:public frm1 as new form1()

      Public frm2 as new form2()

这样,我们无论在哪里想访问就很容易了。但是,这样做会耗费比较多的系统资源。一般来说不要使用全局变量。

2.  使用shared 前缀

使用了shared定义的字段(变量)或者属性可以被其他窗体调用。

例如:(假设有窗体form1 和 form2 )

在form1中写入:

Public Shared m_add As String ‘这样我们在form1的任何地方都可以更改m_add的值

Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load

        m_add = "111"

End Sub

在form2中写入:

Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click

        MessageBox.Show(Form1.m_add) ‘显然我们可以得到form1的这个变量了

End Sub

 

注意:使用shared时,不用定义实例,被定义成shared的变量或属性在所有的实例中都是一个值。就象上面的例子中使用Form1.m_add一样。所以如果是打开很多的同一个窗体的实例时,该值不变化,可以用来记录打开的实例数量。

3.这种方法传递一个窗体实例过去,这样就可以获得该实例的变量与属性了。当然也可以对他们进行操作。

例如:在form1中

       Dim frm As New Form2(me)

        frm.Show()

       在form2中:

       Dim m_parent as form1

        Public Sub New(ByVal sender As Object)

        MyBase.New()

 

        '该调用是 Windows 窗体设计器所必需的。

        InitializeComponent()

        '在 InitializeComponent() 调用之后添加任何初始化

M_parent=ctype(sender,form1) ‘或者m_parent=directcast(sender,form1)

       

    End Sub

Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click

        m_parent.textbox1.text = "1111"

End Sub

4.设置一个属性来控制访问

     这种方式在new 一个窗体后,show他出来前设置它的一个公共属性,这个属性就是本窗体的实例。当然也可以不是一个属性而是一个公共的字段。

如:在form1中:

Dim newform as new form2()

Newform.setparentform = me

Newform.show()

在form2中:

Dim m_parentform as form1

Public property setparentform as form1

Get

    Return m_parentform

End get

Set (byval value as form1)

    m_parentform = value

End set

我从来不看电视,我只不过是经常核对一下报纸上的电视节目有没有印错。

2008-5-18 10:22:44 顶部
第1页 共页 共0个回复     <<    >>    
 快速回复
  • 支持UBB,HTML标签

  • 高级回复

  • 操作选项:评分 加精 解精 奖惩 设专题 设公告 解公告 固顶 总固顶 解固顶 结帖 解结帖 锁帖 解锁 移帖 删帖
      首页 | 购买指南 | 商业版本 | 虚拟主机 | 特色介绍 | 下载中心 | 支付方式
    Copyright 2004-2008 BBSGood.com Powered By: BBSGood.Speed Version 5.0
      咨询电话:0575-85513832、0575-85513825(传真)、7*24小时咨询服务:13606552007 不良信息举报中心 浙ICP备05029817号
      业务QQ:38958768、客服QQ1:415896239、客服QQ2:343896043、MSN:jccsxx@hotmail.com