vb 子过程调用 解决追加100分

来源：百度知道 编辑：UC知道 时间：2024/06/25 13:10:12
窗体1FORM1代码
Public Sub Command1_Click()
Print "hello"
Form2.Show
End Sub

窗体2 FORM2代码
Public Sub Command2_Click()

Form1.Command1_Click

End Sub

出来的结果我按窗体2上的COMMAND2 调用窗体1上的COMMAND1~打印出来的HELLO显示在窗体1上 要是我想让它显示在窗体2 怎么做~？
或者~要是我调用的是窗体1中COMMAND1的一个计算值或者结果 我怎么把这个结果拿来窗体2中使用 如：
Public Sub Command1_Click()
a=2
b=3
s=a+b
End Sub
窗体2中
Public Sub Command2_Click()

直接拿窗体1中的S值 来用 如何做？
x=s
print x

End Sub
一、Public Sub Command1_Click()
form2.Print "hello"
Form2.Show
End Sub
不行~~~你必须先显示FORM2 才能form2.Print "hello"
况且这样的话 我窗体1 的COMMAND1 就废掉了我直接在窗体2 写上PRINT “HELLO”就好了~ 我要的是我点窗体1上的COMMAND 它就打印在窗体1上 我点窗体2的COMMAND2它就打印在窗体2上 这样的话 要改也是在窗体2的COMMAND2上改 也不是在窗体1中改啊

一、Public Sub Command1_Click()
form2.Print "hello"
Form2.Show
End Sub
二、Form2想使用Form1内的变量，必须在form1内声明公共变量，即：
在在form1的Option Explicit这行的下面(如果没有，则在最上一行)写上：
Public S
那么，你按了Form1内的Command1_Click后，在Form2内可这样调用：

Public Sub Command2_Click()

x=Form1.s
print x

End Sub

Public Sub Command1_Click()
Print "hello"
Form2.Show
End Sub

窗体2 FORM2代码
Public Sub Command2_Click()

Form1.Command1=1

End Sub

command单击事件触发方法是让他=1或true

想让form1的变量s在form2上面使用:
public s as string
这样在声明出写出,只要在这个程序里,任何地方都可以调用
如:
在form2
msgbox form1.s '显示s变量