Left
Horizontal position in device-independent points, relative to the parent container.
Range: -100000 to 100000.
Place controls inside TabPage containers and navigate between pages.
A TabPage is a child of TabControl, and the controls on a page belong to that page. Overlapping controls on the Form itself do not become tab content. Keep the selected page and any Next/Back commands synchronized.
Add TabControl to its intended parent and name it tabHost for this example:
| Property | Example value |
|---|---|
Visible | True |
Enabled | True |
SelectedIndex | 0 |
A complete handler from Forms/frmMain.bas. The linked lesson includes its surrounding controls, declarations and helpers.
Private Sub tabHost_Change()
If tabHost.SelectedTab Is tabPageGeneral Then
lblStatus.Caption = "General page selected."
Else
lblStatus.Caption = "Details page selected."
End If
End SubContract defaults are shown below. Where a new control has a different Designer starting value, that value is listed separately.
LeftHorizontal position in device-independent points, relative to the parent container.
Range: -100000 to 100000.
TopVertical position in device-independent points, relative to the parent container.
Range: -100000 to 100000.
WidthControl width in device-independent points.
Range: 0 to 100000.
Designer starting value: 360.
HeightControl height in device-independent points.
Range: 0 to 100000.
MinWidthMinimum control width in device-independent points; 0 lets the parent layout choose.
Range: 0 to 100000.
MinHeightMinimum control height in device-independent points; 0 lets the parent layout choose.
Range: 0 to 100000.
MaxWidthMaximum control width in device-independent points.
Range: 0 to 100000.
MaxHeightMaximum control height in device-independent points.
Range: 0 to 100000.
TabIndexKeyboard navigation order within the parent container; lower values come first.
Range: 0 to 100000.
ZIndexStacking order among sibling controls; larger values appear in front. Equal values preserve document order.
Range: -100000 to 100000.
AnchorEdges kept at their authored distance when the parent resizes. Use a comma-separated combination of Left, Top, Right and Bottom; Dock overrides the effective anchor without deleting it.
DockAutomatic placement within the parent: None, Left, Top, Right, Bottom or Fill. Dock overrides effective Anchor layout without deleting the stored anchors.
MarginExternal spacing as one non-negative DIP value or Left,Top,Right,Bottom.
VisibleWhether the control is shown in the running application.
BackColorContainer background color as #RRGGBB. Empty uses the current theme background.
PaddingInner spacing as one non-negative DIP value or Left,Top,Right,Bottom; child coordinates remain relative to the padded content area.
AccessibleNameName announced by assistive technology. Empty uses the stable control Name.
CursorPointer shown over the control: Default, Arrow, Hand, IBeam, Cross, Wait, Help, SizeAll, SizeNS, SizeWE, SizeNWSE, SizeNESW or NotAllowed.
OpacityVisual opacity from 0 (transparent) to 1 (opaque).
Range: 0 to 1.
DesignLockedPrevents movement and resizing in the Designer without changing runtime interaction.
AccessibleDescriptionAdditional help text announced by assistive technology.
AccessibleRoleAccessibility role override. Auto preserves the native semantic role; explicit values use the corresponding platform automation role.
AutomationIdStable automation identifier; empty uses the component Name.
TabStopWhether Tab navigation can move focus to this TabControl.
ToolTipTextHelp text shown when the pointer rests over the running control; empty disables the tooltip.
TagApplication-defined text associated with this control; McBasic™ does not interpret it.
EnabledWhether the control accepts user interaction in the running application.
HitTestVisibleWhether the running control participates in pointer hit testing. The control remains selectable in the Designer.
AllowDropWhether this running control accepts application drag-and-drop operations; Designer movement is separate.
DragModeVB control drag: 0 Manual (code starts a drag with the Drag method) or 1 Automatic (a left-button press starts a drag, and the control raises no Click, MouseDown or MouseUp for that press).
Range: 0 to 1.
DragIconCase-insensitive name of a declared project image resource shown under the pointer while this control is dragged; empty shows a grey outline of the control.
SelectedIndexZero-based selected page index; -1 means no page is selected.
Range: -1 to 100000.
SelectedTabReference to the currently selected TabPage, or Nothing when SelectedIndex is -1. This runtime value is read-only and is not stored in the Form layout.
TabsPerRowClassic appearance only: 0 shows the tabs at their caption widths on one row; a positive number lays them out like a VB6 SSTab, that many tabs per row, each an equal share of the width, in as many fixed rows as needed. The VB6 importer sets it from the SSTab's TabsPerRow. Ignored in the macOS appearance.
Range: 0 to 64.
IndexPosition of this control in its control array, 0 to 32767. Several controls share one name only when every one of them has an Index. Absent from the layout, and -1 in code, when the control is not in an array.
Designer values: 0 to 32767. Clear the dedicated Index row for a non-array control; BASIC then reads -1.
Replace control with the object’s Name when creating a handler. ByRef arguments may be changed by your handler; ByVal arguments report an input value.
Occurs once after the effective selection changes; assigning the same effective selection does not raise it.
Supported aliases: Change. Canonical name: SelectionChanged.
Private Sub control_SelectionChanged()No parameters.
Occurs when runtime drag data enters this control; set Effect to Copy, Move, Link or None.
Private Sub control_DragEnter(ByVal Data As DragData, ByRef Effect As DragEffect, ByVal X As Double, ByVal Y As Double)| Parameter | Type | Direction |
|---|---|---|
Data | DragData | ByVal |
Effect | DragEffect | ByRef |
X | Double | ByVal |
Y | Double | ByVal |
Occurs while runtime drag data moves over this control; Effect may be updated for the current position.
Private Sub control_DragOver(ByVal Data As DragData, ByRef Effect As DragEffect, ByVal X As Double, ByVal Y As Double)| Parameter | Type | Direction |
|---|---|---|
Data | DragData | ByVal |
Effect | DragEffect | ByRef |
X | Double | ByVal |
Y | Double | ByVal |
Occurs while a control dragged inside the app (DragMode or the Drag method) moves over this control: State is 0 when it enters, 2 while it moves over and 1 when it leaves; Source is the dragged control and X, Y are local DIP coordinates.
Private Sub control_DragOver(ByVal Source As Control, ByVal X As Single, ByVal Y As Single, ByVal State As Integer)| Parameter | Type | Direction |
|---|---|---|
Source | Control | ByVal |
X | Single | ByVal |
Y | Single | ByVal |
State | Integer | ByVal |
Occurs when runtime drag data leaves this control without a drop.
Private Sub control_DragLeave()No parameters.
Occurs when runtime drag data is dropped on this control with a stable McBasic™ effect and local DIP coordinates.
Private Sub control_Drop(ByVal Data As DragData, ByVal Effect As DragEffect, ByVal X As Double, ByVal Y As Double)| Parameter | Type | Direction |
|---|---|---|
Data | DragData | ByVal |
Effect | DragEffect | ByVal |
X | Double | ByVal |
Y | Double | ByVal |
Occurs when a control dragged inside the app (DragMode or the Drag method) is released over this control; Source is the dragged control and X, Y are local DIP coordinates.
Private Sub control_DragDrop(ByVal Source As Control, ByVal X As Single, ByVal Y As Single)| Parameter | Type | Direction |
|---|---|---|
Source | Control | ByVal |
X | Single | ByVal |
Y | Single | ByVal |
Occurs when a pointing-device button is pressed over this control; Button is stable McBasic™ identity and X/Y are control-local DIP coordinates.
Private Sub control_MouseDown(ByVal Button As MouseButton, ByVal Shift As KeyModifiers, ByVal X As Double, ByVal Y As Double)| Parameter | Type | Direction |
|---|---|---|
Button | MouseButton | ByVal |
Shift | KeyModifiers | ByVal |
X | Double | ByVal |
Y | Double | ByVal |
Occurs when a pointing-device button is released for this control; Button is stable McBasic™ identity and X/Y are control-local DIP coordinates.
Private Sub control_MouseUp(ByVal Button As MouseButton, ByVal Shift As KeyModifiers, ByVal X As Double, ByVal Y As Double)| Parameter | Type | Direction |
|---|---|---|
Button | MouseButton | ByVal |
Shift | KeyModifiers | ByVal |
X | Double | ByVal |
Y | Double | ByVal |
Occurs when the pointer moves over the logical McBasic™ control; Button contains the currently held buttons and X/Y are local DIP coordinates.
Private Sub control_MouseMove(ByVal Button As MouseButtons, ByVal Shift As KeyModifiers, ByVal X As Double, ByVal Y As Double)| Parameter | Type | Direction |
|---|---|---|
Button | MouseButtons | ByVal |
Shift | KeyModifiers | ByVal |
X | Double | ByVal |
Y | Double | ByVal |
Occurs once when the pointer enters the effective bounds of the logical McBasic™ control.
Private Sub control_MouseEnter()No parameters.
Occurs once when the pointer leaves the effective bounds of the logical McBasic™ control.
Private Sub control_MouseLeave()No parameters.
Occurs when native system timing recognizes a primary-button double activation on the same logical McBasic™ control.
Private Sub control_DoubleClick()No parameters.
Occurs once when the TabControl receives effective keyboard focus.
Private Sub control_GotFocus()No parameters.
Occurs once when the TabControl loses effective keyboard focus.
Private Sub control_LostFocus()No parameters.
Occurs when a physical key is pressed while this control owns effective keyboard focus; setting Handled suppresses normal processing.
Private Sub control_KeyDown(ByVal KeyCode As KeyCode, ByVal Shift As KeyModifiers, ByRef Handled As Boolean)| Parameter | Type | Direction |
|---|---|---|
KeyCode | KeyCode | ByVal |
Shift | KeyModifiers | ByVal |
Handled | Boolean | ByRef |
Occurs for committed Unicode text input; set Handled to suppress the control default.
Private Sub control_KeyPress(ByVal Character As String, ByRef Handled As Boolean)| Parameter | Type | Direction |
|---|---|---|
Character | String | ByVal |
Handled | Boolean | ByRef |
Occurs when a physical key is released while this control owns effective keyboard focus; setting Handled suppresses normal processing.
Private Sub control_KeyUp(ByVal KeyCode As KeyCode, ByVal Shift As KeyModifiers, ByRef Handled As Boolean)| Parameter | Type | Direction |
|---|---|---|
KeyCode | KeyCode | ByVal |
Shift | KeyModifiers | ByVal |
Handled | Boolean | ByRef |
Sub SetFocus()Call on your instance: tabHost.SetFocus.
20f4bfed6b · Build manifest