VB如何运行同一个工程下的第2个窗口。。就是想要运行form2结果运行form1

 我来答
永远开心的一家人0N
推荐于2017-12-16 · TA获得超过168个赞
知道答主
回答量:26
采纳率:0%
帮助的人:17万
展开全部

单击 工程|工程属性,出来如图对话框,启动窗体设置为form2即可

手机用户59964
2011-03-05 · 超过34用户采纳过TA的回答
知道答主
回答量:148
采纳率:0%
帮助的人:0
展开全部
form2的text1已经得到数据.

那么在form1的代码中可以直接使用form2的text1的值.方法就和理解的是一样的

比如说:
print form2.text1.text

假如你还是不会,那我就只能form2.show写出来了.
在form1中添加一个按钮,代码就是:
form2.show
form1.hide

这时form2中也添加一个按钮,代码是:
form1.show
form2.hide

然后就可以回到最前面了..
程序运行后,在form1按钮,打开form2..在form2的text1中输入一串字.比如"这是窗口2写的"
然后点击form2的按钮回到form1..
如果form1中有个按钮的代码是:
print form2.text1.text
就可以显示刚刚的那么字了..

我了补充呵: 设标志位呀..

比如FORM1的COMMAND1动作中, 先检查标志位,默认是FALSE, 然后就执行动作, 一直执行到SHOW FORM2, 然后FORM2就出来了, 写文本框内容, 再确定时,先改标志位为TRUE ,再HIDE FORM2,然后再CALL FORM1的COMMAND1..

FORM1的COMMAND1的代码后半部分,就是识别当标志位为TRUE时的动作.

有时候语言总是显得苍白无力呵..补充代码吧:

新建工程,2个窗体.
form1 , 一个按钮,一个Text1
form2, 一个按钮, 一个Text1

form1的代码如下:
Public cmdzt As Boolean

Public Sub Command1_Click()
If cmdzt = False Then
Me.Hide
Form2.Show
Exit Sub
End If

If cmdzt = True Then
Text1 = Form2.Text1
cmdzt = False '以便接受下一次动作
End If
End Sub

Private Sub Form_Load()
cmdzt = False
End Sub

form2的代码:
Private Sub Command1_Click()
Form1.cmdzt = True
Call Form1.Command1_Click
Form1.Show
Me.Hide
End Sub

我不知道这算不算你说的,点击窗体1的按钮, 运行到1半时(前一半呵), 打开窗体2,录入数据后,点击按钮,返回窗体1,接着刚刚的按钮继续动作..

我这个代码是在窗体1,点按钮后,因为标志为FLASE,于是打开窗体2, 在窗体2上,可以在文本框录入一些数据,然后按按钮后,将窗体1的标志位置为TRUE,然后CALL 了窗体1的按钮动作,因为标志位的变化,所以窗体1的按钮会执行剩下的代码(后一半)..就是在窗体1的文本框中显示窗体2刚刚文本框录入的信息..
已赞过 已踩过<
你对这个回答的评价是?
评论 收起
xiaoyuemt
2011-02-27 · TA获得超过1.6万个赞
知道大有可为答主
回答量:3202
采纳率:64%
帮助的人:1682万
展开全部
如果是选运行form1,然后想form2,就在form1中用代码 form2.show来激活form2.
如果是想一开始就先执行form2,那设置工程的启动属性
通过菜单,工程-----(最下面) 工程1 属性------通用-----启动对象,设置为form2,确定,即可。
已赞过 已踩过<
你对这个回答的评价是?
评论 收起
重非之0X
2011-02-27 · TA获得超过656个赞
知道小有建树答主
回答量:731
采纳率:0%
帮助的人:179万
展开全部
form2.show
form1.hide
已赞过 已踩过<
你对这个回答的评价是?
评论 收起
收起 更多回答(2)
推荐律师服务: 若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询

为你推荐:

下载百度知道APP,抢鲜体验
使用百度知道APP,立即抢鲜体验。你的手机镜头里或许有别人想知道的答案。
扫描二维码下载
×

类别

我们会通过消息、邮箱等方式尽快将举报结果通知您。

说明

0/200

提交
取消

辅 助

模 式