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);
}
private void OnExplorerRunSelectedTestButtonClick(object sender, SelectedTestEventArgs e)
{
RunTests(e.Selection);
}
