kwrl.net
当前位置:首页 >> 如何VB 中在一个窗体中执行另一个窗体中的代码 >>

如何VB 中在一个窗体中执行另一个窗体中的代码

1,VB打开一个窗体Form1,然后在使用下面的语名: Form2.Show 2,窗体Form2就打开了。 3,程序执行显示如下:

Private Sub Command1_Click()'登录窗体中 Form2.Label1 = Text1'Text1为用户名控件。该语句可放杂Form_QueryUnload或Form_Unload中,但必须在Unload之前,一旦Me被Unload,将无法再调用 Unload Me Form2.Show End Sub 如果登录窗体没有被unload...

窗体1 command1_click() '显示 form2.show unload me '也可用 me.hide end sub 窗体2 command1_click() '返回 form1.show unload me end sub

可以用“窗体.代码”的模式去执行别的窗体的代码。假设要在窗体 frm1 里执行窗体 frm2 的Form_Click 代码,程序如下: Private Sub Form_Click() frm2.Form_Click() '在frm1 里执行 frm2 的 From_Click 代码 End Sub

代码如下: PUBLIC SUB COMMAND1_CLICK() MSGBOX“HELLO” END SUB 则在FORM1中调用时就直接写成: PUBLIC SUB COMMAND1_CLICK() CALL FORM2.COMMAND1_CLICK END SUB 前提是FORM2中相应的代码是PUBLIC的而不是PRIVATE的,否则调用不了

要看你是达到什么目的: 打开Form1窗体:Form1.show 关闭FORM1:Unload FORM1 执行FORM1的按钮(Command1):FORM1.Command1.Value FORM1赋值给TEXT1:FORM1.TEXT1.TEXT=“TEST”

实现方法: 1)在当前窗口按钮的Click事件中对执行窗体的按钮的Value 属性赋值True事项。 Value 属性,CommandButton 控件-返回或设置指示该按钮是否可选的值;在设计时不可用。 Private Sub Command1_Click() Form2.Command1.Value = TrueEnd ...

a=form1.text1.text b=form2.text1.text ... 引用的前提是前面的窗口没有关闭,否则只能用全局变量来实现传递。

假设这两个窗体分别是form1和 form2 form1窗体代码是: Private Sub Command1_Click() Load Form2 Form2.Show End Sub form2窗体代码是: Private Sub Form_Load() Form2.Top = Form1.Top + 200 Form2.Left = Form1.Left + 200 End Sub

网站首页 | 网站地图
All rights reserved Powered by www.kwrl.net
copyright ©right 2010-2021。
内容来自网络,如有侵犯请联系客服。zhit325@qq.com