Listview Custom

Menampilkn data yg dapat di scrol vertikal adalah lazim kita lihat pda applikasi android
Itulah penggunaan dari List
Pada B4a Librari yg biasa dikenal bernama LISTVIEW
Tapi kini sdh ada librari dgn fungsi yg lebih variatif yaitu library xCustomeListview

Sub CreateListItem(Text As String, Width As Int, Height As Int) As Panel
Dim p As Panel
p.Initialize("")
'we need to add the panel to a parent to set its dimensions. It will be removed after the layout is loaded.
Activity.AddView(p, 0, 0, Width, Height)
p.LoadLayout("CellItem")
p.RemoveView
'label1 and button1 will point to the last added views.
Label1.Text = Text
Button1.Text = "Click"
Return p
End Sub