在程式碼執行時使用控制項值 (Word)

您可以在 Visual Basic 程式碼執行時，設定並傳回 ActiveX 控 件的某些屬性。 下列範例會將文字方塊的 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 支援與意見反應。