modhiparser.bas

来自「一个把VB原代码转换为VC原代码的软件代码。」· BAS 代码 · 共 837 行 · 第 1/5 页

    AddBuiltinEnum "DataValidateConstants", False, False, "vbDataActionMoveFirst", "1", True
    AddBuiltinEnum "DataValidateConstants", False, False, "vbDataActionMoveLast", "4", True
    AddBuiltinEnum "DataValidateConstants", False, False, "vbDataActionMoveNext", "3", True
    AddBuiltinEnum "DataValidateConstants", False, False, "vbDataActionMovePrevious", "2", True
    AddBuiltinEnum "DataValidateConstants", False, False, "vbDataActionUnload", "11", True
    AddBuiltinEnum "DataValidateConstants", False, True, "vbDataActionUpdate", "6", True

    AddBuiltinEnum "DefaultCursorTypeConstants", True, False, "vbUseDefaultCursor", "0", True
    AddBuiltinEnum "DefaultCursorTypeConstants", False, False, "vbUseODBCCursor", "1", True
    AddBuiltinEnum "DefaultCursorTypeConstants", False, True, "vbUseServersideCursor", "2", True

    AddBuiltinEnum "DragConstants", True, False, "vbBeginDrag", "1", True
    AddBuiltinEnum "DragConstants", False, False, "vbCancel", "0", True
    AddBuiltinEnum "DragConstants", False, True, "vbEndDrag", "2", True

    AddBuiltinEnum "DragModeConstants", True, False, "vbAutomatic", "1", True
    AddBuiltinEnum "DragModeConstants", False, True, "vbManual", "0", True

    AddBuiltinEnum "DragOverConstants", True, False, "vbEnter", "0", True
    AddBuiltinEnum "DragOverConstants", False, False, "vbLeave", "1", True
    AddBuiltinEnum "DragOverConstants", False, True, "vbOver", "2", True

    AddBuiltinEnum "DrawModeConstants", True, False, "vbBlackness", "1", True
    AddBuiltinEnum "DrawModeConstants", False, False, "vbCopyPen", "13", True
    AddBuiltinEnum "DrawModeConstants", False, False, "vbInvert", "6", True
    AddBuiltinEnum "DrawModeConstants", False, False, "vbMaskNotPen", "3", True
    AddBuiltinEnum "DrawModeConstants", False, False, "vbMaskPen", "9", True
    AddBuiltinEnum "DrawModeConstants", False, False, "vbMaskPenNot", "5", True
    AddBuiltinEnum "DrawModeConstants", False, False, "vbMergeNotPen", "12", True
    AddBuiltinEnum "DrawModeConstants", False, False, "vbMergePen", "15", True
    AddBuiltinEnum "DrawModeConstants", False, False, "vbMergePenNot", "14", True
    AddBuiltinEnum "DrawModeConstants", False, False, "vbNop", "11", True
    AddBuiltinEnum "DrawModeConstants", False, False, "vbNotCopyPen", "4", True
    AddBuiltinEnum "DrawModeConstants", False, False, "vbNotMaskPen", "8", True
    AddBuiltinEnum "DrawModeConstants", False, False, "vbNotMergePen", "2", True
    AddBuiltinEnum "DrawModeConstants", False, False, "vbNotXorPen", "10", True
    AddBuiltinEnum "DrawModeConstants", False, False, "vbWhiteness", "16", True
    AddBuiltinEnum "DrawModeConstants", False, True, "vbXorPen", "7", True

    AddBuiltinEnum "DrawStyleConstants", True, False, "vbDash", "1", True
    AddBuiltinEnum "DrawStyleConstants", False, False, "vbDashDot", "3", True
    AddBuiltinEnum "DrawStyleConstants", False, False, "vbDashDotDot", "4", True
    AddBuiltinEnum "DrawStyleConstants", False, False, "vbDot", "2", True
    AddBuiltinEnum "DrawStyleConstants", False, False, "vbInsideSolid", "6", True
    AddBuiltinEnum "DrawStyleConstants", False, False, "vbInvisible", "5", True
    AddBuiltinEnum "DrawStyleConstants", False, True, "vbSolid", "0", True

    AddBuiltinEnum "FillStyleConstants", True, False, "vbCross", "6", True
    AddBuiltinEnum "FillStyleConstants", False, False, "vbDiagonalCross", "7", True
    AddBuiltinEnum "FillStyleConstants", False, False, "vbDownwardDiagonal", "5", True
    AddBuiltinEnum "FillStyleConstants", False, False, "vbFSSolid", "0", True
    AddBuiltinEnum "FillStyleConstants", False, False, "vbFSTransparent", "1", True
    AddBuiltinEnum "FillStyleConstants", False, False, "vbHorizontalLine", "2", True
    AddBuiltinEnum "FillStyleConstants", False, False, "vbUpwardDiagonal", "4", True
    AddBuiltinEnum "FillStyleConstants", False, True, "vbVerticalLine", "3", True

    AddBuiltinEnum "FormArrangeConstants", True, False, "vbArrangeIcons", "3", True
    AddBuiltinEnum "FormArrangeConstants", False, False, "vbCascade", "0", True
    AddBuiltinEnum "FormArrangeConstants", False, False, "vbTileHorizontal", "1", True
    AddBuiltinEnum "FormArrangeConstants", False, True, "vbTileVertical", "2", True

    AddBuiltinEnum "FormBorderStyleConstants", True, False, "vbBSNone", "0", True
    AddBuiltinEnum "FormBorderStyleConstants", False, False, "vbFixedDialog", "3", True
    AddBuiltinEnum "FormBorderStyleConstants", False, False, "vbFixedSingle", "1", True
    AddBuiltinEnum "FormBorderStyleConstants", False, False, "vbFixedToolWindow", "4", True
    AddBuiltinEnum "FormBorderStyleConstants", False, False, "vbSizable", "2", True
    AddBuiltinEnum "FormBorderStyleConstants", False, True, "vbSizableToolWindow", "5", True

    AddBuiltinEnum "FormShowConstants", True, False, "vbModal", "1", True
    AddBuiltinEnum "FormShowConstants", False, True, "vbModeless", "0", True
    
    AddBuiltinEnum "FormWindowStateConstants", True, False, "vbMaximized", "2", True
    AddBuiltinEnum "FormWindowStateConstants", False, False, "vbMinimized", "1", True
    AddBuiltinEnum "FormWindowStateConstants", False, True, "vbNormal", "0", True
    
    AddBuiltinEnum "HitResultConstants", True, False, "vbHitResultClose", "2", True
    AddBuiltinEnum "HitResultConstants", False, False, "vbHitResultHit", "3", True
    AddBuiltinEnum "HitResultConstants", False, False, "vbHitResultOutside", "0", True
    AddBuiltinEnum "HitResultConstants", False, True, "vbHitResultTransparent", "1", True
    
    AddBuiltinEnum "LinkErrorConstants", True, False, "vbDataTransferFailed", "8", True
    AddBuiltinEnum "LinkErrorConstants", False, False, "vbDDESourceClosed", "6", True
    AddBuiltinEnum "LinkErrorConstants", False, False, "vbTooManyLinks", "7", True
    AddBuiltinEnum "LinkErrorConstants", False, True, "vbWrongFormat", "1", True
    
    AddBuiltinEnum "LinkModeConstants", True, False, "vbLinkAutomatic", "1", True
    AddBuiltinEnum "LinkModeConstants", False, False, "vbLinkManual", "2", True
    AddBuiltinEnum "LinkModeConstants", False, False, "vbLinkNone", "0", True
    AddBuiltinEnum "LinkModeConstants", False, True, "vbLinkNotify", "3", True
    
    AddBuiltinEnum "ListBoxConstants", True, False, "vbListBoxCheckbox", "1", True
    AddBuiltinEnum "ListBoxConstants", False, True, "vbListBoxStandard", "0", True
    
    AddBuiltinEnum "LoadPictureColorConstants", True, False, "vbLPColor", "3", True
    AddBuiltinEnum "LoadPictureColorConstants", False, False, "vbLPDefault", "0", True
    AddBuiltinEnum "LoadPictureColorConstants", False, False, "vbLPMonochrome", "1", True
    AddBuiltinEnum "LoadPictureColorConstants", False, True, "vbLPVGAColor", "2", True
    
    AddBuiltinEnum "LoadPictureSizeConstants", True, False, "vbLPCustom", "4", True
    AddBuiltinEnum "LoadPictureSizeConstants", False, False, "vbLPLarge", "1", True
    AddBuiltinEnum "LoadPictureSizeConstants", False, False, "vbLPLargeShell", "3", True
    AddBuiltinEnum "LoadPictureSizeConstants", False, False, "vbLPSmall", "0", True
    AddBuiltinEnum "LoadPictureSizeConstants", False, True, "vbLPSmallShell", "2", True
    
    AddBuiltinEnum "LoadResConstants", True, False, "vbResBitmap", "0", True
    AddBuiltinEnum "LoadResConstants", False, False, "vbResCursor", "2", True
    AddBuiltinEnum "LoadResConstants", False, True, "vbResIcon", "1", True
    
    AddBuiltinEnum "LogEventTypeConstants", True, False, "vbLogEventTypeError", "1", True
    AddBuiltinEnum "LogEventTypeConstants", False, False, "vbLogEventTypeInformation", "4", True
    AddBuiltinEnum "LogEventTypeConstants", False, True, "vbLogEventTypeWarning", "2", True
    
    AddBuiltinEnum "LogModeConstants", True, False, "vbLogAuto", "0", True
    AddBuiltinEnum "LogModeConstants", False, False, "vbLogOff", "1", True
    AddBuiltinEnum "LogModeConstants", False, False, "vbLogOverwrite", "16", True
    AddBuiltinEnum "LogModeConstants", False, False, "vbLogThreadID", "32", True
    AddBuiltinEnum "LogModeConstants", False, False, "vbLogToFile", "2", True
    AddBuiltinEnum "LogModeConstants", False, True, "vbLogToNT", "3", True
    
    AddBuiltinEnum "MenuAccelConstants", True, False, "vbMenuAccelAltBksp", "75", True
    AddBuiltinEnum "MenuAccelConstants", False, False, "vbMenuAccelCtrlA", "1", True
    AddBuiltinEnum "MenuAccelConstants", False, False, "vbMenuAccelCtrlB", "2", True
    AddBuiltinEnum "MenuAccelConstants", False, False, "vbMenuAccelCtrlC", "3", True
    AddBuiltinEnum "MenuAccelConstants", False, False, "vbMenuAccelCtrlD", "4", True
    AddBuiltinEnum "MenuAccelConstants", False, False, "vbMenuAccelCtrlE", "5", True
    AddBuiltinEnum "MenuAccelConstants", False, False, "vbMenuAccelCtrlF", "6", True
    AddBuiltinEnum "MenuAccelConstants", False, False, "vbMenuAccelCtrlF1", "38", True
    AddBuiltinEnum "MenuAccelConstants", False, False, "vbMenuAccelCtrlF11", "47", True
    AddBuiltinEnum "MenuAccelConstants", False, False, "vbMenuAccelCtrlF12", "48", True
    AddBuiltinEnum "MenuAccelConstants", False, False, "vbMenuAccelCtrlF2", "39", True
    AddBuiltinEnum "MenuAccelConstants", False, False, "vbMenuAccelCtrlF3", "40", True
    AddBuiltinEnum "MenuAccelConstants", False, False, "vbMenuAccelCtrlF4", "41", True
    AddBuiltinEnum "MenuAccelConstants", False, False, "vbMenuAccelCtrlF5", "42", True
    AddBuiltinEnum "MenuAccelConstants", False, False, "vbMenuAccelCtrlF6", "43", True
    AddBuiltinEnum "MenuAccelConstants", False, False, "vbMenuAccelCtrlF7", "44", True
    AddBuiltinEnum "MenuAccelConstants", False, False, "vbMenuAccelCtrlF8", "45", True
    AddBuiltinEnum "MenuAccelConstants", False, False, "vbMenuAccelCtrlF9", "46", True
    AddBuiltinEnum "MenuAccelConstants", False, False, "vbMenuAccelCtrlG", "7", True
    AddBuiltinEnum "MenuAccelConstants", False, False, "vbMenuAccelCtrlH", "8", True
    AddBuiltinEnum "MenuAccelConstants", False, False, "vbMenuAccelCtrlI", "9", True
    AddBuiltinEnum "MenuAccelConstants", False, False, "vbMenuAccelCtrlIns", "71", True
    AddBuiltinEnum "MenuAccelConstants", False, False, "vbMenuAccelCtrlJ", "10", True
    AddBuiltinEnum "MenuAccelConstants", False, False, "vbMenuAccelCtrlK", "11", True
    AddBuiltinEnum "MenuAccelConstants", False, False, "vbMenuAccelCtrlL", "12", True
    AddBuiltinEnum "MenuAccelConstants", False, False, "vbMenuAccelCtrlM", "13", True
    AddBuiltinEnum "MenuAccelConstants", False, False, "vbMenuAccelCtrlN", "14", True
    AddBuiltinEnum "MenuAccelConstants", False, False, "vbMenuAccelCtrlO", "15", True
    AddBuiltinEnum "MenuAccelConstants", False, False, "vbMenuAccelCtrlP", "16", True
    AddBuiltinEnum "MenuAccelConstants", False, False, "vbMenuAccelCtrlQ", "17", True
    AddBuiltinEnum "MenuAccelConstants", False, False, "vbMenuAccelCtrlR", "18", True
    AddBuiltinEnum "MenuAccelConstants", False, False, "vbMenuAccelCtrlS", "19", True
    AddBuiltinEnum "MenuAccelConstants", False, False, "vbMenuAccelCtrlT", "20", True
    AddBuiltinEnum "MenuAccelConstants", False, False, "vbMenuAccelCtrlU", "21", True
    AddBuiltinEnum "MenuAccelConstants", False, False, "vbMenuAccelCtrlV", "22", True
    AddBuiltinEnum "MenuAccelConstants", False, False, "vbMenuAccelCtrlW", "23", True
    AddBuiltinEnum "MenuAccelConstants", False, False, "vbMenuAccelCtrlX", "24", True
    AddBuiltinEnum "MenuAccelConstants", False, False, "vbMenuAccelCtrlY", "25", True
    AddBuiltinEnum "MenuAccelConstants", False, False, "vbMenuAccelCtrlZ", "26", True
    AddBuiltinEnum "MenuAccelConstants", False, False, "vbMenuAccelDel", "73", True
    AddBuiltinEnum "MenuAccelConstants", False, False, "vbMenuAccelF1", "27", True
    AddBuiltinEnum "MenuAccelConstants", False, False, "vbMenuAccelF11", "36", True
    AddBuiltinEnum "MenuAccelConstants", False, False, "vbMenuAccelF12", "37", True
    AddBuiltinEnum "MenuAccelConstants", False, False, "vbMenuAccelF2", "28", True
    AddBuiltinEnum "MenuAccelConstants", False, False, "vbMenuAccelF3", "29", True
    AddBuiltinEnum "MenuAccelConstants", False, False, "vbMenuAccelF4", "30", True
    AddBuiltinEnum "MenuAccelConstants", False, False, "vbMenuAccelF5", "31", True
    AddBuiltinEnum "MenuAccelConstants", False, False, "vbMenuAccelF6", "32", True
    AddBuiltinEnum "MenuAccelConstants", False, False, "vbMenuAccelF7", "33", True