VB 建立2个窗体 并且都放置一个text1,点击form1上的Command1,2个窗体怎么样才能显示相同的数据
2个回答
展开全部
form2添加一个公用方法或者属性,将form1的传递过去
form1,comand1 click事件中:
dim frm as form2
from2.GiveMeString=me.text1.text
form2.show
form2中定义一个公用属性
Public Property Get GiveMeString() As string
GiveMeString= text1.text
End Property
Public Property Let GiveMeString(ByVal NewVal As string)
text1.text= NewVal
End Property
form1,comand1 click事件中:
dim frm as form2
from2.GiveMeString=me.text1.text
form2.show
form2中定义一个公用属性
Public Property Get GiveMeString() As string
GiveMeString= text1.text
End Property
Public Property Let GiveMeString(ByVal NewVal As string)
text1.text= NewVal
End Property
追问
from2.GiveMeString=me.text1.text
这句显示有问题?
追答
我手写的,有手误
dim frm as form2
from2.GiveMeString=me.text1.text
form2.show
应该是
dim frm as form2
frm.GiveMeString=me.text1.text
frm.show
记住form2中药定义那个属性
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询