For i = 0 to 99
Dim btn As Button
btn.Initialize("btn")
'Here you have to add btn to Activity, or Root, or a Panel
'Root.AddView(btn, ....) <--- Root in B4XPages projects.
btn.Tag = i
btn.Text = "b " & i
Next i
Private btn_Click
Dim b As Button = Sender
Log("Button Tag = " & b.Tag)
Log("Button Text = " & b.Text)
End Sub