當程式碼正在執行時，使用控制項的值

部分 控制項 屬性可以在 Visual Basic 程式碼執行時設定並回傳。 下列範例會將文字方塊的 Text 屬性設定為 "Hello"。

TextBox1.Text = "Hello"

表單關閉時，使用者輸入到表單的資料將遺失。 如果在表單卸載後傳回該表單上控制項的值，則得到的是該控制項的初始值，而不是使用者輸入的值。

如果要儲存輸入表單上的資料，可在該表單仍執行時將資訊儲存到模組層級的變數中。 以下範例顯示了一個表單，並儲存其資料。

' Code in module to declare public variables. 
Public strRegion As String 
Public intSalesPersonID As Integer 
Public blnCancelled As Boolean 
 
' Code in form. 
Private Sub cmdCancel_Click() 
 Module1.blnCancelled = True 
 Unload Me 
End Sub 
 
Private Sub cmdOK_Click() 
 ' Save data. 
 intSalesPersonID = txtSalesPersonID.Text 
 strRegion = lstRegions.List(lstRegions.ListIndex) 
 Module1.blnCancelled = False 
 Unload Me 
End Sub 
 
Private Sub UserForm_Initialize() 
 Module1.blnCancelled = True 
End Sub 
 
' Code in module to display form. 
Sub LaunchSalesPersonForm() 
 frmSalesPeople.Show 
 If blnCancelled = True Then 
 MsgBox "Operation Cancelled!", vbExclamation 
 Else 
 MsgBox "The Salesperson's ID is: " & 
 intSalesPersonID & _ 
 "The Region is: " & strRegion 
 End If 
End Sub

支援和意見反應

有關於 Office VBA 或這份文件的問題或意見反應嗎？ 如需取得支援服務並提供意見反應的相關指導，請參閱 Office VBA 支援與意見反應。