URL encoding in Visual Basic 6.0

URL encoding in Visual Basic 6.0. The CkString ActiveX is freeware and may be downloaded from: String Component.

Dim strObj As New CkString

strObj.Str = "Los Angeles, CA"

Text1.Text = Text1.Text & strObj.GetEncoded("url","windows-1252") & vbCrLf

'  Output is Los+Angeles%2C+CA