Adds Alias forms for Input and InputB

Author: ThunderFrame

Rubberduck.Parsing/Symbols/DeclarationLoaders/AliasDeclarations.cs

@@ -15,6 +15,7 @@ public class AliasDeclarations : ICustomDeclarationLoader
         private Declaration _interactionModule;
         private Declaration _stringsModule;
         private Declaration _dateTimeModule;
+        private Declaration _hiddenModule;
 
         public AliasDeclarations(RubberduckParserState state)
         {
@@ -53,6 +54,8 @@ public IReadOnlyList<Declaration> Load()
             Grammar.Tokens.UCase,
             Grammar.Tokens.Date,
             Grammar.Tokens.Time,
+            Grammar.Tokens.Input,
+            Grammar.Tokens.InputB
         };
 
         private IReadOnlyList<Declaration> AddAliasDeclarations()
@@ -93,6 +96,7 @@ private void UpdateAliasFunctionModulesFromReferencedProjects(DeclarationFinder
             _interactionModule = finder.FindStdModule("Interaction", vba, true);
             _stringsModule = finder.FindStdModule("Strings", vba, true);
             _dateTimeModule = finder.FindStdModule("DateTime", vba, true);
+            _hiddenModule = finder.FindStdModule("_HiddenModule", vba, true);
         }
 
 
@@ -197,6 +201,8 @@ private List<FunctionDeclaration> FunctionAliasesWithoutParameters()
                 RTrimFunction(),
                 StringFunction(),
                 UCaseFunction(),
+                InputFunction(),
+                InputBFunction(),
             };
         }
 
@@ -614,6 +620,42 @@ private FunctionDeclaration UCaseFunction()
                 new Attributes());
         }
 
+        private FunctionDeclaration InputFunction()
+        {
+            return new FunctionDeclaration(
+                new QualifiedMemberName(_hiddenModule.QualifiedName.QualifiedModuleName, "Input"),
+                _hiddenModule,
+                _hiddenModule,
+                "Variant",
+                null,
+                string.Empty,
+                Accessibility.Global,
+                null,
+                new Selection(),
+                false,
+                true,
+                new List<IAnnotation>(),
+                new Attributes());
+        }
+
+        private FunctionDeclaration InputBFunction()
+        {
+            return new FunctionDeclaration(
+                new QualifiedMemberName(_hiddenModule.QualifiedName.QualifiedModuleName, "Input"),
+                _hiddenModule,
+                _hiddenModule,
+                "Variant",
+                null,
+                string.Empty,
+                Accessibility.Global,
+                null,
+                new Selection(),
+                false,
+                true,
+                new List<IAnnotation>(),
+                new Attributes());
+        }
+
         private static void AddParametersToAliasesFromReferencedFunctions(List<FunctionDeclaration> functionAliases, List<Declaration> referencedFunctions)
         {
             foreach (var alias in functionAliases)