vb点虐 窗体传值 vb窗体间数据传输

vb点虐 两个项目里两个窗体传值

通过Database吧！不然得通过消息处理API比如

创新互联公司专业为企业提供琼中黎族网站建设、琼中黎族做网站、琼中黎族网站设计、琼中黎族网站制作等企业网站建设、网页设计与制作、琼中黎族企业网站模板建站服务，10年琼中黎族做网站经验，不只是建网站，更提供有价值的思路和整体网络服务。

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的句柄

请教一个vb点虐 的窗口之间传递变量值的问题

用form的ShowDialog这个功能,这个是可以进行窗体间的传值的。

比如在父窗体上需要传的值是textbox1的内容，子窗体是childform.

那么在父窗体上的点击事件中可以这样写

dim frm as childform = New childform

'要在子窗体上的textbox1里显示父窗体中的textbox1中的内容，这样写

frm.textbox1.text = me.textbox1.text

'最后

frm.showdialog()

这样就可以了。

如果说你三个窗体完全一样，那你也不用写三个一样的窗体只要写一个就行了，在不同的按钮事件中做不同的赋值即可。

不过这样打开的子窗体是模态窗体，也就是说在子窗体显示之后，要对父窗体进行操作必需关闭子窗体才行。

VB点虐 两个窗体之间传递参数

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

比如你要调用的新窗体是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 Public Sub 窗体 互相传值

Public Sub checkInjectionWithNoKeyword()

Dim injection_Type As String = My.Forms.SqlInjection.ComboBox_Type.Text.Trim()

Dim my_checkUrl As String = My.Forms.SqlInjection.ComboBox_Url.Text.Trim()

end sub

这个改成放在窗体内就行了，我也有遇到同样的问题，最后只好放窗体里才能实现。

网上找的什么委托都是不行的。