Android Question Adding buttons to a panel

    Dim pnl1 As Panel
    pnl1.Initialize("")
    pnl1.Color = Colors.Transparent
    Dim btn(4) As Button
    Dim posX(4) As Int = Array As Int(25%x, 75%x, 25%x, 75%x)
    Dim posY(4) As Int = Array As Int(20%y, 20%y, 60%y, 60%y)
    For i = 0 To 3
        btn(i).Initialize("Button")  'all buttons use same event sub
        btn(i).Tag = i  'to distinguish the buttons in event sub
        btn(i).Text = "Button" & (i + 1) 'or use a string array like posX/posY
        pnl1.AddView(btn(i), posX(i) - 50dip, posY(i), 100dip, 100dip)
    Next
    Activity.AddView(pnl1, 0dip, 0dip, 100%x, 100%y)

Dim posX(4) As Int = Array As Int(25%x, 75%x, 25%x, 75%x)
    Dim posY(4) As Int = Array As Int(20%y, 20%y, 60%y, 60%y)

Sub Activity_Create(FirstTime As Boolean)
    'Do not forget to load the layout file created with the visual designer. For example:
    'Activity.LoadLayout("Layout1")
    Dim pnl1 As Panel
    Dim Rows, Columns As Int
    pnl1.Initialize("")
    pnl1.Color = Colors.Transparent
    Activity.AddView(pnl1,0,0,100%x,100%y)
   
    If 100%x > 100%y Then 'landscape
        Rows = 5
        Columns = 4
    Else 'portrait
        Rows = 4
        Columns = 5       
    End If
   
    Dim BWidth As Int = 100%x / Columns
    Dim BHeight As Int = 100%y / Rows
   
    Dim x, y As Int
    For y = 0 To Rows - 1
        For x = 0 To Columns - 1
            Dim bt As Button
            bt.Initialize("Button")
            bt.Text = "Button"&(x+y*Columns)
            bt.Tag = "Button"&(x+y*Columns)
            pnl1.AddView(bt,x*BWidth+2dip,y*BHeight+2dip,BWidth-4dip,BHeight-4dip)
        Next           
    Next
   
End Sub

Sub Button_Click
    Dim bt As Button = Sender
    ToastMessageShow("You Pressed Button "&bt.Tag,False)
End Sub