VB form2调用form1中内容
有form1和form2两个窗体,现在我想单击form1里的command1的时候,form2显示出来,单击form2中的command1的时候,就将form1text1...
有form1和form2两个窗体,现在我想单击form1里的command1的时候,form2显示出来,单击form2中的command1的时候,就将form1 text1中的内容显示到form2中,如何编写程序,以及在哪添加变量 谢谢你了
展开
展开全部
这个题用不着变量,你要是想用的话也可以。
第一种,不用变量方法:
Form1中的代码:
Private Sub Command1_Click()
Form2.Show
End Sub
Form2中的代码:
Private Sub Command1_Click()
Print Form1.Text1.Text
End Sub
用变量的方法:
添加一个模块,在模块中写到:
Public Form1text As String
然后在Form1中写:
Private Sub Form_Load()
Form1text = Text1.Text
End Sub
Private Sub Text1_Change()
Form1text = Text1.Text
End Sub
Private Sub Command1_Click()
Form2.Show
End Sub
在Form2中写:
Private Sub Command1_Click()
Print Form1text
End Sub
第二种方法不但麻烦,还要声明变量,使得方法二占用的内存空间也更大,所以我还是推荐使用第一种方法。
第一种,不用变量方法:
Form1中的代码:
Private Sub Command1_Click()
Form2.Show
End Sub
Form2中的代码:
Private Sub Command1_Click()
Print Form1.Text1.Text
End Sub
用变量的方法:
添加一个模块,在模块中写到:
Public Form1text As String
然后在Form1中写:
Private Sub Form_Load()
Form1text = Text1.Text
End Sub
Private Sub Text1_Change()
Form1text = Text1.Text
End Sub
Private Sub Command1_Click()
Form2.Show
End Sub
在Form2中写:
Private Sub Command1_Click()
Print Form1text
End Sub
第二种方法不但麻烦,还要声明变量,使得方法二占用的内存空间也更大,所以我还是推荐使用第一种方法。
来自:求助得到的回答
展开全部
form1中添加代码:
Private Sub Command1_Click()
Form2.Show
End Sub
form2中:
Private Sub Command1_Click()
Print Form1.Text1.Text
End Sub
这样就可以了
Private Sub Command1_Click()
Form2.Show
End Sub
form2中:
Private Sub Command1_Click()
Print Form1.Text1.Text
End Sub
这样就可以了
本回答被提问者和网友采纳
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
展开全部
'form1中:
Private Sub Form_Load()
Form2.Show
End Sub
'===========================================
'form2中:
Private Sub Command1_Click()
Print Form1.Text1
End Sub
'===========================================
Private Sub Form_Load()
Form2.Show
End Sub
'===========================================
'form2中:
Private Sub Command1_Click()
Print Form1.Text1
End Sub
'===========================================
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询