Try using a secondary variable to hold the new trimmed value.
VB Code:
  1. Dim StrVar As String
  2. Dim StrVar2 As String
  3.  
  4. StrVar2 = Trim$(StrVar)