重庆分公司,新征程启航
为企业提供网站建设、域名注册、服务器等服务
利用全局变量
创新互联专注于泾川网站建设服务及定制,我们拥有丰富的企业做网站经验。 热诚为您提供泾川营销型网站建设,泾川网站制作、泾川网页设计、泾川网站官网定制、微信小程序服务,打造泾川网络公司原创品牌,更为您提供泾川网站排名全网营销落地服务。
利用控件属性
在vb点虐 中两个窗体间的变量可以相互引用了
例如:可以这样用
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
两个参数:一个是数组名,一个是传递的长度
Function thename(ByVal imgFrom As Image) As String
thename = imgFrom.Name
End Function
Private Sub Image1_Click()
MsgBox thename(Image1)
End Sub
新窗体中写
构造函数
,然后调用。
比如你要调用的新窗体是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();
如此就能实现调用了。