高分弱智题！！高分弱智题！！高分弱智题！！高分弱智题！！

Question

form2代码
Public strtext As String
Private Sub Command1_Click()
If Trim(Text1.Text) <> "" Then
    strtext = Text1.Text
    Unload Me
End If
End Subform1代码
Private Sub Command1_Click()
MsgBox Form2.strtext
End SubPrivate Sub Form_Load()
Form2.Show 1End Sub

Answer 1

呵呵,你可以用下面的语句操作:
在FORM1中,写入以下代码:
form2.show
form1.label1.caption=str(form2.j) '应用form2的j
在from2中,加入:
public j as integer '把j设为全局变量
j=5 '赋值

Answer 2

在form2中：
public j as integer在form1中：
dim f as integerform2.j=100
i=form2.j我估计其实你的疑问是怎么访问其他窗口的的变量或成员，窗口级的变量，有几种其中经常用到的有
public ： 是可以给别的窗体中调用
private ：只有本窗体能调用的
刚才将form中j声明为public了，这样在form1中就能使用了

Answer 3

不好意思，写错了，应该是
f=form2.j

Answer 4

use global var is common and safe.

Answer 5

添加个模块，再声明个全局的公共变量，他就可以在form间用来传值

Answer 6

可是怎样中断form1的执行呢？

Answer 7

Form2.Show 1代码已经写的很清楚了 form2.show的时候带上参数，弹出的窗体为模式窗体
此时是不能操作form1的。
建议学习VB入门知识！

Answer 8

Form1 做一个 Property ， Form2 也一个 Property ，大家要怎么用就怎么用！

Answer 9

这个问题以前我也遇到过，当时好像用其他方法解决的！form2执行完load就回到form1了，form2。show 1的方法还真没用过，回去用用看了，先谢了！有些东西还是经验问题，书上比较难查到，不懂就问还是好的么！

Answer 10

我大概知道你是什么问题了
是这样的要添加一个模块
在模块里面添加一个Main()函数
启动的时候就把他设置为第一位启动
在模块中写
Public Sub Main()Form1.Show vbModal
If Form2.i Then
    Form1.Show
    Form2.Hide
End If
End Sub
在form1中添加一个textbox和一个按钮，代码如下
Private Sub Command1_Click()
If Text1 = "1" Then
    
    Me.Hide
    Form2.Show
End If
End Sub
在form2中的代码如下
Option ExplicitPublic i As Boolean    
Private Sub Form_Load()
    i = True
End Sub
把这些代码添加进去就可以实现你所说的啦！
Best of Luck to you !

Answer 11

在form1中自定义一个属性，在form2里把j赋给这个属性，回到form1的时候把这个属性再赋给f。
不要滥用全局变量，没有必要用的时候就不要去用，否则程序很难读的，虽然现在内存开销已经不成问题了。