MSComCtl2, COM interface constants for VB.Net / VBScript

MSComCtl2 - interface constants

     This page contains simple VBA include for the MSComCtl2 COM library.

library parameters

File NameWINDOWS\system32\MSCOMCT2.OCX
Guid{86CF1D34-0C5F-11D2-A9FC-0000F8754DA1}
Enums17

OLEDropConstants

enum, 2 members.
  'Constants for the OLEDropMode property (but not the DragMode or OLEDragMode properties).
Public Enum OLEDropConstants

  'Accepts no OLE drag/drop operations.
  cc2OLEDropNone = 0  '&H0

  'Accepts an OLE drag/drop under programmatic control only.
  cc2OLEDropManual = 1  '&H1
End Enum

DragOverConstants

enum, 3 members.
  'State transition constants for the DragOver and OLEDragOver events.
Public Enum DragOverConstants

  'Source control dragged into target.
  cc2Enter = 0  '&H0

  'Source control dragged out of target.
  cc2Leave = 1  '&H1

  'Source control dragged from one position in target to another.
  cc2Over = 2  '&H2
End Enum

ClipBoardConstants

enum, 8 members.
  'Clipboard format constants.
Public Enum ClipBoardConstants

  'Text (.txt file).
  cc2CFText = 1  '&H1

  'Bitmap (.bmp file).
  cc2CFBitmap = 2  '&H2

  'Metafile (.wmf file).
  cc2CFMetafile = 3  '&H3

  'Device-independent bitmap.
  cc2CFDIB = 8  '&H8

  'Color palette.
  cc2CFPalette = 9  '&H9

  'Enhanced metafile (.emf file).
  cc2CFEMetafile = 14  '&HE

  'Filename list (Microsoft Windows Explorer)
  cc2CFFiles = 15  '&HF

  'Rich Text Format (.rtf file).
  cc2CFRTF = -16639  '&HFFFFBF01
End Enum

OLEDropEffectConstants

enum, 4 members.
  'Drop effect constants for OLE drag and drop events.
Public Enum OLEDropEffectConstants

  'No OLE drag/drop operation has taken place/would take place.
  cc2OLEDropEffectNone = 0  '&H0

  'A mask to indicate that a copy has taken place/would take place.
  cc2OLEDropEffectCopy = 1  '&H1

  'A mask to indicate that a move has take place/would take place.
  cc2OLEDropEffectMove = 2  '&H2

  'A mask to indicate that the drop target window has scrolled/would scroll.
  cc2OLEDropEffectScroll = -2147483648  '&H80000000
End Enum

ErrorConstants

enum, 46 members.
  'Error Constants
Public Enum ErrorConstants

  'Bad file name or number
  cc2BadFileNameOrNumber = 52  '&H34

  'File not found
  cc2FileNotFound = 53  '&H35

  'Invalid property value
  cc2InvalidPropertyValue = 380  '&H17C

  'Property cannot be set at run time
  cc2SetNotSupportedAtRuntime = 382  '&H17E

  'Property is read-only
  cc2SetNotSupported = 383  '&H17F

  'Property is write-only
  cc2GetNotSupported = 394  '&H18A

  'DataObject formats list may not be cleared or expanded outside of the OLEStartDrag event
  cc2DataObjectLocked = 672  '&H2A0

  'Expected at least one argument.
  cc2ExpectedAnArgument = 673  '&H2A1

  'Invalid procedure call
  cc2InvalidProcedureCall = 5  '&H5

  'Invalid object use
  cc2InvalidObjectUse = 425  '&H1A9

  'Specified format doesn't match format of data
  cc2WrongClipboardFormat = 461  '&H1CD

  'Illegal recursive invocation of OLE drag and drop
  cc2RecursiveOleDrag = 674  '&H2A2

  'Non-intrinsic OLE drag and drop formats used with SetData require Byte array data.  GetData may return more bytes than were given to SetData.
  cc2FormatNotByteArray = 675  '&H2A3

  'Requested data was not supplied to the DataObject during the OLESetData event.
  cc2DataNotSetForFormat = 676  '&H2A4

  'Internal state of the control has become corrupted
  cc2InconsistentObject = 35750  '&H8BA6

  'Unable to set property
  cc2ErrorDuringSet = 35751  '&H8BA7

  'Unable to open AVI file
  cc2ErrorOpeningVideo = 35752  '&H8BA8

  'Unable to play AVI file
  cc2ErrorPlayingVideo = 35753  '&H8BA9

  'Must open AVI file first
  cc2VideoNotOpen = 35755  '&H8BAB

  'Error trying to stop playing AVI file
  cc2ErrorStoppingVideo = 35757  '&H8BAD

  'Error closing open AVI file
  cc2ErrorClosingVideo = 35758  '&H8BAE

  'Stop method does not effect AutoPlay property
  cc2CantStopAutoPlay = 35759  '&H8BAF

  'BuddyControl property must be set first
  cc2NoValidBuddyCtl = 35754  '&H8BAA

  'AutoBuddy not set, no potential buddy controls found
  cc2AutoBuddyNotSet = 35756  '&H8BAC

  'BuddyControl must be a separate control within the same container
  cc2BuddyNotASibling = 35760  '&H8BB0

  'An UpDown control cannot be buddied with another UpDown control
  cc2NoUpDownAsBuddy = 35761  '&H8BB1

  'An invalid date range was specified.
  cc2InvalidRange = 35770  '&H8BBA

  'An invalid date was specified for the MaxDate property.
  cc2InvalidMaxDate = 35771  '&H8BBB

  'An invalid date was specified for the MinDate property.
  cc2InvalidMinDate = 35772  '&H8BBC

  'A date was specified that does not fall within the MinDate and MaxDate properties.
  cc2DateOutOfRange = 35773  '&H8BBD

  'A value was specified for the MaxDate property that is lower than the current value of MinDate.
  cc2InvalidMaxDateMin = 35774  '&H8BBE

  'A value was specified for the MinDate property that is higher than the current value of MaxDate.
  cc2InvalidMinDateMax = 35775  '&H8BBF

  'A value was specified for MonthRows or MonthColumns that is not between 1 and 12.
  cc2InvalidRowColValue = 35776  '&H8BC0

  'A value was specified for MonthRows or MonthColumns that would cause the total number of months (i.e. MonthRows * MonthCols) to be greater than 12.
  cc2InvalidRowColTotal = 35777  '&H8BC1

  'An error occurred in a call to the Windows MonthView control.
  cc2MonthViewError = 35778  '&H8BC2

  'Can't set Day property when MultiSelect = True.
  cc2SetDayMultiSelectOn = 35779  '&H8BC3

  'Can't set DayOfWeek property when MultiSelect = True.
  cc2SetDayOfWeekMultiSelectOn = 35780  '&H8BC4

  'Can't set Month property when MultiSelect = True.
  cc2SetMonthMultiSelectOn = 35781  '&H8BC5

  'Can't set Week property when MultiSelect = True.
  cc2SetWeekMultiSelectOn = 35782  '&H8BC6

  'Can't set Year property when MultiSelect = True.
  cc2SetYearMultiSelectOn = 35783  '&H8BC7

  'Can't set MaxSelCount property when MultiSelect = False.
  cc2SetMaxSelCountMultiSelectOff = 35784  '&H8BC8

  'Can't set SelEnd property when MultiSelect = False.
  cc2SetSelEndMultiSelectOff = 35785  '&H8BC9

  'Can't set SelStart property when MultiSelect = False.
  cc2SetSelStartMultiSelectOff = 35786  '&H8BCA

  'Can't set Value to NULL when CheckBox property = FALSE.
  cc2NullValueNotAllowed = 35787  '&H8BCB

  'An error occurred in a call to the Windows Date and Time Picker control.
  cc2DTPickerError = 35788  '&H8BCC

  'Scroll value is out of range.
  cc2ScrollValueOutOfRange = 35789  '&H8BCD
End Enum

AppearanceConstants

enum, 2 members.
  'Appearance constants
Public Enum AppearanceConstants

  'Flat
  cc2Flat = 0  '&H0

  '3D
  cc23D = 1  '&H1
End Enum

BorderStyleConstants

enum, 2 members.
  'BorderStyle constants
Public Enum BorderStyleConstants

  'None
  cc2None = 0  '&H0

  'Fixed Single
  cc2FixedSingle = 1  '&H1
End Enum

MousePointerConstants

enum, 17 members.
  'MousePointer constants
Public Enum MousePointerConstants

  'Default
  cc2Default = 0  '&H0

  'Arrow mouse pointer
  cc2Arrow = 1  '&H1

  'Cross mouse pointer
  cc2Cross = 2  '&H2

  'I-Beam mouse pointer
  cc2IBeam = 3  '&H3

  'Icon mouse pointer
  cc2Icon = 4  '&H4

  'Size mouse pointer
  cc2Size = 5  '&H5

  'Size NE SW mouse pointer
  cc2SizeNESW = 6  '&H6

  'Size N S mouse pointer
  cc2SizeNS = 7  '&H7

  'Size NW SE mouse pointer
  cc2SizeNWSE = 8  '&H8

  'Size W E mouse pointer
  cc2SizeEW = 9  '&H9

  'Up arrow mouse pointer
  cc2UpArrow = 10  '&HA

  'Hourglass mouse pointer
  cc2Hourglass = 11  '&HB

  'No drop mouse pointer
  cc2NoDrop = 12  '&HC

  'Arrow and Hourglass mouse pointer
  cc2ArrowHourglass = 13  '&HD

  'Arrow and Question mark mouse pointer
  cc2ArrowQuestion = 14  '&HE

  'Size all mouse pointer
  cc2SizeAll = 15  '&HF

  'Custom mouse pointer icon specified by the MouseIcon property
  cc2Custom = 99  '&H63
End Enum

OrientationConstants

enum, 2 members.
  'Orientations
Public Enum OrientationConstants

  'Vertical
  cc2OrientationVertical = 0  '&H0

  'Horizontal
  cc2OrientationHorizontal = 1  '&H1
End Enum

BackStyleConstants

enum, 2 members.
  'Background Style Constants
Public Enum BackStyleConstants

  'Transparent
  cc2BackstyleTransparent = 0  '&H0

  'Opaque
  cc2BackstyleOpaque = 1  '&H1
End Enum

AlignmentConstants

enum, 2 members.
  'Alignments
Public Enum AlignmentConstants

  'Left Align
  cc2AlignmentLeft = 0  '&H0

  'Right Align
  cc2AlignmentRight = 1  '&H1
End Enum

DayConstants

enum, 7 members.
  'Day Constants
Public Enum DayConstants

  'Sunday
  mvwSunday = 1  '&H1

  'Monday
  mvwMonday = 2  '&H2

  'Tuesday
  mvwTuesday = 3  '&H3

  'Wednesday
  mvwWednesday = 4  '&H4

  'Thursday
  mvwThursday = 5  '&H5

  'Friday
  mvwFriday = 6  '&H6

  'Saturday
  mvwSaturday = 7  '&H7
End Enum

MonthConstants

enum, 12 members.
  'Month Constants
Public Enum MonthConstants

  'January
  mvwJanuary = 1  '&H1

  'February
  mvwFebruary = 2  '&H2

  'March
  mvwMarch = 3  '&H3

  'April
  mvwApril = 4  '&H4

  'May
  mvwMay = 5  '&H5

  'June
  mvwJune = 6  '&H6

  'July
  mvwJuly = 7  '&H7

  'August
  mvwAugust = 8  '&H8

  'September
  mvwSeptember = 9  '&H9

  'October
  mvwOctober = 10  '&HA

  'November
  mvwNovember = 11  '&HB

  'December
  mvwDecember = 12  '&HC
End Enum

MonthViewHitTestAreas

enum, 13 members.
  'HitTest Constants
Public Enum MonthViewHitTestAreas

  'Calendar Background
  mvwCalendarBack = 0  '&H0

  'Calendar Date
  mvwCalendarDate = 1  '&H1

  'Calendar Date Next Month
  mvwCalendarDateNext = 2  '&H2

  'Calendar Date Previous Month
  mvwCalendarDatePrev = 3  '&H3

  'Calendar Day
  mvwCalendarDay = 4  '&H4

  'Calendar Week Number
  mvwCalendarWeekNum = 5  '&H5

  'Nowhere
  mvwNoWhere = 6  '&H6

  'Title Background
  mvwTitleBack = 7  '&H7

  'Title Button Next
  mvwTitleBtnNext = 8  '&H8

  'Title Button Previous
  mvwTitleBtnPrev = 9  '&H9

  'Title Month
  mvwTitleMonth = 10  '&HA

  'Title Year
  mvwTitleYear = 11  '&HB

  'Today Link
  mvwTodayLink = 12  '&HC
End Enum

FormatConstants

enum, 4 members.
  'Format Constants
Public Enum FormatConstants

  'Display date in long format, e.g. 'Friday, Sept 2, 1974'.
  dtpLongDate = 0  '&H0

  'Display date in short format, e.g. '9/2/74'.
  dtpShortDate = 1  '&H1

  'Display time in standard format, e.g. '5:31:42 PM'.
  dtpTime = 2  '&H2

  'Display date and time using the format string specified in the 'CustomFormat' property.
  dtpCustom = 3  '&H3
End Enum

FlatScrollBarAppearanceConstants

enum, 3 members.
  'Flat Scrollbar Appearance Constants
Public Enum FlatScrollBarAppearanceConstants

  'A normal, non-flat scrollbar is displayed.  No special visual effects are applied.
  fsb3D = 0  '&H0

  'A standard flat scrollbar is displayed.  When the mouse moves over a direction button or the thumb, that portion of the scrollbar will be displayed in inverted colors.
  fsbFlat = 1  '&H1

  'A flat scrollbar is displayed.  When the mouse moves over a direction button or the thumb, that portion of the scrollbar will be displayed in 3D.
  fsbTrack3D = 2  '&H2
End Enum

ArrowsConstants

enum, 3 members.
  'Arrows Constants
Public Enum ArrowsConstants

  'Enables both direction buttons.
  cc2Both = 0  '&H0

  'Enables only the left or up button, depending on whether the orientation is vertical or horizontal.
  cc2LeftUp = 1  '&H1

  'Enables only the right or down button, depending on whether the orientation is vertical or horizontal.
  cc2RightDown = 2  '&H2
End Enum
WUtils.com