VB.net 兩個窗體之間傳遞參數(shù)

新窗體中寫構造函數(shù)，然后調(diào)用。

在天橋等地區(qū)，都構建了全面的區(qū)域性戰(zhàn)略布局，加強發(fā)展的系統(tǒng)性、市場前瞻性、產(chǎn)品創(chuàng)新能力，以專注、極致的服務理念，為客戶提供成都網(wǎng)站建設、成都網(wǎng)站制作 網(wǎng)站設計制作專業(yè)公司,公司網(wǎng)站建設,企業(yè)網(wǎng)站建設,成都品牌網(wǎng)站建設,成都營銷網(wǎng)站建設,外貿(mào)網(wǎng)站建設,天橋網(wǎng)站建設費用合理。

比如你要調(diào)用的新窗體是From1.cs這個窗體，

public Form1(要傳入的參數(shù))

{

//把傳入的參數(shù)傳入窗體中

//執(zhí)行窗體標準內(nèi)容

}

然后在需要調(diào)用的地方調(diào)用

Form1 f = new Form1(傳出的參數(shù));

'--------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();

如此就能實現(xiàn)調(diào)用了。

如何在 vb.net 為動態(tài)生成的控件添加事件并傳遞數(shù)據(jù)

'把圖片的聲明放在外面，類里面過程外面，而且要用As，不然等會兒沒法用

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

'動態(tài)生成的控件，加一行

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

如果要改事件的簽名（參數(shù)一類的）的話，得重寫控件。你可以這樣自己弄一個事件。

VB.NET在不同窗體之間傳遞參數(shù)有哪幾種方法

利用全局變量

利用控件屬性

在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