زیبا سازی برنامه ها با CodeJock

[Dr.Bronx]

این کد برای کسانی که می خوان یک چیزی مثل عکس زیر داشته باشن

اول کدشو تحویل بگیرین

  Dim Control As CommandBarControl

     Set ControlOptions = RibbonBar.Controls.add(xtpControlPopup, 0, "Theme")

     ControlOptions.Flags = xtpFlagRightAlign

    

     Set Control = ControlOptions.CommandBar.Controls.add(pr_ControlB  utton, 10100, "Blue")

     Set Control = ControlOptions.CommandBar.Controls.add(pr_ControlB  utton, 10101, "Black")

     Set Control = ControlOptions.CommandBar.Controls.add(pr_ControlB  utton, 10102, " Silver")

     Set Control = ControlOptions.CommandBar.Controls.add(pr_ControlB  utton, 10103, "Aqua")

 

در ضمن توی نظرسنجی هم شرکت کنید .

موفق و موید باشید ./