' Dim TheList As List, item As String, item_name As String,item_tag As String,x1 As Int
' TheList = File.ReadList (File.DirAssets, MapFileName)
' For i = 0 To TheList.Size -1
' 'Log(TheList.Get(i))
' item = TheList.Get(i)
' x1 = item.IndexOf("=") : item_name= item.subString2(0,x1):item_tag = item.substring2(x1+1,item.Length)
' Log ("Item=" & item_name & "Tag=" & item_tag)
' 'item_name.text = item_tag
' If item_name="Lable1" Then
' Dim lbl As Label = item_name
' lbl.Text = item_tag
' End If
'
' Next