You can use the LotusScript Evaluate function. For example, this gets the common name portion of a hierarchical user name:
Dim szCommonName As String Dim result As Variant result = Evaluate("@Name([CN]; @Username)") szCommonName = result(0)