kwrl.net
当前位置:首页 >> VB一个窗体上的数值怎么能够被另一个窗体上的代码引用 >>

VB一个窗体上的数值怎么能够被另一个窗体上的代码引用

给你一个示例 忘采纳

可以采用两种方法来解决: 一)在标准模块中声明全局变量,该变量在一个窗体的某事件中赋值或改变,另一窗体的某事件或过程中执行时就可直接引用。 '标准模块代码Option Explicit Public i As Long'Form1代码Option ExplicitPrivate Sub Command...

可以用“窗体.代码”的模式去执行别的窗体的代码。假设要在窗体 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...

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

只要在一个窗体正确声明变量为公共变量,其它窗体是能调用该变量。 'Form1 CoadOption Explicit Public ab As Long Private Sub Command1_Click() ab = 123456 Form2.ShowEnd Sub'Form2 CoadOption ExplicitPrivate Sub Form_Load() Text1 = For...

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

把第二个窗体(就是你说的(上面那个窗体) )的StartUpPosition属性 设置为0 再设置 第二个窗体 的Left、Top属性值 (举个两个例子:1.在编写程序时 将第二个窗体的 StartUpPosition属性 设置为0 Left属性值设置为0 Top属性值设置为0 则第二个...

很简单,你可以把T设置为全局变量 也可以将t的值赋值给form1的一个控件tag属性 例如:在form2的代码中这样写,form1.tag=t 然后在form1中直接读取me.tag就行了。

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