modhiparser.bas

来自「把VB 源码转化为VC源码的程序」· BAS 代码 · 共 837 行 · 第 1/5 页

    AddBuiltinEnum "VbMsgBoxStyle", False, False, "vbInformation", "64", True
    AddBuiltinEnum "VbMsgBoxStyle", False, False, "vbMsgBoxHelpButton", "16384", True
    AddBuiltinEnum "VbMsgBoxStyle", False, False, "vbMsgBoxRight", "524288", True
    AddBuiltinEnum "VbMsgBoxStyle", False, False, "vbMsgBoxRtlReading", "1048576", True
    AddBuiltinEnum "VbMsgBoxStyle", False, False, "vbMsgBoxSetForeground", "65536", True
    AddBuiltinEnum "VbMsgBoxStyle", False, False, "vbOKCancel", "1", True
    AddBuiltinEnum "VbMsgBoxStyle", False, False, "vbOKOnly", "0", True
    AddBuiltinEnum "VbMsgBoxStyle", False, False, "vbQuestion", "32", True
    AddBuiltinEnum "VbMsgBoxStyle", False, False, "vbRetryCancel", "5", True
    AddBuiltinEnum "VbMsgBoxStyle", False, False, "vbSystemModal", "4096", True
    AddBuiltinEnum "VbMsgBoxStyle", False, False, "vbYesNo", "4", True
    AddBuiltinEnum "VbMsgBoxStyle", False, True, "vbYesNoCancel", "3", True
   
    AddBuiltinEnum "ColorConstants", True, False, "vbBlack", "0", True
    AddBuiltinEnum "ColorConstants", False, False, "vbBlue", "16711680", True
    AddBuiltinEnum "ColorConstants", False, False, "vbCyan", "16776960", True
    AddBuiltinEnum "ColorConstants", False, False, "vbGreen", "65280", True
    AddBuiltinEnum "ColorConstants", False, False, "vbMagenta", "16711935", True
    AddBuiltinEnum "ColorConstants", False, False, "vbRed", "255", True
    AddBuiltinEnum "ColorConstants", False, False, "vbWhite", "16777215", True
    AddBuiltinEnum "ColorConstants", False, True, "vbYellow", "65535", True
    
    AddBuiltinEnum "SystemColorConstants", True, False, "vb3DDKShadow", "-2147483627", True
    AddBuiltinEnum "SystemColorConstants", False, False, "vb3DFace", "-2147483633", True
    AddBuiltinEnum "SystemColorConstants", False, False, "vb3DHighlight", "-2147483628", True
    AddBuiltinEnum "SystemColorConstants", False, False, "vb3DLight", "-2147483626", True
    AddBuiltinEnum "SystemColorConstants", False, False, "vb3DShadow", "-2147483632", True
    AddBuiltinEnum "SystemColorConstants", False, False, "vbActiveBorder", "-2147483638", True
    AddBuiltinEnum "SystemColorConstants", False, False, "vbActiveTitleBar", "-2147483646", True
    AddBuiltinEnum "SystemColorConstants", False, False, "vbActiveTitleBarText", "-2147483639", True
    AddBuiltinEnum "SystemColorConstants", False, False, "vbApplicationWorkspace", "-2147483636", True
    AddBuiltinEnum "SystemColorConstants", False, False, "vbButtonFace", "-2147483633", True
    AddBuiltinEnum "SystemColorConstants", False, False, "vbButtonShadow", "-2147483632", True
    AddBuiltinEnum "SystemColorConstants", False, False, "vbButtonText", "-2147483630", True
    AddBuiltinEnum "SystemColorConstants", False, False, "vbDesktop", "-2147483647", True
    AddBuiltinEnum "SystemColorConstants", False, False, "vbGrayText", "-2147483631", True
    AddBuiltinEnum "SystemColorConstants", False, False, "vbHighlight", "-2147483635", True
    AddBuiltinEnum "SystemColorConstants", False, False, "vbHighlightText", "-2147483634", True
    AddBuiltinEnum "SystemColorConstants", False, False, "vbInactiveBorder", "-2147483637", True
    AddBuiltinEnum "SystemColorConstants", False, False, "vbInactiveCaptionText", "-2147483629", True
    AddBuiltinEnum "SystemColorConstants", False, False, "vbInactiveTitleBar", "-2147483645", True
    AddBuiltinEnum "SystemColorConstants", False, False, "vbInactiveTitleBarText", "-2147483629", True
    AddBuiltinEnum "SystemColorConstants", False, False, "vbInfoBackground", "-2147483624", True
    AddBuiltinEnum "SystemColorConstants", False, False, "vbInfoText", "-2147483625", True
    AddBuiltinEnum "SystemColorConstants", False, False, "vbMenuBar", "-2147483644", True
    AddBuiltinEnum "SystemColorConstants", False, False, "vbMenuText", "-2147483641", True
    AddBuiltinEnum "SystemColorConstants", False, False, "vbScrollBars", "-2147483648", True
    AddBuiltinEnum "SystemColorConstants", False, False, "vbTitleBarText", "-2147483639", True
    AddBuiltinEnum "SystemColorConstants", False, False, "vbWindowBackground", "-2147483643", True
    AddBuiltinEnum "SystemColorConstants", False, False, "vbWindowFrame", "-2147483642", True
    AddBuiltinEnum "SystemColorConstants", False, True, "vbWindowText", "-2147483640", True
      
    AddBuiltinEnum "VbAppWinStyle", True, False, "vbHide", "0", True
    AddBuiltinEnum "VbAppWinStyle", False, False, "vbMaximizedFocus", "3", True
    AddBuiltinEnum "VbAppWinStyle", False, False, "vbMinimizedFocus", "2", True
    AddBuiltinEnum "VbAppWinStyle", False, False, "vbMinimizedNoFocus", "6", True
    AddBuiltinEnum "VbAppWinStyle", False, False, "vbNormalFocus", "1", True
    AddBuiltinEnum "VbAppWinStyle", False, True, "vbNormalNoFocus", "4", True
      
    AddBuiltinEnum "VbCalendar", True, False, "vbCalGreg", "0", True
    AddBuiltinEnum "VbCalendar", False, True, "vbCalHijri", "1", True
      
    AddBuiltinEnum "VbCallType", True, False, "VbGet", "2", True
    AddBuiltinEnum "VbCallType", False, False, "VbLet", "4", True
    AddBuiltinEnum "VbCallType", False, False, "VbMethod", "1", True
    AddBuiltinEnum "VbCallType", False, True, "VbSet", "8", True
      
    AddBuiltinEnum "VbDateTimeFormat", True, False, "vbGeneralDate", "0", True
    AddBuiltinEnum "VbDateTimeFormat", False, False, "vbLongDate", "1", True
    AddBuiltinEnum "VbDateTimeFormat", False, False, "vbLongTime", "3", True
    AddBuiltinEnum "VbDateTimeFormat", False, False, "vbShortDate", "2", True
    AddBuiltinEnum "VbDateTimeFormat", False, True, "vbShortTime", "4", True
            
    AddBuiltinEnum "VbDayOfWeek", True, False, "vbFriday", "6", True
    AddBuiltinEnum "VbDayOfWeek", False, False, "vbMonday", "2", True
    AddBuiltinEnum "VbDayOfWeek", False, False, "vbSaturday", "7", True
    AddBuiltinEnum "VbDayOfWeek", False, False, "vbSunday", "1", True
    AddBuiltinEnum "VbDayOfWeek", False, False, "vbThursday", "5", True
    AddBuiltinEnum "VbDayOfWeek", False, False, "vbTuesday", "3", True
    AddBuiltinEnum "VbDayOfWeek", False, False, "vbUseSystemDayOfWeek", "0", True
    AddBuiltinEnum "VbDayOfWeek", False, True, "vbWednesday", "4", True
            
    AddBuiltinEnum "VbFileAttribute", True, False, "vbAlias", "64", True
    AddBuiltinEnum "VbFileAttribute", False, False, "vbArchive", "32", True
    AddBuiltinEnum "VbFileAttribute", False, False, "vbDirectory", "16", True
    AddBuiltinEnum "VbFileAttribute", False, False, "vbHidden", "2", True
    AddBuiltinEnum "VbFileAttribute", False, False, "vbNormal", "0", True
    AddBuiltinEnum "VbFileAttribute", False, False, "vbReadOnly", "1", True
    AddBuiltinEnum "VbFileAttribute", False, False, "vbSystem", "4", True
    AddBuiltinEnum "VbFileAttribute", False, True, "vbVolume", "8", True
       
    AddBuiltinEnum "VbFirstWeekOfYear", True, False, "vbFirstFourDays", "2", True
    AddBuiltinEnum "VbFirstWeekOfYear", False, False, "vbFirstFullWeek", "3", True
    AddBuiltinEnum "VbFirstWeekOfYear", False, False, "vbFirstJan1", "1", True
    AddBuiltinEnum "VbFirstWeekOfYear", False, True, "vbUseSystem", "0", True
       
    AddBuiltinEnum "VbIMEStatus", True, False, "vbIMEAlphaDbl", "7", True
    AddBuiltinEnum "VbIMEStatus", False, False, "vbIMEAlphaSng", "8", True
    AddBuiltinEnum "VbIMEStatus", False, False, "vbIMEDisable", "3", True
    AddBuiltinEnum "VbIMEStatus", False, False, "vbIMEHiragana", "4", True
    AddBuiltinEnum "VbIMEStatus", False, False, "vbIMEKatakanaDbl", "5", True
    AddBuiltinEnum "VbIMEStatus", False, False, "vbIMEKatakanaSng", "6", True
    AddBuiltinEnum "VbIMEStatus", False, False, "vbIMEModeAlpha", "8", True
    AddBuiltinEnum "VbIMEStatus", False, False, "vbIMEModeAlphaFull", "7", True
    AddBuiltinEnum "VbIMEStatus", False, False, "vbIMEModeDisable", "3", True
    AddBuiltinEnum "VbIMEStatus", False, False, "vbIMEModeHangul", "10", True
    AddBuiltinEnum "VbIMEStatus", False, False, "vbIMEModeHangulFull", "9", True
    AddBuiltinEnum "VbIMEStatus", False, False, "vbIMEModeHiragana", "4", True
    AddBuiltinEnum "VbIMEStatus", False, False, "vbIMEModeKatakana", "5", True
    AddBuiltinEnum "VbIMEStatus", False, False, "vbIMEModeKatakanaHalf", "6", True
    AddBuiltinEnum "VbIMEStatus", False, False, "vbIMEModeNoControl", "0", True
    AddBuiltinEnum "VbIMEStatus", False, False, "vbIMEModeOff", "2", True
    AddBuiltinEnum "VbIMEStatus", False, False, "vbIMEModeOn", "1", True
    AddBuiltinEnum "VbIMEStatus", False, False, "vbIMENoOp", "0", True
    AddBuiltinEnum "VbIMEStatus", False, False, "vbIMEOff", "2", True
    AddBuiltinEnum "VbIMEStatus", False, True, "vbIMEOn", "1", True

    AddBuiltinEnum "VbStrConv", True, False, "vbFromUnicode", "128", True
    AddBuiltinEnum "VbStrConv", False, False, "vbHiragana", "32", True
    AddBuiltinEnum "VbStrConv", False, False, "vbKatakana", "16", True
    AddBuiltinEnum "VbStrConv", False, False, "vbLowerCase", "2", True
    AddBuiltinEnum "VbStrConv", False, False, "vbNarrow", "8", True
    AddBuiltinEnum "VbStrConv", False, False, "vbProperCase", "3", True
    AddBuiltinEnum "VbStrConv", False, False, "vbUnicode", "64", True
    AddBuiltinEnum "VbStrConv", False, False, "vbUpperCase", "1", True
    AddBuiltinEnum "VbStrConv", False, True, "vbWide", "4", True
    
    AddBuiltinEnum "VbTriState", True, False, "vbFalse", "0", True
    AddBuiltinEnum "VbTriState", False, False, "vbTrue", "-1", True
    AddBuiltinEnum "VbTriState", False, True, "vbUseDefault", "-2", True
    
    AddBuiltinEnum "VbVarType", True, False, "vbArray", "8192", True
    AddBuiltinEnum "VbVarType", False, False, "vbBoolean", "11", True
    AddBuiltinEnum "VbVarType", False, False, "vbByte", "17", True
    AddBuiltinEnum "VbVarType", False, False, "vbCurrency", "6", True
    AddBuiltinEnum "VbVarType", False, False, "vbDataObject", "13", True
    AddBuiltinEnum "VbVarType", False, False, "vbDate", "7", True
    AddBuiltinEnum "VbVarType", False, False, "vbDecimal", "14", True
    AddBuiltinEnum "VbVarType", False, False, "vbDouble", "5", True
    AddBuiltinEnum "VbVarType", False, False, "vbEmpty", "0", True
    AddBuiltinEnum "VbVarType", False, False, "vbError", "10", True
    AddBuiltinEnum "VbVarType", False, False, "vbInteger", "2", True
    AddBuiltinEnum "VbVarType", False, False, "vbLong", "3", True
    AddBuiltinEnum "VbVarType", False, False, "vbNull", "1", True
    AddBuiltinEnum "VbVarType", False, False, "vbObject", "9", True
    AddBuiltinEnum "VbVarType", False, False, "vbSingle", "4", True
    AddBuiltinEnum "VbVarType", False, False, "vbString", "8", True
    AddBuiltinEnum "VbVarType", False, False, "vbUserDefinedType", "36", True
    AddBuiltinEnum "VbVarType", False, True, "vbVariant", "12", True
    
    AddBuiltinEnum "KeyCodeConstants", True, False, "vbKeyLButton", "1", True
    AddBuiltinEnum "KeyCodeConstants", False, False, "vbKeyRButton", "2", True
    AddBuiltinEnum "KeyCodeConstants", False, False, "vbKeyCancel", "3", True
    AddBuiltinEnum "KeyCodeConstants", False, False, "vbKeyMButton", "4", True
    AddBuiltinEnum "KeyCodeConstants", False, False, "vbKeyBack", "8", True
    AddBuiltinEnum "KeyCodeConstants", False, False, "vbKeyTab", "9", True
    AddBuiltinEnum "KeyCodeConstants", False, False, "vbKeyClear", "12", True
    AddBuiltinEnum "KeyCodeConstants", False, False, "vbKeyReturn", "13", True
    AddBuiltinEnum "KeyCodeConstants", False, False, "vbKeyShift", "16", True
    AddBuiltinEnum "KeyCodeConstants", False, False, "vbKeyControl", "17", True
    AddBuiltinEnum "KeyCodeConstants", False, False, "vbKeyMenu", "18", True
    AddBuiltinEnum "KeyCodeConstants", False, False, "vbKeyPause", "19", True
    AddBuiltinEnum "KeyCodeConstants", False, False, "vbKeyCapital", "20", True
    AddBuiltinEnum "KeyCodeConstants", False, False, "vbKeyEscape", "27", True
    AddBuiltinEnum "KeyCodeConstants", False, False, "vbKeySpace", "32", True
    AddBuiltinEnum "KeyCodeConstants", False, False, "vbKeyPageUp", "33", True
    AddBuiltinEnum "KeyCodeConstants", False, False, "vbKeyPageDown", "34", True
    AddBuiltinEnum "KeyCodeConstants", False, False, "vbKeyEnd", "35", True