private string GetDeclarationsText(VBAParser.VariableStmtContext variables)
        {
            var keyword = string.Empty;

            if (variables.DIM() != null)
            {
                keyword += Tokens.Dim + ' ';
            }
            else if (variables.visibility() != null)
            {
                keyword += variables.visibility().GetText() + ' ';
            }
            else if (variables.STATIC() != null)
            {
                keyword += variables.STATIC().GetText() + ' ';
            }

            var newContent = new StringBuilder();

            foreach (var variable in variables.variableListStmt().variableSubStmt())
            {
                newContent.AppendLine(keyword + variable.GetText());
            }

            return(newContent.ToString());
        }
 public override void ExitVariableStmt([NotNull] VBAParser.VariableStmtContext context)
 {
     if (context.DIM() != null && context.Parent is VBAParser.ModuleDeclarationsElementContext)
     {
         _contexts.Add(new QualifiedContext <ParserRuleContext>(CurrentModuleName, context));
     }
 }
Beispiel #3
0
 public override void EnterVariableStmt(VBAParser.VariableStmtContext context)
 {
     _members.Add(new QualifiedContext <ParserRuleContext>(_qualifiedName, context));
     foreach (var child in context.variableListStmt().variableSubStmt())
     {
         _members.Add(new QualifiedContext <ParserRuleContext>(_qualifiedName, child));
     }
 }
 public override void ExitVariableStmt([NotNull] VBAParser.VariableStmtContext context)
 {
     if (context.DIM() != null && context.TryGetAncestor <VBAParser.ModuleDeclarationsElementContext>(out _))
     {
         var resultContexts = context.GetDescendents <VBAParser.VariableSubStmtContext>();
         foreach (var resultContext in resultContexts)
         {
             SaveContext(resultContext);
         }
     }
 }