Compartir a través de


Usar los valores de los controles mientras se ejecuta el código

Algunas propiedades de controles se pueden establecer y devolver mientras se ejecuta código de Visual Basic. En el ejemplo siguiente, se establece la propiedad Text de un cuadro de texto como "Hello".

TextBox1.Text = "Hello"

Los datos que el usuario escribe en el formulario se pierden al cerrarlo. Si devuelve los valores de los controles de un formulario después de descargarlo, obtendrá los valores iniciales de los controles en lugar de los valores que escribió el usuario.

Si desea guardar la información especificada en un formulario, puede hacerlo en variables de nivel de módulo mientras el formulario todavía esté en ejecución. En el ejemplo siguiente, se abre un formulario y se guarda su información.

' 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

Soporte técnico y comentarios

¿Tiene preguntas o comentarios sobre VBA para Office o esta documentación? Vea Soporte técnico y comentarios sobre VBA para Office para obtener ayuda sobre las formas en las que puede recibir soporte técnico y enviar comentarios.