Кнопка (Command Button) - Изменение формы и типа градиентной заливки

По материалам:
https://msdn.microsoft.com/en-us/vba/access-vba/articles/commandbutton-shape-property-access
https://msdn.microsoft.com/en-us/vba/access-vba/articles/commandbutton-gradient-property-access

Private Sub cmdShapeFill_Click()
'Кнопка - Изменение формы и типа градиентной заливки
'--------------------------------------------------------------------------
'Читаем 01:
'   CommandButton.Shape Property (Access)
'   https://msdn.microsoft.com/en-us/vba/access-vba/articles/commandbutton-shape-property-access
    Me!CommandTest.Shape = 2    'форма кнопки (от 0 до 9)
    
'Читаем 02:
'   CommandButton.Gradient Property (Access)
'   https://msdn.microsoft.com/en-us/vba/access-vba/articles/commandbutton-gradient-property-access
    Me!CommandTest.Gradient = 7  'тип градиентной заливки (от 0 до 26)
End Sub