Referring to members of an object
You can use the With statement as a quick way to access class members of a given object. You can also use the With statement to test expressions using an object's members.
The syntax is:
With objectRef
[statements]
End With
Element |
Description |
---|---|
objectRef |
An expression whose value is a reference to an object. For example, objectRef can be a function call that returns an object reference or a Variant that contains an object reference. |
statements |
One or more statements. The With statement itself may be nested up to 16 levels. |
This example uses the With statement to refer to members of an object using a dot to represent the object name (startEmp).
Class Employee
Public empName As String
Public newName As String
' Sub GetName prompts for and accepts input to newName.
Sub GetName
newName$ = InputBox$("Enter name:" , "New Name" )
End Sub
End Class
Dim startEmp As New Employee
' Sub SetEmp puts information into the new employee object.
Sub SetEmp (E As Employee)
With E
Call .GetName ' Prompts for input to startEmp.newName$.
.empName$ = .newName$
End With
End Sub
Call SetEmp(startEmp)
Outside the With statement, you need to specify the entire reference. For example:
Employee.empName$ = .newName$