Yes, I've come across something like this before. It's not intuitive.
Would something like this do what you're looking for?:

Private Sub txtStringLineInput_BeforeUpdate(ByVal Cancel As
MSForms.ReturnBoolean)
Me.lstStringSetData.AddItem Me.txtStringLineInput.Text
Me.txtStringLineInput.Text = ""
Cancel = True
End Sub