请问一下，我想把form1里的所有textbox相加起来数字，然后减去form2里的所有textbox相加起来数字，答案出现在form3里，应该如何编写出来？

新加一个 模块，在模块里写内容

Dim 收入 As Single, 支出 As Single

Public Sub 收入计算()
收入 = Val(Form1.text1.Text) + Val(Form1.text2.Text) + Val(Form1.text3.Text) + Val(Form1.text4.Text)
End Sub

Public Sub 支出计算()
收入 = Val(form2.text1.Text) + Val(form2.text2.Text) + Val(form2.text3.Text) + Val(form2.text4.Text) + _
       Val(form2.text5.Text) + Val(form2.text6.Text)
End Sub

Public Sub 显示结果()
form3.Font.Size = 20

form3.ForeColor = vbBlack
form3.Print "收入：";
form3.ForeColor = vbRed
form3.Print 收入

form3.ForeColor = vbBlack
form3.Print "支出：";
form3.ForeColor = vbRed
form3.Print 支出

form3.ForeColor = vbBlack
form3.Print "剩余：";
form3.ForeColor = vbRed
form3.Print 收入 - 支出
End Sub

你按下form1窗口的下一步时，在你显示 form2 之前，调用 收入 过程。
你按下form2窗口的下一步时，在你显示 form3 之前，调用 支出 过程。
然后显示 form3 后，再调用 显示结果 过程。