Macro (SVB) Program Examples - Creating a Statistica Query Toolbar
This example creates a custom toolbar that contains numerous options regarding Statistica Query, and position it in the upper portion of the Statistica window. For further customization of this new toolbar (e.g., add your own icons to represent the buttons), refer to Button Appearance.
Option Base 1 Option Explicit Sub Main Dim qBar As CommandBar Set qBar = _ CommandBarOptions.CommandBars(scBarTypeToolBar).Add("Query") 'Begin inserting buttons (indicating the index position, 'the menu option's ID, and its title. qBar.InsertButton 1, scCmdFileExternalDataOpenQueryfromFile, , "Run" qBar.InsertButton 2, scCmdFileExternalDataCreateQuery, , "New" qBar.InsertButton 3, scCmdFileExternalDataEditQuery, , "Edit" qBar.InsertButton 4, scCmdFileExternalDataProperties, , "Properties" 'Insert separator bar qBar.InsertSeparator 5 qBar.InsertButton 6, scCmdFileExternalDataRefreshData, , "Refresh" qBar.InsertButton 7, scCmdFileExternalDataDeleteQuery, , "Delete" qBar.InsertButton 8, scCmdFileExternalDataCancelQuery, , "Cancel" 'Place the new toolbar on top with the other toolbars qBar.Position = scBarTop End Sub
Copyright © 2021. Cloud Software Group, Inc. All Rights Reserved.