某張表單的變數如何傳到另一張表單?

原本只要在每個表單開一個Test1就可以了：

Form1.Text1.Text = Form2.Text1.Text

可是如果每次傳值到另一個表單都要開一個TextBox就太浪費了！站長教您用一個更好的方法：

首先開Form1、Form2、Text1(於在Form2)和Command1(於在Form2)各一個，然後分別輸入：

'Form1程式碼：

Public MyValue as String '這行要放在最頂

Private Sub Form_Load()
　MyValue = "哈哈哈！"
End Sub

'Form2程式碼：

Private Sub Command1_Click()
　Text1.Text = Form1.MyValue
End Sub

上一頁