iOS Question Image and text on B4XSwiftButton

XUIViewsUtils.SetTextOrCSBuilderToLabel(SwiftBtnCalc.xLBL, cs)

    LoadDrawer
'    #if b4a
'    Dim cs As CSBuilder
'    cs.Initialize
'    cs.Initialize.color(Colors.White).Size(20).Typeface(Typeface.FONTAWESOME).VerticalAlign(1dip).Append(Chr(0xF1EC)).Pop. _
'    Typeface(Typeface.DEFAULT_BOLD).Append(CRLF).Size(14).Append("Hex 2 Dec").PopAll
'    SwiftBtnCalc.xLBL.Text = cs
'    #end if
    
    Dim cs As CSBuilder
    cs.Initialize.Color(Colors.White).Font(Font.CreateFontAwesome(20)).VerticalAlign(-10).Append(Chr(0xF1EC)).Pop. _
    Font(Font.DEFAULT).Append(CRLF).Append("Hex").PopAll
    XUIViewsUtils.SetTextOrCSBuilderToLabel(SwiftBtnCalc.xLBL, cs)

Dim cs As CSBuilder
    cs.Initialize
    #if b4a
    cs.Initialize.color(Colors.White).Size(20).Typeface(Typeface.FONTAWESOME).VerticalAlign(1dip).Append(Chr(0xF1EC)).Pop. _
    Typeface(Typeface.DEFAULT_BOLD).Append(CRLF).Size(14).Append("Calculators").PopAll
    SwiftBtnCalc.xLBL.Text = cs
    #else if B4I
    cs.Initialize.Color(Colors.White).Font(Font.CreateFontAwesome(20)).VerticalAlign(1dip).Append(Chr(0xF1EC)).Pop. _
    Font(Font.DEFAULT).Append(CRLF).Append("Hex").PopAll
    XUIViewsUtils.SetTextOrCSBuilderToLabel(SwiftBtnCalc.xLBL, cs)
    #end if

SwiftBtnCalc.xLBL.As(Label).SizeToFit

    Dim cs As CSBuilder
    #if b4a
    cs.Initialize.Alignment("ALIGN_CENTER").color(Colors.White).Size(20).Typeface(Typeface.FONTAWESOME).VerticalAlign(1dip).Append(Chr(0xF1EC)).Pop. _
    Typeface(Typeface.DEFAULT_BOLD).Append(CRLF).Size(14).Append("Calculators").PopAll
    XUIViewsUtils.SetTextOrCSBuilderToLabel(SwiftBtnCalc.xLBL, cs)
    #else if B4I
    cs.Initialize.Alignment("ALIGN_CENTER").Color(Colors.White).Font(Font.CreateFontAwesome(20)).VerticalAlign(1dip).Append(Chr(0xF1EC)).Pop. _
    Font(Font.DEFAULT).Append(CRLF).Append("Hex").PopAll
    XUIViewsUtils.SetTextOrCSBuilderToLabel(SwiftBtnCalc.xLBL, cs)
    SwiftBtnCalc.xLBL.As(Label).SizeToFit
    #end if

    Dim cs As CSBuilder
    #if b4a
    cs.Initialize.Alignment("ALIGN_CENTER").color(Colors.White).Size(20).Typeface(Typeface.FONTAWESOME).VerticalAlign(1dip).Append(Chr(0xF1EC)).Pop. _
    Typeface(Typeface.DEFAULT_BOLD).Append(CRLF).Size(14).Append("Calculators").PopAll
    XUIViewsUtils.SetTextOrCSBuilderToLabel(SwiftBtnCalc.xLBL, cs)
    #else if B4I
    cs.Initialize.Alignment("ALIGN_CENTER").Color(Colors.White).Font(Font.CreateFontAwesome(20)).VerticalAlign(1dip).Append(Chr(0xF1EC)).Pop. _
    Font(Font.DEFAULT).Append(CRLF).Append("Hex").PopAll
    XUIViewsUtils.SetTextOrCSBuilderToLabel(SwiftBtnCalc.xLBL, cs)
    #end if
    SwiftBtnCalc.Update

    Dim cs As CSBuilder
   
    #If B4A
    cs.Initialize
    cs.Alignment("ALIGN_CENTER")
    cs.Color(Colors.White)
    cs.Size(20)
    cs.Typeface(Typeface.FONTAWESOME)
    cs.Append(Chr(0xF1EC))
'    cs.Pop
    cs.Append(CRLF)
    cs.Typeface(Typeface.DEFAULT_BOLD)
    cs.Size(14)
    cs.VerticalAlign(1dip)
    cs.Append("Calculators")
    cs.PopAll
   
    SwiftBtnCalc.xLBL.As(Label).SingleLine = False
    #Else If B4I
   
    cs.Initialize
    cs.Alignment("ALIGN_CENTER")
    cs.Color(Colors.White)
    cs.Font(Font.CreateFontAwesome(20))
    cs.Append(Chr(0xF1EC))
'    cs.Pop
    cs.Append(CRLF)
    cs.Font(Font.DEFAULT_BOLD)
    cs.Font(Font.CreateNew(14))
    cs.VerticalAlign(1dip)
    cs.Append("Calculators")
    cs.PopAll
   
    SwiftBtnCalc.xLBL.As(Label).Multiline = True
    #End If

    XUIViewsUtils.SetTextOrCSBuilderToLabel(SwiftBtnCalc.xLBL, cs)
    SwiftBtnCalc.Update