新窗體中寫
我們提供的服務(wù)有：網(wǎng)站制作、成都做網(wǎng)站、微信公眾號開發(fā)、網(wǎng)站優(yōu)化、網(wǎng)站認(rèn)證、文安ssl等。為1000多家企事業(yè)單位解決了網(wǎng)站和推廣的問題。提供周到的售前咨詢和貼心的售后服務(wù)，是有科學(xué)管理、有技術(shù)的文安網(wǎng)站制作公司
構(gòu)造函數(shù)
，然后調(diào)用。
比如你要調(diào)用的新窗體是From1.cs這個窗體，
public
Form1(要傳入的參數(shù))
{
//把傳入的參數(shù)傳入窗體中
//執(zhí)行窗體標(biāo)準(zhǔn)內(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 windows應(yīng)用程序的時候我們經(jīng)常會遇到這種問題，怎么樣在兩個窗體間傳遞數(shù)據(jù)呢？例如，用VB.Net做一個文本編輯器，里面有一個搜索功能（即搜索我打開的文本里面的文字），點(diǎn)搜索則彈出搜索對話框，輸入要搜索的內(nèi)容，然后確定，就可以搜索到我打開的文本里面的文字了，這里就用到了兩個窗體間的相互通信。我查看了相關(guān)的資料想了想，得出一些想法和方法。
也許有的人會覺得這個很簡單呀。假如主框架為Form1，打開的搜索對話框是Form2.直接在Form2類中申明一個Form1實例：dim f1 as new Form1然后就可以通過f1來調(diào)用Form1中的域和函數(shù)了。其實不是這樣的，你申明的新的Form1實例不是原來的那個Form1對象了，這樣操作的是新的Form1中的域和函數(shù)，和最先打開的Form1是沒有關(guān)系的。
那應(yīng)該如何來完成兩個窗體的通訊呢？我們要做的是把當(dāng)前的Form1實例傳遞給Form2，如果是這樣的話，問題就很好解決了。
方法1：首先，我們在Form2中定義：
Private mF_Form As Form1
我們更改Form2的構(gòu)造函數(shù)為有參數(shù)的
Public Sub New(ByVal form As Form1)
MyBase.New()
'該調(diào)用是 Windows 窗體設(shè)計器所必需的。
InitializeComponent()
Me.mF_Form = form
'在 InitializeComponent() 調(diào)用之后添加任何初始化
End Sub
在Form1中，我在 要用到Form2的地方申明如下：
Dim f1 As New Form2(Me)
這里的me指的就是Form1當(dāng)前的實例,也就是把當(dāng)前Form1的實例通過Form2的構(gòu)造函數(shù)傳遞給Form2類（其實在網(wǎng)上看到過比較蠢的方式，就是在構(gòu)造函數(shù)里面?zhèn)鬟f要傳遞的信息如：字符串或是數(shù)字等，這樣做很有局限性，不能傳遞其他的，所有我們可以直接傳遞實例,來完成傳遞更多的信息。）
這樣在Form2中使用myForm 就可以對原來的Form1窗口進(jìn)行操作了。但是你要把要操作的Form1中的域和函數(shù)定義成public形式的（這樣可能不安全），此時的myForm就是真正的最開始打開的Form1了，你可以用這個實例來進(jìn)行兩個窗體的通訊了。
方法2：其實VB.Net中提供了窗體間進(jìn)行通訊的現(xiàn)成的屬性，呵呵，我們能想到的，微軟也想到了，他們創(chuàng)造的語言其實確實可以說是人性化了。
在Form1類中申明Form2時用如下代碼：
Dim f2As New Form2 '類Form2中的構(gòu)造函數(shù)不改，還是無參的
f2.owner=me
也可以使用函數(shù)的方法，給當(dāng)前實例添加一個附屬窗口 代碼：Me.AddOwnedForm(f2)
在Form2類的定義中寫如下代碼：
dim f1 as Form1=me.owner
這樣f1對應(yīng)的就是原來的Form1的實例了，也就可以用這個進(jìn)行通訊了。但是還是要把不同類之間訪問的域和函數(shù)定義成public，哎,安全確實是一個問題??！
通過Database吧！不然得通過消息處理API比如
Declare Function SendMessage Lib "user32" Alias "SendMessageA" ( _
ByVal hwnd As IntPtr, _
ByVal wMsg As Integer, _
ByVal wParam As Integer, _
ByVal lParam As Integer) _
As Boolean
但必須得事先知道另外一個項目的text1的句柄
你別侮辱了程式員。
如果你是想學(xué)習(xí)，我很愿意教你，如果你是所謂的興趣而已，那么就更應(yīng)該靠自己。
以上你所說的東西，很容易寫，但是從我開始學(xué)的時候，你知道我花了多少時間才完成嗎？
你不把問題發(fā)出來，一個語句一個小問題，那需要多少的實踐？
鄙視你。
方法很多，vb.net很簡單的比如： Form2窗體的Textbox2屬性設(shè)置為public，在Form1點(diǎn)擊button1.
Dim frm As New Form2
frm.TextBox2.Text = "123"
frm.ShowDialog() 可以取到form1里面窗體傳的值
還有一種方法：From1 ：
Dim frm As New Form2
frm.Owner = Me
frm.ShowDialog()
from2 : Private frmParent As Form1
frmParent = Me.Owner
Me.TextBox2.Text = frmParent.TextBox1.Text
重慶分公司
重慶分公司
