Sub Activity_Create(FirstTime As Boolean)
Activity.LoadLayout("444")
Sleep(0)
Dim cs As CSBuilder
cs.Initialize
CallSub3(Me, "AddLeadingMarginSpan", cs, Array As Int(0dip, 30dip))
cs.Append("1) First do text text text, text text text text text text text").PopAll
CallSub3(Me, "AddLeadingMarginSpan", cs, Array As Int(0dip, 30dip))
cs.Append(CRLF).Append("2) Second do text text text, text text text text text text text").PopAll
Label1.Text = cs
End Sub
Sub AddLeadingMarginSpan(cs As Object, FirstAndRest() As Int)
Dim span As JavaObject
span.InitializeNewInstance("android.text.style.LeadingMarginSpan.Standard", Array(FirstAndRest(0), FirstAndRest(1)))
Dim jo As JavaObject = cs
jo.RunMethod("open", Array(span))
End Sub