vb点虐 在自制的窗体控件中弹出一个窗口再返回一个值

先设计好Form1和Form2。在

创新互联建站一直通过网站建设和网站营销帮助企业获得更多客户资源。 以"深度挖掘，量身打造，注重实效"的一站式服务，以成都网站设计、网站建设、移动互联产品、成都全网营销服务为核心业务。10余年网站制作的经验，使用新网站建设技术，全新开发出的标准网站，不但价格便宜而且实用、灵活，特别适合中小公司网站制作。网站管理系统简单易用，维护方便，您可以完全操作网站资料，是中小公司快速网站建设的选择。

Private Class Form2中输入

Public Event ChangeValue(ByVal value As String) '是string还是其它的看你需要了

在Form2的Closed事件：

Private Sub Form2_Closed() Handles Me.Closed

RaiseEvent ChangeValue(TextBox1.Text)'如果是数值类型的话用下面这个渣圆：

'RaiseEvent ChangeValue(Val(TextBox1.Text))

End Sub

在Form中定义x：

Dim x As String '是String还是数值类型看你需要了，要和上如消塌桥烂面的统一

在Form1中写一个处理值的函数。值哪来？别管它

Private Sub ProcessValue(ByVal value As String) '记得统一

x = value

End Sub

在Form1中Button1的Click事件中：

Private Sub Button1_Click() Handles Button1.Click

Dim f2 As New Form2

AddHandler f2.ChangeValue,AddressOf ProcessValue

f2.Show()

End Sub

楼下的更简单啦

vb点虐 怎么控制字窗体控件属性：如Timer1.Enabled = true

把Form2中Timer1的Modifiers设为腔告蠢Public

然友大后在点伍陪击事件里面写：

Dim

f2

As

New

Form2

f2.Show()

f2.Timer1.Enabled

=

True

再看看别人怎么说的。

VB点虐 ，在模块中怎样引用到窗体中的控件

在模块中引用到窗体中的控件，必须在该控件名之前由相应的窗体名作为前导，例如判竖：

1，要明罩引用窗体Form1中的控件TextBox1

MsgBox(Form1.TextBox1.Text)

2，要引用窗体掘槐大Form2中的控件TextBox1

MsgBox(Form2.TextBox1.Text)

VB点虐 如何获取其他窗体控件的值

给Form2增加一个自颂侍败定义属性试一下

在这个属性记录值

然野颤后在FORM1中给FORM2的这个属谈滚性写值不就行了

分享文章：vb点虐 反射窗体控件 net 反射
标题来源：http://scyanting.com/article/ddpdseh.html