Setting Leader Text Field with VBA when the string contains a space

I’m having a problem setting leader text with VBA code when there is a space included in the text. I have tried using Chr(32) and " " but the string splits at the space. I am trying to get a Attribute User Property and use that in the leader text name i.e. str = “%<UserText(” & Chr(39) & sObj & Chr(39) & Chr(44) & Chr(39) & “1. Item” & Chr(39) & “)>%” …I’m looking at the “1. Item” portion specifically. Thanks for any help!