private void OnExplorerGoToSelectedTest(object sender, SelectedTestEventArgs e) { var controlSelection = e.Selection.FirstOrDefault(); if (controlSelection == null) { return; } var startLine = 1; var startColumn = 1; var endLine = -1; var endColumn = -1; var signature = string.Concat("Public Sub ", controlSelection.QualifiedMemberName.MemberName, "()"); var vbProject = VBE.VBProjects.Cast <VBProject>() .FirstOrDefault(project => project.Protection != vbext_ProjectProtection.vbext_pp_locked && project.Equals(controlSelection.QualifiedMemberName.QualifiedModuleName.Project) && project.VBComponents .Cast <VBComponent>() .Any(c => c.Equals(controlSelection.QualifiedMemberName.QualifiedModuleName.Component))); if (vbProject == null) { return; } var vbComponent = vbProject.VBComponents.Cast <VBComponent>() .SingleOrDefault(component => component.Equals(controlSelection.QualifiedMemberName.QualifiedModuleName.Component)); if (vbComponent == null) { return; } var codeModule = vbComponent.CodeModule; if (codeModule == null) { return; } if (codeModule.Find(signature, ref startLine, ref startColumn, ref endLine, ref endColumn)) { var selection = new Selection(startLine, startColumn, endLine, endColumn); codeModule.CodePane.SetSelection(selection); } }
private void OnExplorerGoToSelectedTest(object sender, SelectedTestEventArgs e) { throw new NotImplementedException(); }
private void OnExplorerRunSelectedTestButtonClick(object sender, SelectedTestEventArgs e) { throw new NotImplementedException(); }
private void OnExplorerGoToSelectedTest(object sender, SelectedTestEventArgs e) { var controlSelection = e.Selection.FirstOrDefault(); if (controlSelection == null) { return; } var startLine = 1; var startColumn = 1; var endLine = -1; var endColumn = -1; var signature = string.Concat("Public Sub ", controlSelection.QualifiedMemberName.MemberName, "()"); var vbProject = VBE.VBProjects.Cast<VBProject>() .FirstOrDefault(project => project.Protection != vbext_ProjectProtection.vbext_pp_locked && project.Equals(controlSelection.QualifiedMemberName.QualifiedModuleName.Project) && project.VBComponents .Cast<VBComponent>() .Any(c => c.Equals(controlSelection.QualifiedMemberName.QualifiedModuleName.Component))); if (vbProject == null) { return; } var vbComponent = vbProject.VBComponents.Cast<VBComponent>() .SingleOrDefault(component => component.Equals(controlSelection.QualifiedMemberName.QualifiedModuleName.Component)); if (vbComponent == null) { return; } var codeModule = vbComponent.CodeModule; if (codeModule == null) { return; } if (codeModule.Find(signature, ref startLine, ref startColumn, ref endLine, ref endColumn)) { var selection = new Selection(startLine, startColumn, endLine, endColumn); codeModule.CodePane.SetSelection(selection); } }
private void OnExplorerRunSelectedTestButtonClick(object sender, SelectedTestEventArgs e) { RunTests(e.Selection); }