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

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

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

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

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

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

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

假设这两个窗体分别是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

VB中只需在另一窗体的文本框控件名前加上该窗体名做前缀后给与赋值。 Option ExplicitPrivate Sub Command1_Click() Form2.Text1 = Me.Text1End SubPrivate Sub Command2_Click() Form2.ShowEnd SubPrivate Sub Form_Load() Text1 = "VB中只需在...

在Form2所在的vb程序中,先添加C盘的Form1(必须的!!!),再在Form2的代码区中写: Private Sub Command1_Click() Me.Hide '不想隐藏当前窗体,就不要这句 Form1.Show End Sub

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

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