'BELOW 2 LINES IN GLOBALS
Dim C1pr, Chem1pr, C2pr, Chem2pr, C3pr, Chem3pr, C4pr, Chem4pr, C5pr, Chem5pr As Label
Dim CChem() As Label
'Then after you load the layout in Activity_Create with these views, you enter this line:
CChem = Array As Label(C1pr, Chem1pr, C2pr, Chem2pr, C3pr, Chem3pr, C4pr, Chem4pr, C5pr, Chem5pr)