vb.net控件传递,vbnet控件大全

VB.net 两个窗体之间传递参数

新窗体中写构造函数，然后调用。

在天桥等地区，都构建了全面的区域性战略布局，加强发展的系统性、市场前瞻性、产品创新能力，以专注、极致的服务理念，为客户提供成都网站建设、成都网站制作 网站设计制作专业公司,公司网站建设,企业网站建设,成都品牌网站建设,成都营销网站建设,外贸网站建设,天桥网站建设费用合理。

比如你要调用的新窗体是From1.cs这个窗体，

public Form1(要传入的参数)

{

//把传入的参数传入窗体中

//执行窗体标准内容

}

然后在需要调用的地方调用

Form1 f = new Form1(传出的参数);

'--------Form1--------

Dim f2 As Form2

Private Sub Command1_Click()

Set f2 = New Form2

f2.Show vbModal

End Sub

'--------Form1 End--------

'--------Form2--------

Dim WithEvents f3 As Form3

Private Sub Command1_Click()

Set f3 = New Form3

f3.Show

End Sub

Public Sub f3_f2W()

Me.Command1.Caption = "f2W"

End Sub

'--------Form2 End--------

'--------Form3--------

Public Event f2W()

Private Sub Command1_Click()

RaiseEvent f2W

End Sub

'--------Form3 End--------

f.Show();

如此就能实现调用了。

如何在 vb.net 为动态生成的控件添加事件并传递数据

'把图片的声明放在外面，类里面过程外面，而且要用As，不然等会儿没法用

Dim myPicture As New System.Windows.Forms.PictureBox()

'动态生成的控件，加一行

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

Me.Panel3.Controls.Add(myPicture)

myPicture.Size =New System.Drawing.Size(115, 160)

myPicture.TabStop =False

myPicture.Name ="p"

myPicture.Cursor = Cursors.Hand

AddHandler myPicture.Click, AddressOf mypic_Click '添加事件

AddHandler returnid, AddressOf idReturned '绑定事件和过程

End Sub

'再来个事件，放在声明的地方，就是类里面、过程外面

Private Event returnid(ByVal id As String) '这个事件可以传递值哦~

'普通的单击事件

Private Sub mypic_Click()

RaiseEvent returnid(myPicture.Name)

End Sub

'会传值的事件过程

Private Sub idReturned(ByVal id As String)

Dim bookInfo As New BookInfo

bookInfo.Show()

Me.Parent.Enabled = False

'用id变量做点什么吧

End Sub

如果要改事件的签名（参数一类的）的话，得重写控件。你可以这样自己弄一个事件。

VB.NET在不同窗体之间传递参数有哪几种方法

利用全局变量

利用控件属性

在vb.net中两个窗体间的变量可以相互引用了

例如：可以这样用

Public Class Form1

Public asd As Integer

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

  asd = 123

End Sub

End Class

Public Class Form2

Private Sub Form2_Click(sender As Object, e As System.EventArgs) Handles Me.Click

  TextBox1.Text = Form1.asd

End Sub

End Class