ToolboxItem

Sets or returns PROGID of active toolbox item. Set to empty to end control mode.

Syntax

object.ToolBoxItem [= value]

The ToolboxItem property syntax has the following parts:

Part	Description
object	A valid ARDesigner object
value	A String value.

Data Type

String

Example

Private Sub tbToolbox_ButtonClick(ByVal Button As MSComctlLib.Button)
	Select Case Button.key
		Case "tbxSelect": ARDesigner1.ToolBoxItem = ""
		Case "tbxLabel": ARDesigner1.ToolBoxItem = "DDActiveReports2.Label"
		Case "tbxField": ARDesigner1.ToolBoxItem = "DDActiveReports2.Field"
		Case "tbxCheckbox": ARDesigner1.ToolBoxItem = "DDActiveReports2.Checkbox"
		Case "tbxImage": ARDesigner1.ToolBoxItem = "DDActiveReports2.Image"
		Case "tbxLine": ARDesigner1.ToolBoxItem = "DDActiveReports2.Line"
		Case "tbxShape": ARDesigner1.ToolBoxItem = "DDActiveReports2.Shape"
		Case "tbxRichedit": ARDesigner1.ToolBoxItem = "DDActiveReports2.RichEdit"
		Case "tbxFrame": ARDesigner1.ToolBoxItem = "DDActiveReports2.Frame"
		Case "tbxSubreport": ARDesigner1.ToolBoxItem = "DDActiveReports2.Subreport"
		Case "tbxPageBreak": ARDesigner1.ToolBoxItem = "DDActiveReports2.PageBreak"
		Case "tbxOLE": ARDesigner1.ToolBoxItem = "DDActiveReports2.OLE"
		Case "tbxBarcode": ARDesigner1.ToolBoxItem = "DDActiveReports2.Barcode"
	End Select
End Sub

Remarks

This property is used to implement a custom toolbox toolbar.