text formatting

[AngryVB6User]

basically the software receives a a string var every 30 seconds and places it into a textbox. i then need the text box to format it into a nice clear layout.

for example the text received may read :
Return(result="success" dev_id="0" time="2011-07-25 16:43:43" id="1" name="test user" workcode="" status="1" card_src="from_check"

time="2011-07-25 16:43:45" id="1" name="test user" workcode="" status="1" card_src="from_check"

i would like the textbox to show it as:
2011-07-25,16:43:43,1,test user,
2011-07-25,16:43:45,1,test user,


Any ideas??

[DataMiser]

Off the top of my head.
Use Split() with double quote as the seperator then grab the wanted elements from the resulting array.
In this case would be elements 1, 3 and 5

[AngryVB6User]

Sorry to pester but i have never used split() before, could you give me an example?

thanks

[DataMiser]

If you go to your online help and type in split you will get full info on the function alng with an example.
A google search for split vb6 should also return a good bit of info.

Private Sub Command1_Click()
Dim SourceString As String
Dim MyVar() As String

SourceString = "123,456,789"
MyVar = Split(SourceString, ",")

End Sub

In this case the MyVar array will be have 3 elements after the split
each containing a portion of the original string broken apart at the ,

[AngryVB6User]

yes i have googled it and have working examples but i cannot get it to split inbetween each "datahere"

[DataMiser]

In your case you would need to use the " as the seperator to look for and then look at the odd array numbers to get your values.

MyVar = Split(SourceString, Chr$(34))

MyVar(1) 3 and 5 would contain the values you mention that your are looking for.