Private Views As Map
...
Sub Activity_Create
'LoadLayout
Views = CreateMap("Label1": Label1, "Label2": Label2, "EditText1": EditText1, ...)
Dim lbl As Label = Views.Get("Label" & Variable)
Dim edt As EditText = Views.Get("EditText" & Variable)
lbl.Text = edt.Text