Problem with Button Style

Sorry for my english......

I have a button toolbar, if change style button from "only icon" to "icon and text" from the customize dialog.

If into events "CutomizationDone" i check when button style have changed the code not return the correct style but style is always "tpButtonAutomatic"

Example

Sub Form_Load()

   With CmdBars.Controls

       .Add xtpControlButton, ID_FILE_EXIT, "Exit"

       .Add(xtpControlButton, ID_FILE_OPEN, "Open"

       .Add(xtpControlButton, ID_FILE_CLOSE, "Close"

   end with

end sub

Private Sub CmdBars_CustomizationDone()

    Dim ToolBar As CommandBar

    Set ToolBar = CmdBars.Item(2)
       
    With ToolBar
        For i = 1 To .Controls.Count

               ' .Controls(i).style    is always "tpButtonAutomatic"

               if .Controls(i).style = xtpButtonIconAndCaption then

                     ................

               endif

        Next
    End With

end sub