再次請教:VB是否能像ASP一樣include一段程式進來(編號：1044)

在VB上寫作總是會同樣的sub在不同的from裡
重覆寫了好几次, 只因為模組中不能有物件.
我在想是不是能有其它的語言,如C或者是Clipper, call sub
及function一樣,不曉得諸位能不能了解我的意思...
舉個例子.
form1
text1 * 1 (text1.text = 1)
command1 *1
程式
Private Sub Command1_Click()
Call Form2.showMytext
End Sub

form2
text1 * 1 (text1.text = 2)
程式
Public Sub showMytext()
MsgBox Text1.Text
End Sub

執行結果會是2,
該如何讓它 shwo 出 1 呢??
若將sub showMytext程式放在模組裡也是錯誤的.

我的意思是純程式碼的include,不管是不是物件,
只要是名稱一樣就行了.
真的挺苦腦的.....
可能是以前寫程式的習慣,
不知現在的程式能不能這樣表現.
還是諸位前輩對於這面是否有其它的建議....謝謝!!