Dim btnlist As List
btnlist.add(button1)
btnlist.add(button2)
btnlist.add(button3)
btnlist.add(button4)
btnlist.add(button5)
btnlist.add(button6)
btnlist.add(button7)
btnlist.add(button8)
btnlist.add(button9)
btnlist.add(button10)
btnlist.add(button11)
btnlist.add(button12)
btnlist.add(button13)
btnlist.add(button14)
btnlist.add(button15)
btnlist.add(button16)
btnlist.add(button17)
btnlist.add(button18)
btnlist.add(button19)
btnlist.add(button20)
'
'
For i = 0 To btnlist.Size-1
Dim btn As Button = btnlist.Get(i)
btn.Enabled = False
Next