ࡱ>   (Hw' C !"#$%&'(?*+,-./0123456789:;<=>?@ABDQEFGHIJKLMFPQRSTUVWXYZ[\]^_`abdefghijklmnopqrstuvwxz{|}~Root EntryrN-VSM_Project_MetaData*VSM_Project_Data"CK4rN-VSMCK4rN-VSMPROJJ(VSM7PROJEX PITMMANIFESTEG41GQ1GNT44CKYG81QR4I0AV6R51XS@ >d2PF7IYB183SV8A0I2XL6LF86S8J6275@ W01RB70AFJ7I81F134K7J1A1271O871@ |~2P6147UK7D47V0KQV5B1FUT3R282W0M@/3F8J7SBKWS68X6U7818033458D7808I@ R  !"#$%&'()*+,-./0123456789: DevStudio6Editor>2PF7IYB183SV8A0I2XL6LF86S8J6275Utilities>2P6147UK7D47V0KQV5B1FUT3R282W0MVSEditor>75M11Q7H16QHAQSS7L4L87HCN6OE6D1MakeAddin>W01RB70AFJ7I81F134K7J1A1271O871VSDebugger>3F8J7SBKWS68X6U7818033458D7808I"AddDirAsSlnFolder>XQ1O8VU60167X8VF6537H12AQ38G6UDAccessibility>U424HP8X2R601MBC0A2GPHU46V0EP15"EnvironmentEvents>EG41GQ1GNT44CKYG81QR4I0AV6R51XSgerEvEnvironmentEvents,500,DTEEvents,EnvDTE,DTEEvents,EnvDTE.DTEEvents EnvironmentEvents,502,DocumentEvents,EnvDTE,DocumentEvents,EnvDTE.DocumentEvents EnvironmentEvents,501,WindowEvents,EnvDTE,WindowEvents,EnvDTE.WindowEvents EnvironmentEvents,503,TaskListEvents,EnvDTE,TaskListEvents,EnvDTE.TaskListEvents EnvironmentEvents,505,FindEvents,EnvDTE,FindEvents,EnvDTE.FindEvents EnvironmentEvents,504,OutputWindowEvents,EnvDTE,OutputWindowEvents,EnvDTE.OutputWindowEvents EnvironmentEvents,510,SelectionEvents,EnvDTE,SelectionEvents,EnvDTE.SelectionEvents EnvironmentEvents,512,SolutionItemsEvents,EnvDTE,ProjectItemsEvents,EnvDTE.ProjectItemsEvents       !"#$%&'()*+,-.0123456789:;<=>?@ABCDEFGHIJKLMNOPQRSTUVWXYZ[\]^_`abcdefghijklmnopqrstuvwxyz{}~Samples Samples.DevStudio6Editor.AddFunctionDescription Samples.DevStudio6Editor.AddRevisionMarks Samples.DevStudio6Editor.AutoCompleteFromFile Samples.DevStudio6Editor.CloseExceptActive Samples.DevStudio6Editor.CommentOut Samples.DevStudio6Editor.ifdefOut Samples.DevStudio6Editor.ifndefOut Samples.DevStudio6Editor.MultiplePastes Samples.DevStudio6Editor.OneTimeInclude Samples.DevStudio6Editor.PrintAllOpenDocuments Samples.DevStudio6Editor.ToggleCommentStyle Samples.Utilities.AddClassicComRef Samples.Utilities.FindCase Samples.Utilities.FindLastTarget Samples.Utilities.FindLine Samples.Utilities.InsertDocComments Samples.Utilities.ListMacroSamples Samples.Utilities.ListModifiedDocuments Samples.Utilities.ListProj Samples.Utilities.LoadView Samples.Utilities.SaveView Samples.Utilities.TurnOffLineNumbers Samples.Utilities.TurnOffWordWrap Samples.Utilities.TurnOnLineNumbers Samples.Utilities.TurnOnWordWrap Samples.VSEditor.BeginningOfFunction Samples.VSEditor.CenterScreen Samples.VSEditor.CommentRegion Samples.VSEditor.CountOccurrences Samples.VSEditor.DoForWholeFile Samples.VSEditor.EmacsStyleIndentLine Samples.VSEditor.FillCommentParagraph Samples.VSEditor.FixLineEnds Samples.VSEditor.InsertDate Samples.VSEditor.InsertTime Samples.VSEditor.InsertTimeDate Samples.VSEditor.LineEmUp Samples.VSEditor.LineToTop Samples.VSEditor.ListMatchingLines Samples.VSEditor.ListNonMatchingLines Samples.VSEditor.NewCommentLine Samples.VSEditor.OneFunctionView Samples.VSEditor.OutlineCode Samples.VSEditor.PrintItemsInSelectedProject Samples.VSEditor.PrintNumberedLines Samples.VSEditor.SaveBackup Samples.VSEditor.SetFillColumn Samples.VSEditor.TopOfBlock Samples.MakeAddin.MakeAddinFromMacroProj Samples.VSDebugger.AddBreakpointToMain Samples.VSDebugger.AttachToCalc Samples.VSDebugger.BreakpointLastHit Samples.VSDebugger.DebuggerMode Samples.VSDebugger.DetachAll Samples.VSDebugger.DumpExpression Samples.VSDebugger.DumpStacks Samples.VSDebugger.LastBreakReason Samples.VSDebugger.ListAllBreakpoints Samples.VSDebugger.ListBreakpointsLastHit Samples.VSDebugger.ListDebuggedProcesses Samples.VSDebugger.RunToLine Samples.VSDebugger.RunToNextBreakpoint Samples.VSDebugger.ShowCurrentProcess Samples.VSDebugger.StepOverAll Samples.VSDebugger.SupportedLanguages Samples.AddDirAsSlnFolder.GenerateSlnFolderOnDirStructure Samples.Accessibility.DecreaseTextEditorFontSize Samples.Accessibility.IncreaseTextEditorFontSize Samples.Accessibility.MaximizeToolWindowsInEnvironment Samples.Accessibility.ToggleTextEditorGrayScale Samples.Accessibility.UpdateTextEditorFontSizeToMatchDisplayProperties amples.DevStudio6Editor.AddFunctionDescription Samples.DevStudio6Editor.AddRevisionMarks Samples.DevStudio6Editor.AutoCompleteFromFile Samples.DevStudio6Editor.CloseExceptActive Samples.DevStudio6Editor.CommentOut Samples.DevStudio6Editor.ifdefOut Samples.DevStudio6Editor.ifndefOut Samples.DevStudio6Editor.MultiplePastes Samples.DevStudio6Editor.OneTimeInclude Samples.DevStudio6Editor.PrintAllOpenDocuments Samples.DevStudio6Editor.ToggleCommentStyle Samples.Utilities.AddClassicComRef Samples.Utilities.FindCase Samples.Utilities.FindLastTarget Samples.Utilities.FindLine Samples.Utilities.InsertDocComments Samples.Utilities.ListMacroSamples Samples.Utilities.ListModifiedDocuments Samples.Utilities.ListProj Samples.Utilities.LoadView Samples.Utilities.SaveView Samples.Utilities.TurnOffLineNumbers Samples.Utilities.TurnOffWordWrap Samples.Utilities.TurnOnLineNumbers Samples.Utilities.TurnOnWordWrap Samples.VSEditor.BeginningOfFunction Samples.VSEditor.CenterScreen Samples.VSEditor.CommentRegion Samples.VSEditor.CountOccurrences Samples.VSEditor.DoForWholeFile Samples.VSEditor.EmacsStyleIndentLine Samples.VSEditor.FillCommentParagraph Samples.VSEditor.FixLineEnds Samples.VSEditor.InsertDate Samples.VSEditor.InsertTime Samples.VSEditor.InsertTimeDate Samples.VSEditor.LineEmUp Samples.VSEditor.LineToTop Samples.VSEditor.ListMatchingLines Samples.VSEditor.ListNonMatchingLines Samples.VSEditor.NewCommentLine Samples.VSEditor.OneFunctionView Samples.VSEditor.OutlineCode Samples.VSEditor.PrintItemsInSelectedProject Samples.VSEditor.PrintNumberedLines Samples.VSEditor.SaveBackup Samples.VSEditor.SetFillColumn Samples.VSEditor.TopOfBlock Samples.MakeAddin.MakeAddinFromMacroProj Samples.VSDebugger.AddBreakpointToMain Samples.VSDebugger.AttachToCalc Samples.VSDebugger.BreakpointLastHit Samples.VSDebugger.DebuggerMode Samples.VSDebugger.DetachAll Samples.VSDebugger.DumpExpression Samples.VSDebugger.DumpStacks Samples.VSDebugger.LastBreakReason Samples.VSDebugger.ListAllBreakpoints Samples.VSDebugger.ListBreakpointsLastHit Samples.VSDebugger.ListDebuggedProcesses Samples.VSDebugger.RunToLine Samples.VSDebugger.RunToNextBreakpoint Samples.VSDebugger.ShowCurrentProcess Samples.VSDebugger.StepOverAll Samples.VSDebugger.SupportedLanguages Samples.AddDirAsSlnFolder.GenerateSlnFolderOnDirStructure Samples.Accessibility.DecreaseTextEditorFontSize Samples.Accessibility.IncreaseTextEditorFontSize Samples.Accessibility.MaximizeToolWindowsInEnvironment Samples.Accessibility.ToggleTextEditorGrayScale Samples.Accessibility.UpdateTextEditorFontSizeToMatchDisplayProperties amples.DevStudio6Editor.AddFunctionDescription Samples.DevStudio6Editor.AddRevisionMarks Samples.DevStudio6Editor.AutoCompleteFromFile Samples.DevStudio6Editor.CloseExceptActive Samples.DevStudio6Editor.CommentOut Samples.DevStudio6Editor.ifdefOut Samples.DevStudio6Editor.ifndefOut Samples.DevStudio6Editor.MultiplePastes Samples.DevStudio6Editor.OneTimeInclude Samples.DevStudio6Editor.PrintAllOpenDocuments Samples.DevStudio6Editor.ToggleCommentStyle Samples.Utilities.AddClassicComRef Samples.Utilities.FindCase Samples.Utilities.FindLastTarget Samples.Utilities.FindLine Samples.Utilities.InsertDocComments Samples.Utilities.ListMacroSamples Samples.Utilities.ListModifiedDocuments Samples.Utilities.ListProj Samples.Utilities.LoadView Samples.Utilities.SaveView Samples.Utilities.TurnOffLineNumbers Samples.Utilities.TurnOffWordWrap Samples.Utilities.TurnOnLineNumbers Samples.Utilities.TurnOnWordWrap Samples.VSEditor.BeginningOfFunction Samples.VSEditor.CenterScreen Samples.VSEditor.CommentRegion Samples.VSEditor.CountOccurrences Samples.VSEditor.DoForWholeFile Samples.VSEditor.EmacsStyleIndentLine Samples.VSEditor.FillCommentParagraph Samples.VSEditor.FixLineEnds Samples.VSEditor.InsertDate Samples.VSEditor.InsertTime Samples.VSEditor.InsertTimeDate Samples.VSEditor.LineEmUp Samples.VSEditor.LineToTop Samples.VSEditor.ListMatchingLines Samples.VSEditor.ListNonMatchingLines Samples.VSEditor.NewCommentLine Samples.VSEditor.OneFunctionView Samples.VSEditor.OutlineCode Samples.VSEditor.PrintItemsInSelectedProject Samples.VSEditor.PrintNumberedLines Samples.VSEditor.SaveBackup Samples.VSEditor.SetFillColumn Samples.VSEditor.TopOfBlock Samples.MakeAddin.MakeAddinFromMacroProj Samples.VSDebugger.AddBreditor.OneFunctionView Samples.VSEditor.OutlineCode Samples.VSEditor.PrintItemsInSelectedProject Samples.VSEditor.PrintNumberedLines Samples.VSEditor.SaveBackup Samples.VSEditor.SetFillColumn Samples.VSEditor.TopOfBlock Samples.MakeAddin.MakeAddinFromMacroProj Samples.VSDebugger.AddBreakpointToMain Samples.VSDebugger.AttachToCalc Samples.VSDebugger.BreakpointLastHit Samples.VSDebugger.DebuggerMode Samples.VSDebugger.DetachAll Samples.VSDebugger.DumpExpression Samples.VSDebugger.DumpStacks Samples.VSDebugger.LastBreakReason Samples.VSDebugger.ListAllBreakpoints Samples.VSDebugger.ListBreakpointsLastHit Samples.VSDebugger.ListDebuggedProcesses Samples.VSDebugger.RunToLine Samples.VSDebugger.RunToNextBreakpoint Samples.VSDebugger.ShowCurrentProcess Samples.VSDebugger.StepOverAll Samples.VSDebugger.SupportedLanguages Samples.AddDirAsSlnFolder.GenerateSlnFolderOnDirStructure Samples.Accessibility.DecreaseTextEditorFontSize Samples.Accessibility.IncreaseTextEditorFontSize Samples.Accessibility.MaximizeToolWindowsInEnvironment Samples.Accessibility.ToggleTextEditorGrayScale Samples.Accessibility.UpdateTextEditorFontSizeToMatchDisplayProperties Samples.DevStudio6Editor.AddFunctionDescription Samples.DevStudio6Editor.AddRevisionMarks Samples.DevStudio6Editor.AutoCompleteFromFile Samples.DevStudio6Editor.CloseExceptActive Samples.DevStudio6Editor.CommentOut Samples.DevStudio6Editor.ifdefOut Samples.DevStudio6Editor.ifndefOut Samples.DevStudio6Editor.MultiplePastes Samples.DevStudio6Editor.OneTimeInclude Samples.DevStudio6Editor.PrintAllOpenDocuments Samples.DevStudio6Editor.ToggleCommentStyle Samples.Utilities.AddClassicComRef Samples.Utilities.FindCase Samples.Utilities.FindLastTarget Samples.Utilities.FindLine Samples.Utilities.InsertDocComments Samples.Utilities.ListMacroSamples Samples.Utilities.ListModifiedDocuments Samples.Utilities.ListProj Samples.Utilities.LoadView Samples.Utilities.SaveView Samples.Utilities.TurnOffLineNumbers Samples.Utilities.TurnOffWordWrap Samples.Utilities.TurnOnLineNumbers Samples.Utilities.TurnOnWordWrap Samples.VSEditor.BeginningOfFunction Samples.VSEditor.CenterScreen Samples.VSEditor.CommentRegion Samples.VSEditor.CountOccurrences Samples.VSEditor.DoForWholeFile Samples.VSEditor.EmacsStyleIndentLine Samples.VSEditor.FillCommentParagraph Samples.VSEditor.FixLineEnds Samples.VSEditor.InsertDate Samples.VSEditor.InsertTime Samples.VSEditor.InsertTimeDate Samples.VSEditor.LineEmUp Samples.VSEditor.LineToTop Samples.VSEditor.ListMatchingLines Samples.VSEditor.ListNonMatchingLines Samples.VSEditor.NewCommentLine Samples.VSEditor.OneFunctionView Samples.VSEditor.OutlineCode Samples.VSEditor.PrintItemsInSelectedProject Samples.VSEditor.PrintNumberedLines Samples.VSEditor.SaveBackup Samples.VSEditor.SetFillColumn Samples.VSEditor.TopOfBlock Samples.MakeAddin.MakeAddinFromMacroProj Samples.VSDebugger.AddBreakpointToMain Samples.VSDebugger.AttachToCalc Samples.VSDebugger.BreakpointLastHit Samples.VSDebugger.DebuggerMode Samples.VSDebugger.DetachAll Samples.VSDebugger.DumpExpression Samples.VSDebugger.DumpStacks Samples.VSDebugger.LastBreakReason Samples.VSDebugger.ListAllBreakpoints Samples.VSDebugger.ListBreakpointsLastHit Samples.VSDebugger.ListDebuggedProcesses Samples.VSDebugger.RunToLine Samples.VSDebugger.RunToNextBreakpoint Samples.VSDebugger.ShowCurrentProcess Samples.VSDebugger.StepOverAll Samples.VSDebugger.SupportedLanguages Samples.AddDirAsSlnFolder.GenerateSlnFolderOnDirStructure Samples.Accessibility.DecreaseTextEditorFontSize Samples.Accessibility.IncreaseTextEditorFontSize Samples.Accessibility.MaximizeToolWindowsInEnvironment Samples.Accessibility.ToggleTextEditorGrayScale Samples.Accessibility.UpdateTextEditorFontSizeToMatchDisplayProperties Samples.DevStudio6Editor.AddFunctionDescription Samples.DevStudio6Editor.AddRevisionMarks Samples.DevStudio6Editor.AutoCompleteFromFile Samples.DevStudio6Editor.CloseExceptActive Samples.DevStudio6Editor.CommentOut Samples.DevStudio6Editor.ifdefOut Samples.DevStudio6Editor.ifndefOut Samples.DevStudio6Editor.MultiplePastes Samples.DevStudio6Editor.OneTimeInclude Samples.DevStudio6Editor.PrintAllOpenDocuments Samples.DevStudio6Editor.ToggleCommentStyle Samples.Utilities.AddClassicComRef Samples.Utilities.FindCase Samples.Utilities.FindLastTarget Samples.Utilities.FindLine Samples.Utilities.InsertDocComments Samples.Utilities.ListMacroSamples Samples.Utilities.ListModifiedDocuments Samples.Utilities.ListProj Samples.Utilities.LoadView Samples.Utilities.SaveView Samples.Utilities.TurnOffLineNumbers Samples.Utilities.TurnOffWordWrap Samples.Utilities.TurnOnLineNumbers Samples.Utilities.TurnOnWordWrap Samples.VSEditor.BeginningOfFunction Samples.VSEditor.CenterScreen Samples.VSEditor.CommentRegion Samples.VSEditor.CountOccurrences Samples.VSEditor.DoForWholeFile Samples.VSEditor.EmacsStyleIndentLine Samples.VSEditor.FillCommentParagraph Samples.VSEditor.FixLineEnds Samples.VSEditor.InsertDate Samples.VSEditor.InsertTime Samples.VSEditor.InsertTimeDate Samples.VSEditor.LineEmUp Samples.VSEditor.LineToTop Samples.VSEditor.ListMatchingLines Samples.VSEditor.ListNonMatchingLines Samples.VSEditor.NewCommentLine Samples.VSEditor.OneFunctionView Samples.VSEditor.OutlineCode Samples.VSEditor.PrintItemsInSelectedProject Samples.VSEditor.PrintNumberedLines Samples.VSEditor.SaveBackup Samples.VSEditor.SetFillColumn Samples.VSEditor.TopOfBlock Samples.MakeAddin.MakeAddinFromMacroProj Samples.VSDebugger.AddBreakpointToMain Samples.VSDebugger.AttachToCalc Samples.VSDebugger.BreakpointLastHit Samples.VSDebugger.DebuggerMode Samples.VSDebugger.DetachAll Samples.VSDebugger.DumpExpression Samples.VSDebugger.DumpStacks Samples.VSDebugger.LastBreakReason Samples.VSDebugger.ListAllBreakpoints Samples.VSDebugger.ListBreakpointsLastHit Samples.VSDebugger.ListDebuggedProcesses Samples.VSDebugger.RunToLine Samples.VSDebugger.RunToNextBreakpoint Samples.VSDebugger.ShowCurrentProcess Samples.VSDebugger.StepOverAll Samples.VSDebugger.SupportedLanguages Samples.AddDirAsSlnFolder.GenerateSlnFolderOnDirStructure Samples.Accessibility.DecreaseTextEditorFontSize Samples.Accessibility.IncreaseTextEditorFontSize Samples.Accessibility.MaximizeToolWindowsInEnvironment Samples.Accessibility.ToggleTextEditorGrayScale Samples.Accessibility.UpdateTextEditorFontSizeToMatchDisplayProperties Samples.DevStudio6Editor.AddFunctionDescription Samples.DevStudio6Editor.AddRevisionMarks Samples.DevStudio6Editor.AutoCompleteFromFile Samples.DevStudio6Editor.CloseExceptActive Samples.DevStudio6Editor.CommentOut Samples.DevStudio6Editor.ifdefOut Samples.DevStudio6Editor.ifndefOut Samples.DevStudio6Editor.MultiplePastes EnvironmentEvents,513,MiscFilesEvents,EnvDTE,ProjectItemsEvents,EnvDTE.ProjectItemsEvents EnvironmentEvents,514,DebuggerEvents,EnvDTE,DebuggerEvents,EnvDSamples.DevStudio6Editor.OneTimeInclude Samples.DevStudio6Editor.PrintAllOpenDocuments Samples.DevStudio6Editor.ToggleCommentStyle Samples.Utilities.AddClassicComRef Samples.Utilities.FindCase Samples.Utilities.FindLastTarget Samples.Utilities.FindLine Samples.Utilities.InsertDocComments Samples.Utilities.ListMacroSamples Samples.Utilities.ListModifiedDocuments Samples.Utilities.ListProj Samples.Utilities.LoadView Samples.Utilities.SaveView Samples.Utilities.TurnOffLineNumbers Samples.Utilities.TurnOffWordWrap Samples.Utilities.TurnOnLineNumbers Samples.Utilities.TurnOnWordWrap Samples.VSEditor.BeginningOfFunction Samples.VSEditor.CenterScreen Samples.VSEditor.CommentRegion Samples.VSEditor.CountOccurrences Samples.VSEditor.DoForWholeFile Samples.VSEditor.EmacsStyleIndentLine Samples.VSEditor.FillCommentParagraph Samples.VSEditor.FixLineEnds Samples.VSEditor.InsertDate Samples.VSEditor.InsertTime Samples.VSEditor.InsertTimeDate Samples.VSEditor.LineEmUp Samples.VSEditor.LineToTop Samples.VSEditor.ListMatchingLines Samples.VSEditor.ListNonMatchingLines Samples.VSEditor.NewCommentLine Samples.VSEditor.OneFunctionView Samples.VSEditor.OutlineCode Samples.VSEditor.PrintItemsInSelectedProject Samples.VSEditor.PrintNumberedLines Samples.VSEditor.SaveBackup Samples.VSEditor.SetFillColumn Samples.VSEditor.TopOfBlock Samples.MakeAddin.MakeAddinFromMacroProj Samples.VSDebugger.AddBreakpointToMain Samples.VSDebugger.AttachToCalc Samples.VSDebugger.BreakpointLastHit Samples.VSDebugger.DebuggerMode Samples.VSDebugger.DetachAll Samples.VSDebugger.DumpExpression Samples.VSDebugger.DumpStacks Samples.VSDebugger.LastBreakReason Samples.VSDebugger.ListAllBreakpoints Samples.VSDebugger.ListBreakpointsLastHit Samples.VSDebugger.ListDebuggedProcesses Samples.VSDebugger.RunToLine Samples.VSDebugger.RunToNextBreakpoint Samples.VSDebugger.ShowCurrentProcess Samples.VSDebugger.StepOverAll Samples.VSDebugger.SupportedLanguages Samples.AddDirAsSlnFolder.GenerateSlnFolderOnDirStructure Samples.Accessibility.DecreaseTextEditorFontSize Samples.Accessibility.IncreaseTextEditorFontSize Samples.Accessibility.MaximizeToolWindowsInEnvironment Samples.Accessibility.ToggleTextEditorGrayScale Samples.Accessibility.UpdateTextEditorFontSizeToMatchDisplayProperties Samples.DevStudio6Editor.AddFunctionDescription Samples.DevStudio6Editor.AddRevisionMarks Samples.DevStudio6Editor.AutoCompleteFromFile Samples.DevStudio6Editor.CloseExceptActive Samples.DevStudio6Editor.CommentOut Samples.DevStudio6Editor.ifdefOut Samples.DevStudio6Editor.ifndefOut Samples.DevVSMPDBR'' HrCg@b g (c) Microsoft Corporation0OYu@b gCg)R0 '' '' ُN:yOo:yYUOO(u VS ꁨRS[a!jW0 '' }6qُN:yO NS/ec FO`SN cS7hO(u0ُN:yO N/f(ueg '' o:yYUO[sBlASR%N= minimumSupportedEditorSize Then fontSize.Value -= fontSizeIncrement End If End Sub ' \hV-NO(uv@b grSbўrT}vr b ' (WُNrSbўrT}vrNMR؏S@b(ur0 Public Sub ToggleTextEditorGrayScale() Dim applicationRegistryRootKey As RegistryKey Dim accessibilityKey As RegistryKey Dim textEditorFontsAndColors As Properties Dim fontsAndColors As FontsAndColorsItems Dim editorInGrayScale As Boolean ' ǏglQh-NvOo`nx[(u7b/f&T]Rbcpp^0 applicationRegistryRootKey = Registry.CurrentUser.OpenSubKey(DTE.RegistryRoot, True) accessibilityKey = applicationRegistryRootKey.OpenSubKey("Accessibility", True) ' Yg. NX[(W RۏLR^0 If accessibilityKey Is Nothing Then applicationRegistryRootKey.CreateSubKey("Accessibility") accessibilityKey = applicationRegistryRootKey.OpenSubKey("Accessibility", True) accessibilityKey.SetValue("TextEditorInGrayScale", 0) End If ' SS_MRhVpp^r`0 editorInGrayScale = CType(accessibilityKey.GetValue("TextEditorInGrayScale"), Boolean) ' S Fonts T Colors [a0 textEditorFontsAndColors = DTE.Properties("FontsAndColors", "TextEditor") fontsAndColors = textEditorFontsAndColors.Item("FontsAndColorsItems").Object ' nx[^O(upp^n؏/fNMRvn0 If editorInGrayScale Then ' ؏S:NNlQh-N~b0RvNMRvr0 For Each displayItem As ColorableItems In fontsAndColors displayItem.Background = UInt32.Parse(accessibilityKey.GetValue(displayItem.Name + "_BG")) displayItem.Foreground = UInt32.Parse(accessibilityKey.GetValue(displayItem.Name + "_FG")) Next ' RbclQh-Nvh_ Nc:ye,ghV*gYNpp^r`0 accessibilityKey.SetValue("TextEditorInGrayScale", 0) Else ' \S_MRvrQeQlQh v^^(upp^0 For Each displayItem As ColorableItems In fontsAndColors accessibilityKey.SetValue(displayItem.Name + "_BG", displayItem.Background.ToString) accessibilityKey.SetValue(displayItem.Name + "_FG", displayItem.Foreground.ToString) displayItem.Background = whiteColor displayItem.Foreground = blackColor Next ' RbclQh-Nvh_ Nc:ye,ghVYNpp^r`0 accessibilityKey.SetValue("TextEditorInGrayScale", 1) End If End Sub ' ]wQzSQs(W MDI echzz-N0 Public Sub MaximizeToolWindowsInEnvironment() For Each window As Window In DTE.Windows ' nxُ/f]wQzS N/fechzS0 If (window.Document Is Nothing) Then ' sQꁨRυR0 Try If window.AutoHides = True Then window.AutoHides = False End If Catch exception As Exception End Try ' n:N NS\P`(sSNg'YSe_>f:yech)0 Try window.Linkable = False Catch End Try End If Next End Sub End Module displayItem.Background = whiteColor displayItem.Foreground = blackColor '' HrCg@b g (c) Microsoft Corporation0OYu@b gCg)R0 '' '' ُN:yOo:yYUOO(u VS ꁨRS[a!jW0 '' }6qُN:yO NS/ec FO`SN cS7hO(u0ُN:yO N/f(ueg '' o:yYUO[sBlASR%Ne(W '' @b Q[mSvkNLvL v^R^dmd\O '' NO[v@b gLNgbLN!kdmd\O0 '' Sub CommentRegion() Dim selection As EnvDTE.TextSelection Dim startPoint As EnvDTE.EditPoint Dim endPoint As TextPoint Dim commentStart As String selection = DTE.ActiveDocument.Selection() startPoint = selection.TopPoint.CreateEditPoint() endPoint = selection.BottomPoint commentStart = Utilities.LineOrientedCommentStart() DTE.UndoContext.Open("Comment Region") Try Do While (True) Dim line As Integer line = startPoint.Line startPoint.Insert(commentStart) startPoint.LineDown() startPoint.StartOfLine() If (line = endPoint.Line) Then Exit Do End If Loop Finally ' YgSu RnxO[dm N NeۏLnt0 ' &TR hVSOYN8lENvdm N Ne-N0 DTE.UndoContext.Close() End Try End Sub '' NewCommentLine ceQbcL&{ v^n NNL NO~~ '' bTLvS_MRlʑL0 '' Sub NewCommentLine() Dim textSelection As EnvDTE.TextSelection textSelection = DTE.ActiveWindow.Selection textSelection.NewLine() textSelection.Insert(Utilities.LineOrientedCommentStart()) textSelection.Insert(" ") End Sub '' SaveBackup \S_MRechvoR,gOX[:NN N Ty '' Ty1uech TyR N .bak gb '' Sub SaveBackup() Dim fileName As String Dim startPoint As EnvDTE.EditPoint Dim endPoint As EnvDTE.EditPoint Dim textDocument As TextDocument Dim text As String fileName = DTE.ActiveDocument.FullName + ".bak" ' g~bech-Nve,g0 If (DTE.ActiveDocument Is Nothing) Then ' l gYNvech0 Return End If textDocument = DTE.ActiveDocument.Object startPoint = textDocument.StartPoint.CreateEditPoint endPoint = textDocument.EndPoint.CreateEditPoint text = startPoint.GetText(endPoint) ' R^4Neech OX[ 6qTsQ0 DTE.ItemOperations.NewFile("8^ĉ\e,geN") DTE.ActiveDocument.Object("TextDocument").Selection.Insert(text) DTE.ActiveDocument.Save(fileName) DTE.ActiveDocument.Close(EnvDTE.vsSaveChanges.vsSaveChangesNo) ']Ǐ NNLOX[ NQ!kOX[0 End Sub '' OneFunctionView O(u VS Nx!jWThVvꁨRS '' !jW(WQpevMRTR^'Y~R '' ُ7h `S w0RS_MRS+TceQ&{SvQpe0 '' Sub OneFunctionView() Dim textSelection As EnvDTE.TextSelection Dim textSelectionPointSaved As EnvDTE.EditPoint Dim editPoint As EnvDTE.EditPoint textSelection = DTE.ActiveWindow.Selection textSelectionPointSaved = textSelection.ActivePoint.CreateEditPoint editPoint = textSelection.ActivePoint.CreateEditPoint '' Sech >f:y0Rechv'Y~0 editPoint.MoveToPoint(editPoint.CodeElement(EnvDTE.vsCMElement.vsCMElementFunction).GetStartPoint(vsCMPart.vsCMPartWholeWithAttributes)) editPoint.LineUp() textSelection.MoveToPoint(editPoint, False) textSelection.StartOfDocument(True) textSelection.OutlineSection() 'editPoint.LineDown() '' \ editPoint yVQpe 6qTN4Y0R>\>f:yechv'Y~0 editPoint.MoveToPoint(textSelectionPointSaved) editPoint.MoveToPoint(editPoint.CodeElement(EnvDTE.vsCMElement.vsCMElementFunction).GetEndPoint(vsCMPart.vsCMPartWholeWithAttributes)) editPoint.LineDown() textSelection.MoveToPoint(editPoint, False) textSelection.EndOfDocument(True) textSelection.OutlineSection() textSelection.MoveToPoint(textSelectionPointSaved) End Sub '' BeginningOfFunction \ceQ&{Sy0RS+T[INv '' _4Y0 '' Sub BeginningOfFunction() Dim textSelection As EnvDTE.TextSelection Dim codeElement As EnvDTE.CodeElement textSelection = DTE.ActiveWindow.Selection Try codeElement = textSelection.ActivePoint.CodeElement(vsCMElement.vsCMElementFunction) If Not (codeElement Is Nothing) Then textSelection.MoveToPoint(codeElement.GetStartPoint(vsCMPart.vsCMPartHeader)) End If Catch End Try End Sub '' LineToTop \S_MRLy0RzSvv0 '' Sub LineToTop() Dim textSelection As EnvDTE.TextSelection textSelection = DTE.ActiveWindow.Selection textSelection.ActivePoint.TryToShow(vsPaneShowHow.vsPaneShowTop) End Sub '' EmacsStyleIndentLine el~[0R Tab . FO`SN '' Ng*N.(u[ NOv[NYB\Nx͑e)ۏS_MRL '' eyRceQ&{S0 '' Sub EmacsStyleIndentLine() Dim textSelection As EnvDTE.TextSelection Dim savedTextSelectionPoint As EnvDTE.EditPoint textSelection = DTE.ActiveWindow.Selection savedTextSelectionPoint = textSelection.ActivePoint.CreateEditPoint() textSelection.SelectLine() textSelection.SmartFormat() textSelection.MoveToPoint(savedTextSelectionPoint) End Sub '' '' TopOfBlock T helper Qpe '' '' TopOfBlock O(u)ۏI{~egcKm '' [N~[NxL\필vW,gWWNUOY_Y0dk}TN.^R`T N '' pgNxv0RWW0 '' Sub TopOfBlock() Dim textDoc As EnvDTE.TextDocument Dim editPoint As EnvDTE.EditPoint Dim selection As EnvDTE.TextSelection Dim indent As Long Dim currentIndent As Long textDoc = DTE.ActiveDocument.Object("TextDocument") editPoint = textDoc.CreateEditPoint(Nothing) selection = textDoc.Selection editPoint.LineDown(selection.ActivePoint.Line - 1) indent = IndentLevel(editPoint) If indent = -1 Then Beep() Exit Sub End If currentIndent = indent Do While currentIndent >= indent currentIndent = IndentLevel(editPoint) If currentIndent = -1 Then Beep() Exit Sub Else If currentIndent >= indent Then If editPoint.Line = 1 Then Exit Sub Else editPoint.LineUp() End If End If End If Loop selection.MoveToLineAndOffset(editPoint.Line, editPoint.LineCharOffset) End Sub '' TopOfBlock v Helper0 '' Function IndentLevel(ByVal editPoint As EnvDTE.EditPoint) Dim lastLine As Long Do While True lastLine = editPoint.Line editPoint.StartOfLine() SkipSpaceRight(editPoint) If editPoint.Line <> lastLine Then ' zzL editPoint.LineUp(2) ElseIf editPoint.LineCharOffset = editPoint.LineLength + 1 Then ' S gzz lastLine - 1 Then IndentLevel = -1 Exit Function End If Loop End Function '' IndentLevel v Helper0TSǏzz\ Exit Sub End If Loop End Sub '' '' Nx'Y~:yO0 '' '' bSNxNg wk*NNxCQ }0 '' Sub OutlineCode() Dim i As Integer Dim fileCM As FileCodeModel Dim elts As EnvDTE.CodeElements Dim elt As EnvDTE.CodeElement fileCM = DTE.ActiveDocument.ProjectItem.FileCodeModel elts = fileCM.CodeElements For i = 1 To elts.Count elt = elts.Item(i) CollapseElt(elt, elts, i) Next End Sub '' OutlineCode v Helper0NR_e_>f:y elt bXTv'Y~0 '' Sub CollapseElt(ByVal elt As EnvDTE.CodeElement, ByVal elts As EnvDTE.CodeElements, ByVal loc As Integer) Dim epStart As EnvDTE.EditPoint Dim epEnd As EnvDTE.EditPoint epStart = elt.GetStartPoint(vsCMPart.vsCMPartWholeWithAttributes).CreateEditPoint() epEnd = elt.GetEndPoint(vsCMPart.vsCMPartWholeWithAttributes).CreateEditPoint() ' 1uNNTۏLyR Vdk[vQۏL Y6R0 epStart.EndOfLine() If ((elt.IsCodeType()) And (elt.Kind <> EnvDTE.vsCMElement.vsCMElementDelegate)) Then Dim i As Integer Dim mems As EnvDTE.CodeElements mems = elt.Members For i = 1 To mems.Count CollapseElt(mems.Item(i), mems, i) Next ElseIf (elt.Kind = EnvDTE.vsCMElement.vsCMElementNamespace) Then Dim i As Integer Dim mems As EnvDTE.CodeElements mems = elt.Members For i = 1 To mems.Count CollapseElt(mems.Item(i), mems, i) Next End If If (epStart.LessThan(epEnd)) Then loc = loc + 1 If (loc <= elts.Count) Then epEnd.MoveToPoint(elts.Item(loc).GetStartPoint(vsCMPart.vsCMPartHeader)) epEnd.LineUp() epEnd.EndOfLine() End If epStart.OutlineSection(epEnd) End If End Sub ' \ceQ&{SnNO\U^v-N_0Ygel\ceQ&{SnN ' O\U^-N_(OY 1uNceQ&{S(WeNv^ ' bv bS gQLe,g) R\ ' nRƉV NOSN>f:yceQ&{S0 Sub CenterScreen() Dim textPoint As EnvDTE.TextPoint textPoint = DTE.ActiveDocument.Selection.ActivePoint textPoint.TryToShow(vsPaneShowHow.vsPaneShowCentered) End Sub ' SbpSS_MRech echvkNL&^ gnvLS0 Sub PrintNumberedLines() Dim textSelection As EnvDTE.TextSelection Dim textSelectionNewFile As EnvDTE.TextSelection Dim i As Integer Dim lineCount As Integer Dim newText As String textSelection = DTE.ActiveDocument.Selection textSelection.SelectAll() textSelection.Copy() textSelectionNewFile = DTE.ItemOperations.NewFile("8^ĉ\e,geN").Selection textSelectionNewFile.Paste() textSelectionNewFile.StartOfDocument() textSelectionNewFile.SelectAll() lineCount = textSelectionNewFile.BottomLine textSelectionNewFile.StartOfDocument() For i = 1 To (lineCount) textSelectionNewFile = DTE.ActiveDocument.Selection textSelectionNewFile.StartOfLine(EnvDTE.vsStartOfLineOptions.vsStartOfLineOptionsFirstColumn) newText = CStr(i) & ". " textSelectionNewFile.Text = newText textSelectionNewFile.LineDown(True) Next DTE.ActiveDocument.PrintOut() DTE.ActiveDocument.Close(EnvDTE.vsSaveChanges.vsSaveChangesNo) End Sub ' dk[c:yeQЏLv}TN bte*NeN ' ЏL}TN 6qT؏S@b Q[0Vdk O(udk[SN ' _nte*NeNv "") Then Dim selection As EnvDTE.TextSelection Dim anchorPoint As EnvDTE.EditPoint Dim activePoint As EnvDTE.EditPoint Dim textPane As TextPane Dim cornerPoint As EnvDTE.EditPoint selection = DTE.ActiveDocument.Selection anchorPoint = selection.AnchorPoint.CreateEditPoint activePoint = selection.ActivePoint.CreateEditPoint textPane = DTE.ActiveDocument.ActiveWindow.Object.activepane cornerPoint = textPane.StartPoint.CreateEditPoint selection.StartOfDocument() selection.EndOfDocument(True) DTE.ExecuteCommand(command) selection.MoveToPoint(anchorPoint) selection.MoveToPoint(activePoint, True) textPane.TryToShow(cornerPoint, vsPaneShowHow.vsPaneShowTop) End If End Sub '' LineEmUp 9hncW[&{ݍ[P [L-Nv@b ge,g0 '' (uNR^Wv[PvSϑbelXf0 '' Sub LineEmUp() Dim selection As EnvDTE.TextSelection Dim editPoint As EnvDTE.EditPoint Dim rows As Long Dim howFarOut As Long = 1 Dim anyMoved As Boolean = False selection = ActiveDocument.Selection editPoint = selection.TopPoint.CreateEditPoint rows = selection.BottomPoint.Line - selection.TopPoint.Line ' _sg~b\*g[Pv,{NL0 Do While Not anyMoved Dim AnyRowValid = False ' S_MRUS͋R-Nk*NCQ }vS_MRW[&{T ' >f:yR0 Dim curCharPos(rows) As Long Dim curDispPos(rows) As Long ' S)zz}vTk*NCQ }v ' S'`g\vwYR0 Dim minCharPos(rows) As Long Dim minDispPos(rows) As Long ' _s [vkNL0 Dim arrIdx As Long = 0 Dim maxMinPosIdx As Long = -1 editPoint.MoveToLineAndOffset(selection.TopPoint.Line, 1) For arrIdx = 0 To rows - 1 Dim originalLine As Long originalLine = editPoint.Line editPoint.StartOfLine() If howFarOut > 1 Then Dim wordCount As Long For wordCount = 1 To howFarOut MoveWordRight(editPoint) Next Else SkipSpaceRight(editPoint) End If ' Yg]ۏL0RL>\ R_eudky0 If editPoint.Line > originalLine Then curCharPos(arrIdx) = -1 curDispPos(arrIdx) = -1 minCharPos(arrIdx) = -1 minDispPos(arrIdx) = -1 Else ' nx[ EditPoint vS_MR>f:yR0 curCharPos(arrIdx) = editPoint.LineCharOffset curDispPos(arrIdx) = editPoint.DisplayColumn ' nx[dkCQ }SN_Yvg\R ' (]OSX[(WSNmdvYYO ' zz}v)0 If howFarOut > 1 Then Do While IsWhitespace(editPoint.GetText(-2)) editPoint.CharLeft() Loop End If minCharPos(arrIdx) = editPoint.LineCharOffset minDispPos(arrIdx) = editPoint.DisplayColumn ' ߍ*g'Y minpos0 If maxMinPosIdx = -1 OrElse minDispPos(maxMinPosIdx) < minDispPos(arrIdx) Then maxMinPosIdx = arrIdx End If End If editPoint.LineDown() Next ' s(W g w CurPos T MinPos pe~ Nnx[ ' S(uN[P@b gCQ }vg]OvR0 anyMoved = False For arrIdx = 0 To rows - 1 If curDispPos(arrIdx) <> -1 Then AnyRowValid = True If curDispPos(arrIdx) <> minDispPos(maxMinPosIdx) Then ' dkCQ }*gcknx[P \vQyR0R ' cknxvR0 anyMoved = True editPoint.MoveToLineAndOffset(arrIdx + selection.TopPoint.Line, curCharPos(arrIdx)) editPoint.DeleteWhitespace(vsWhitespaceOptions.vsWhitespaceOptionsHorizontal) editPoint.PadToColumn(minDispPos(maxMinPosIdx)) End If End If Next ' Yg@b gCQ }GW][P R~bk_s0 If Not AnyRowValid Then anyMoved = True End If howFarOut = howFarOut + 1 Loop FixLineEnds() End Sub '' FixLineEnds Rd@b Q[-N@b gL+g>\vzz}v0 '' 6qT [N@b Q[-NNRS~>\vNaL Rd '' RSNMRN*NW[&{KNv@b gzz}v0 '' '' ُ/f LineEmUp v helper /fN*NUSrv}TN0 '' Sub FixLineEnds() Dim selection As EnvDTE.TextSelection Dim editPoint As EnvDTE.EditPoint selection = ActiveDocument.Selection editPoint = selection.TopPoint.CreateEditPoint Do While editPoint.Line < selection.BottomPoint.Line editPoint.EndOfLine() editPoint.DeleteWhitespace(vsWhitespaceOptions.vsWhitespaceOptionsHorizontal) If editPoint.GetText(-1) = ";" Then editPoint.CharLeft() editPoint.DeleteWhitespace(vsWhitespaceOptions.vsWhitespaceOptionsHorizontal) End If editPoint.LineDown() Loop End Sub '' '' NbQ*NQpe^\N FillCommentParagraph0 '' '' SetFillColumn n FillCommentParagraph kXEQe,gvR0 '' ُ/fN*N}TN (uNnxO '' FillColumnParagraph -Nnx[X[(WNR0O(uS Spe[INdk}TN ُ7h 1\SN '' N VS v}TNL-NۏL(u0 '' Sub SetFillColumn(Optional ByVal fillColumn As String = "") If (fillColumn.Length > 0) Then DTE.Globals.VariableValue("FillColumn") = CInt(fillColumn) Else Dim column As String column = InputBox("Enter the fill column:") If (column = "") Then column = "80" End If DTE.Globals.VariableValue("FillColumn") = CInt(column) End If End Sub '' FillCommentParagraph '' '' ͑enlʑkv 1 editPoint.LineUp() If Not IsOnNonEmptyCommentLine(editPoint, linePrefix) Then editPoint.LineDown() Exit Do End If Loop ' _slʑkvkNL0 Do While IsOnNonEmptyCommentLine(editPoint, linePrefix) editPoint.EndOfLine() editPoint.DeleteWhitespace(vsWhitespaceOptions.vsWhitespaceOptionsHorizontal) If editPoint.DisplayColumn > columnLimit Then ' e_vL0 Do While editPoint.DisplayColumn > columnLimit MoveWordLeft(editPoint) Loop If editPoint.LineCharOffset <= linePrefix.Length + 1 Then ' YgbN]~T]yR0Rُ7hN*NMOn sS@b ge,gs(WGWMON ' bNvSO R^\N*NUS͋yR0RSO ' &TR bN\ceQN*NzzvlʑL0 editPoint.MoveToLineAndOffset(editPoint.Line, linePrefix.Length + 1) MoveWordRight(editPoint) If editPoint.LineCharOffset = editPoint.LineLength + 1 Then ' TSyRN*NUS͋\ObNV0RL ' v+g>\ ُ7h 1\ NceQbcL&{0 editPoint.LineDown() GoTo SkipInsertNewline End If End If ' ceQbcL&{ 6qTO(ucknxv ' lʑ startCol Then ' cSv^Tv^LvNR0 editPoint.CharLeft(editPoint.LineCharOffset - lastCol) text = editPoint.GetText(startCol - lastCol).Trim() editPoint.Delete(startCol - lastCol) editPoint.LineUp() editPoint.EndOfLine() editPoint.Insert(" " + text) editPoint.LineDown() Else ' zz N uel\N*NUS͋Tv^0RdkL ' N/fyR0R NNL0 editPoint.LineDown() End If End If End If Loop Finally DTE.UndoContext.Close() End Try End Sub ' IsOnNonEmptyCommentLine ' ' g w~[v EditPoint @b(WvL nx[L/f&T:N ' lʑL( 2 And (Left(lineText, 2) = "/*" Or Left(lineText, 2) = "*/")) Or (lineText.Length > 1 And Left(lineText, 1) = "*") Then IsOnNonEmptyCommentLine = True Else IsOnNonEmptyCommentLine = False End If Else ' g ws gLN ' ~[v linePrefix /f&TwQ gv Tvlʑh0 If lineText.Equals(pfxText) Or lineText.IndexOf(pfxText) <> 0 Then IsOnNonEmptyCommentLine = False Else IsOnNonEmptyCommentLine = True End If End If End Function ' GetCommentLinePrefix ' ' 9hnc~[Lvlʑ\ R\vQyR0R NNLvL0 ' 1uNQnv EditPoint.WordRight() ' el\hp&{SƉ:NUS͋R&{ Vdk _{QdkQpe0dkQpe ' S\zz}vƋ+R:NUS͋R&{0 Sub MoveWordRight(ByRef editPoint As EnvDTE.EditPoint) Dim lineLen As Long lineLen = editPoint.LineLength If (editPoint.LineCharOffset > lineLen) Then Dim orgLine As Integer orgLine = editPoint.Line editPoint.LineDown() If (editPoint.Line > orgLine) Then editPoint.StartOfLine() End If Else ' HQǏ^zz}vW[&{0 Do While editPoint.LineCharOffset <= lineLen And Not IsWhitespace(editPoint.GetText(1)) editPoint.CharRight() Loop ' 6qTǏzz}vW[&{ N yR0R ' NN*NUS͋v_4Y0 Do While editPoint.LineCharOffset <= lineLen And IsWhitespace(editPoint.GetText(1)) editPoint.CharRight() Loop End If End Sub ' MoveWordLeft ' ' \ EditPoint T]yǏN*NUS͋0Yg EditPoint MON ' L R\vQyR0R NNLvL>\0 ' 1uNQnv EditPoint.WordLeft() ' el\hp&{SƉ:NUS͋R&{ Vdk _{QdkQpe0dkQpe ' S\zz}vƋ+R:NUS͋R&{0 Sub MoveWordLeft(ByRef editPoint As EnvDTE.EditPoint) Dim lineLen As Long lineLen = editPoint.LineLength If (editPoint.LineCharOffset = 1) Then Dim orgLine As Integer orgLine = editPoint.Line editPoint.LineUp() If (editPoint.Line < orgLine) Then editPoint.EndOfLine() End If Else ' HQǏzz}vW[&{0 Do While editPoint.LineCharOffset > 1 And IsWhitespace(editPoint.GetText(-1)) editPoint.CharLeft() Loop ' 6qTǏ^zz}vW[&{ N yR0R ' NN*NUS͋v_4Y0 Do While editPoint.LineCharOffset > 1 And Not IsWhitespace(editPoint.GetText(-1)) editPoint.CharLeft() Loop End If End Sub ' IsWhitespace ' ' g w~[vW[&{2N 6qTԏVN*N

textSelection.ActivePoint.Line) Or Not done) textSelection.SelectLine() If (DTE.Find.Execute() = vsFindResult.vsFindResultNotFound) Then outputWinPane.OutputString(textSelection.Text) End If done = InStr(DTE.StatusBar.Text, passedString) textSelection.CharLeft() textSelection.LineDown() End While '' \ceQ&{S؏S0R(udk}TNKNMRvMOn0 textSelection.MoveToPoint(textSelectionSaved) End Sub Sub CountOccurrences() Dim textSelection As EnvDTE.TextSelection Dim textSelectionPointSaved As TextPoint Dim count As Integer = 0 Dim findResult As EnvDTE.vsFindResult Dim firstFindLocation As EnvDTE.TextPoint textSelection = DTE.ActiveWindow.Selection textSelectionPointSaved = textSelection.ActivePoint.CreateEditPoint() textSelection.StartOfDocument() If (Utilities.PrepareDefaultFind("Count Occurrences") = "") Then Return End If ' 7.0 T 7.1 Hrv[O(u NR While S: ' While ((findResult = vsFindResult.vsFindResultFound) And (InStr(DTE.StatusBar.Text, "Passed") <> 1)) ' FO/f O(u Find2.WaitForFindToComplete ^\'` ' SN N(uhg(Wr`h-N>f:yvyr[e,g0 CType(DTE.Find, EnvDTE80.Find2).WaitForFindToComplete = True findResult = DTE.Find.Execute() While (findResult = vsFindResult.vsFindResultFound) If (firstFindLocation Is Nothing) Then Dim foundSelection As EnvDTE.TextSelection foundSelection = DTE.ActiveWindow.Selection firstFindLocation = foundSelection.ActivePoint.CreateEditPoint Else Dim foundSelection As EnvDTE.TextSelection foundSelection = DTE.ActiveWindow.Selection If (firstFindLocation.EqualTo(foundSelection.ActivePoint)) Then Exit While End If End If count = count + 1 findResult = DTE.Find.Execute() End While '' \ceQ&{S؏S0R(udk}TNKNMRvMOn0 textSelection.MoveToPoint(textSelectionPointSaved) MsgBox("There were " & count & " occurrences.") End Sub Sub InsertTime() Dim textSelection As EnvDTE.TextSelection textSelection = CType(DTE.ActiveDocument.Selection(), EnvDTE.TextSelection) textSelection.Text = System.DateTime.Now.ToLongTimeString() End Sub Sub InsertDate() Dim textSelection As EnvDTE.TextSelection textSelection = CType(DTE.ActiveDocument.Selection(), EnvDTE.TextSelection) textSelection.Text = System.DateTime.Now.ToLongDateString() End Sub Sub InsertTimeDate() Dim textSelection As EnvDTE.TextSelection textSelection = CType(DTE.ActiveDocument.Selection(), EnvDTE.TextSelection) textSelection.Text = System.DateTime.Now.ToLongDateString() + " " + System.DateTime.Now.ToLongTimeString() End Sub Function IsPrintableFile(ByVal projItem As EnvDTE.ProjectItem) As Boolean Dim fileName As String Dim extensions As New System.Collections.Specialized.StringCollection ' YgmR0RyvveN^\NSNSbpSv{|W ' R\勇eN{|WvibU\ TmR0RN NRh: Dim exts As String() = {".cpp", ".c", ".h", ".idl", ".def", ".rgs", ".rc", ".cs", ".vb", ".xml", ".txt", ".jsl"} extensions.AddRange(exts) fileName = projItem.FileNames(1) Return extensions.Contains(System.IO.Path.GetExtension(fileName).ToLower()) End Function ' (W㉳QeHhDn{thV-N Omȉ [yv-NveNRh ' 6qTSbpSeN0 Sub PrintItemsInSelectedProject() Dim proj As EnvDTE.Project If DTE.ActiveSolutionProjects.Length <> 1 Then MsgBox("Select one project within the Solution Explorer, then re-run this macro.") Exit Sub End If proj = DTE.ActiveSolutionProjects(0) PrintItemsInSelectedProject(proj.ProjectItems) End Sub Private Sub PrintItemsInSelectedProject(ByVal projItems As EnvDTE.ProjectItems) Dim projItem As EnvDTE.ProjectItem For Each projItem In projItems If (IsPrintableFile(projItem) = True) Then If (projItem.IsOpen(EnvDTE.Constants.vsViewKindTextView)) Then projItem.Document.PrintOut() Else Dim doc As EnvDTE.Document doc = projItem.Open(EnvDTE.Constants.vsViewKindTextView).Document doc.PrintOut() doc.Close(vsSaveChanges.vsSaveChangesNo) End If End If PrintItemsInSelectedProject(projItem.ProjectItems) Next End Sub End Module e Find.Execute() '' HrCg@b g (c) Microsoft Corporation0OYu@b gCg)R0 '' '' ُN:yOo:yYUOO(u VS ꁨRS[a!jW0 '' }6qُN:yO NS/ec FO`SN cS7hO(u0ُN:yO N/f(ueg '' o:yYUO[sBlASR%N dbgDebugMode.dbgDesignMode DTE.Debugger.StepOver() End While End Sub ' 勏[\S_MR z^-NЏLvk*N~ zvXhlP0R ' }TNzS0Q 0 Then programModule = Right(myFrame.Module, Len(myFrame.Module) - pos) Else programModule = myFrame.Module End If 'R^SpeRh For Each myArg In myFrame.Arguments If i > 0 Then args = args + ", " End If args = args + myArg.Type + " " + myArg.Name + "=" + myArg.Value i = i + 1 Next ' QFhgOo`0 commandWin.OutputString("" + vbTab + vbTab + programModule + ": " + functionName + "(" + args + ")" + vbCrLf) Next Next End If End Sub ' (W main QpeYncwep0\勭ep ' h:NꁨRnvN*Nep0 Sub AddBreakpointToMain() Dim bp As EnvDTE.Breakpoint Dim bps As EnvDTE.Breakpoints bps = DTE.Debugger.Breakpoints.Add("main") For Each bp In bps bp.Tag = "SetByMacro" Next End Sub ' ЏL0Rnv NN*Nep(Yg g)0>f:ymo`Fh Ncknxc:yQsv`Q0 Sub RunToNextBreakpoint() DTE.Debugger.Go(True) ' ЏL0R NN*Nepb z^v~>\0 If DTE.Debugger.CurrentMode = dbgDebugMode.dbgBreakMode Then Dim bp As EnvDTE.Breakpoint bp = DTE.Debugger.BreakpointLastHit() ' h"}}T-Nv~[ep0 If bp.Parent().Tag = "SetByMacro" Then ' ~[epY~wQ g cwv6rep 0 MsgBox("Hit tagged breakpoint") bp.Enabled = False Else MsgBox("Hit untagged breakpoint") End If Else MsgBox("Program ended") End If End Sub ' dkQpe\gT}T-Nv@b gep TylP0R ' QzSvez 0) Then Dim bp As EnvDTE.Breakpoint For Each bp In DTE.Debugger.AllBreakpointsLastHit bppane.OutputString(bp.Name) Next Else bppane.OutputString("No breakpoints were hit") End If End Sub ' dkQpe\gT}T-Nvep TylP0R ' QzSvez 0) Then Dim bp As EnvDTE.Breakpoint For Each bp In bps bppane.OutputString(bp.Name + vbCrLf) Next Else bppane.OutputString("No breakpoints are set" + vbCrLf) End If End Sub ' dkQpe(WQzSvezf:y ' S_MRvՋhV!j_0 Sub DebuggerMode() Dim outputWinPane As EnvDTE.OutputWindowPane outputWinPane = Utilities.GetOutputWindowPane("Debugger") Select Case DTE.Debugger.CurrentMode Case dbgDebugMode.dbgBreakMode outputWinPane.OutputString("Break Mode" + vbCrLf) Case dbgDebugMode.dbgDesignMode outputWinPane.OutputString("Design Mode" + vbCrLf) Case dbgDebugMode.dbgRunMode outputWinPane.OutputString("Run Mode" + vbCrLf) End Select End Sub ' dkQpe(WQzS-N>f:yS_MRvՋhV!j_0 Sub ShowCurrentProcess() Dim outputWinPane As EnvDTE.OutputWindowPane Dim proc As EnvDTE.Process outputWinPane = Utilities.GetOutputWindowPane("Debugger") proc = DTE.Debugger.CurrentProcess If (proc Is Nothing) Then outputWinPane.OutputString("No process is being debugged") Else outputWinPane.OutputString("" + Str(proc.ProcessID) + ": " + proc.Name + vbCrLf) End If End Sub ' dkQpe(WQzS-N>f:yۏeQ-Ne!j_vSV0 Sub LastBreakReason() Dim outputWinPane As EnvDTE.OutputWindowPane outputWinPane = Utilities.GetOutputWindowPane("Debugger") Select Case DTE.Debugger.LastBreakReason Case dbgEventReason.dbgEventReasonBreakpoint outputWinPane.OutputString("Breakpoint hit" + vbCrLf) Case dbgEventReason.dbgEventReasonNone outputWinPane.OutputString("No reason" + vbCrLf) Case dbgEventReason.dbgEventReasonExceptionNotHandled outputWinPane.OutputString("Exception not handled by the debuggee" + vbCrLf) Case dbgEventReason.dbgEventReasonExceptionThrown outputWinPane.OutputString("Exception thrown" + vbCrLf) End Select End Sub ' YgdkP[O zck(WЏL RDR0R calc.exe0 Sub AttachToCalc() Dim attached As Boolean = False Dim proc As EnvDTE.Process For Each proc In DTE.Debugger.LocalProcesses If (Right(proc.Name, 8) = "calc.exe") Then proc.Attach() attached = True Exit For End If Next If attached = False Then MsgBox("calc.exe is not running") End If End Sub ' dkP[O z\S_MRck(WՋvۏ zvRhQ0R ' QzS0 Sub ListDebuggedProcesses() Dim outputWinPane As EnvDTE.OutputWindowPane Dim proc As EnvDTE.Process outputWinPane = Utilities.GetOutputWindowPane("Debugger") If DTE.Debugger.DebuggedProcesses.Count = 0 Then outputWinPane.OutputString("No processes are being debugged." + vbCrLf) Else For Each proc In DTE.Debugger.DebuggedProcesses outputWinPane.OutputString("Process: [" + Str(proc.ProcessID) + "] " + proc.Name + vbCrLf) Next End If End Sub ' dkP[O z>f:ydkՋhV/ecv@b g0Rh ' /f0RQzSvQ0 Sub SupportedLanguages() Dim outputWinPane As EnvDTE.OutputWindowPane Dim lang As EnvDTE.Language outputWinPane = Utilities.GetOutputWindowPane("Debugger") outputWinPane.OutputString("Debugger supports the following languages:" + vbCrLf) For Each lang In DTE.Debugger.Languages outputWinPane.OutputString(lang.Name + vbCrLf) Next End Sub ' dkP[O z\ՋNS_MRck(WՋv@b gۏ z-N ' RyՋhV0 Sub DetachAll() On Error GoTo BadDetach DTE.Debugger.DetachAll() Exit Sub BadDetach: MsgBox("Could not detach from all processes.") End Sub ' [NS_MRYN;mRr`vnech dkP[O zЏL0R ' OeQvLS@b(WL0Spe/fW[&{2N N/ftepe V:N ' }TNzSSAQ OW[&{2NSpe0 Sub RunToLine(Optional ByVal line As String = "-1") If Val(line) <> -1 Then Dim textSelection As EnvDTE.TextSelection textSelection = DTE.ActiveDocument.Selection textSelection.GotoLine(Val(line)) DTE.Debugger.RunToCursor() End If End Sub ' dkP[O z{~[vh_ >f:yh_v dbgDebugMode.dbgDesignMode) End If End Function End Module bp.Tag = "SetByMacro" Next End Sub ' Runs to the next breakpoint set, if any. Displays a messageb'' HrCg@b g (c) Microsoft Corporation0OYu@b gCg)R0 '' '' ُN:yOo:yYUOO(u VS ꁨRS[a!jW0 '' }6qُN:yO NS/ec FO`SN cS7hO(u0ُN:yO N/f(ueg '' o:yYUO[sBlASR%Nf:yR0 '' Sub TurnOffLineNumbers() DTE.Properties("TextEditor", "Basic").Item("ShowLineNumbers").Value = False DTE.Properties("TextEditor", "PlainText").Item("ShowLineNumbers").Value = False DTE.Properties("TextEditor", "CSharp").Item("ShowLineNumbers").Value = False DTE.Properties("TextEditor", "HTML").Item("ShowLineNumbers").Value = False DTE.Properties("TextEditor", "C/C++").Item("ShowLineNumbers").Value = False DTE.Properties("TextEditor", "XML").Item("ShowLineNumbers").Value = False End Sub '' '' [@b g/T(uTy(uꁨRbcL0 '' '' TurnOnWordWrap (We,ghVƉV-N/T(uꁨRbcL ُ7h '' `(We1\ N4ls^nRag0 '' Sub TurnOnWordWrap() DTE.Properties("TextEditor", "Basic").Item("WordWrap").Value = True DTE.Properties("TextEditor", "PlainText").Item("WordWrap").Value = True DTE.Properties("TextEditor", "CSharp").Item("WordWrap").Value = True DTE.Properties("TextEditor", "HTML").Item("WordWrap").Value = True DTE.Properties("TextEditor", "C/C++").Item("WordWrap").Value = True DTE.Properties("TextEditor", "XML").Item("WordWrap").Value = True End Sub '' TurnOffWordWrap (We,ghVƉV-Ny(uꁨRbcL0 '' Sub TurnOffWordWrap() DTE.Properties("TextEditor", "Basic").Item("WordWrap").Value = False DTE.Properties("TextEditor", "PlainText").Item("WordWrap").Value = False DTE.Properties("TextEditor", "CSharp").Item("WordWrap").Value = False DTE.Properties("TextEditor", "HTML").Item("WordWrap").Value = False DTE.Properties("TextEditor", "C/C++").Item("WordWrap").Value = False DTE.Properties("TextEditor", "XML").Item("WordWrap").Value = False End Sub '' '' NbQ*NO zo:yYUOǑ(uNyvesQve_Omȉyv0 '' dk:yOKN@bN͑ /fV:N VC [svQ '' ProjectItems ƖTve_0VC (WvQvB\ ProjectItems '' ƖT-NRQ@b geN v^(WNk*NeN9YpsQTv ProjectItems ƖT '' -NRQُNeN0FO/f (W ProjectItem.Collection '' NbQ*NO zo:yYUOǑ(uNyvesQve_Omȉyv0 '' RB\v0S gNvc '' (W㉳QeHhDn{thVvyvp N[E>f:yveNMbOԏV Project.ProjectItems ƖT '' ƖT/f:N ProjectItem.Collection ԏVv0 '' '' ListProj [g*Nyv-Nv@b gyۏL_s 6qTQeQTyv Ty '' (SbeN9Yp Ty) v^O(u)ۏb__>f:y '' yvvB\!k~g0؞`Q N Q>f:y(W QzS '' -N FO/f Yg`(W }TNzS -N(udky [O\]v '' Q O0R }TNzS -N0 '' Sub ListProj() Dim project As Project Dim projectObjects As Object() Dim window As Window Dim target As Object window = DTE.Windows.Item(Constants.vsWindowKindCommandWindow) projectObjects = DTE.ActiveSolutionProjects If projectObjects.Length = 0 Then Exit Sub End If project = DTE.ActiveSolutionProjects(0) If (DTE.ActiveWindow Is window) Then target = window.Object Else target = GetOutputWindowPane("List Project") target.Clear() End If ListProjAux(project.ProjectItems(), 0, target) End Sub Sub ListProjAux(ByVal projectItems As EnvDTE.ProjectItems, ByVal level As Integer, ByVal outputWinPane As Object) Dim projectItem As EnvDTE.ProjectItem For Each projectItem In projectItems '' _eu NNdkƖT:N9hvy(hg VC yv!jW)0 If projectItem.Collection Is projectItems Then Dim projectItems2 As EnvDTE.ProjectItems Dim notSubCollection As Boolean OutputItem(projectItem, level, outputWinPane) '' S_dky+T gP[yeR_... projectItems2 = projectItem.ProjectItems notSubCollection = projectItems2 Is Nothing If Not notSubCollection Then ListProjAux(projectItems2, level + 1, outputWinPane) End If End If Next End Sub Sub OutputItem(ByVal projectItem As EnvDTE.ProjectItem, ByVal level As Integer, ByVal outputWinPane As Object) Dim i As Integer = 0 While (i < level) outputWinPane.OutputString(" ") i = i + 1 End While outputWinPane.OutputString(projectItem.FileNames(1)) outputWinPane.OutputString(Microsoft.VisualBasic.Constants.vbCrLf) End Sub '' '' Bgy}TN '' '' dk}TNSň O~v COM {|W^ ЏL tlbimp Nub '' Xb{Sň \ DLL >e(W VSMacros ЏLvU_([ň devenv.exe v '' PublicAssemblies P[vU_) N 6qTmR[Xb{Sň '' vyv_(u0 '' '' la: Yg(W[ՋhVЏLv TeЏLdk[ R\OQ0 '' dk[N^Ǐ Visual Studio Qv[Dn{thVЏL0 Sub AddClassicComRef() Dim systemDirectory, outputFileName, outputDirectory As String Dim sdkDirectory, macroProjectName As String Dim projectToAddReferenceTo As VSLangProj.VSProject Dim openFileDialog As Forms.FileDialog Dim tlbimpPath As Microsoft.Win32.RegistryKey Dim winptr As WinWrapper Try winptr = New WinWrapper openFileDialog = New Forms.OpenFileDialog ' \RYvU_n:N SystemDrive0 systemDirectory = System.Environment.SystemDirectory() systemDirectory = Left(systemDirectory, InStr(systemDirectory, "\", CompareMethod.Text)) openFileDialog.InitialDirectory = systemDirectory openFileDialog.Filter = "Type Libraries (*.tlb)|*.tlb|DLLs (*.dll)|*.dll|All files (*.*)|*.*" openFileDialog.FilterIndex = 1 openFileDialog.Title = "Open COM type library" If openFileDialog.ShowDialog(winptr) = Forms.DialogResult.OK Then ' R^QeN T0 outputFileName = Right(openFileDialog.FileName, Len(openFileDialog.FileName) - Len(System.Environment.CurrentDirectory) - 1) outputFileName = Left(outputFileName, InStr(outputFileName, ".", CompareMethod.Text) - 1) outputFileName = outputFileName & ".dll" ' \QvU_n:N VsMacros vU_0 outputDirectory = Left(DTE.FullName, InStr(DTE.FullName, "devenv.exe", CompareMethod.Text) - 1) outputDirectory = outputDirectory & "PublicAssemblies\" tlbimpPath = Microsoft.Win32.Registry.LocalMachine.OpenSubKey("software\microsoft\.NetFramework") If Not tlbimpPath Is Nothing Then sdkDirectory = tlbimpPath.GetValue("SDKInstallRootv2.0", "") & "bin" End If If sdkDirectory = "bin" Then MsgBox("Unable to get tlbimp.exe location from registry") Exit Sub End If Microsoft.VisualBasic.ChDir(sdkDirectory) Microsoft.VisualBasic.Shell("cmd /c tlbimp.exe """ & openFileDialog.FileName & """ /out:""" & outputDirectory & outputFileName & """", AppWinStyle.NormalFocus, True) ' S[vQmR_(uvyv0 macroProjectName = InputBox("Please enter the project to add the reference to (entering nothing or canceling will default to the first project in the solution)", "AddComReference") If Len(macroProjectName) = 0 Then ' Yg*gc[ Ty RmR0R,{N*N[yv-N0 projectToAddReferenceTo = DTE.MacrosIDE.Solution.Projects.Item(1).Object Else Dim project As EnvDTE.Project For Each project In DTE.MacrosIDE.Solution.Projects If project.Name = macroProjectName Then projectToAddReferenceTo = project.Object End If Next End If If projectToAddReferenceTo Is Nothing Then MsgBox("Was unable to grab Macros solution project") Exit Sub End If openFileDialog.FileName = outputDirectory & outputFileName If openFileDialog.CheckFileExists() = False Then MsgBox("Was unable to create COM+ wrapper") Exit Sub End If If projectToAddReferenceTo.References.Add(outputDirectory & outputFileName) Is Nothing Then MsgBox("Was unable to add the reference") End If End If Catch err As System.Exception MsgBox(err.Message) End Try End Sub '' FindCase /TR g~b [݋Fh v^\:SR'Y\Qn:NSb_0 '' Sub FindCase() DTE.ExecuteCommand("Edit.Find") DTE.Find.MatchCase = True End Sub '' FindLastTarget /TR g~b [݋Fh OO(ugTN*N '' g~bvh v^͑Q؞]wQ y yO ''  g~b [݋FhSN(WhV-N S*g [vUS͋0 '' Sub FindLastTarget() Dim findWhatLast As String findWhatLast = DTE.Find.FindWhat ' (W/TR[݋FhMRۏL S NԏV NN*N!j_0 DTE.ExecuteCommand("Edit.Find") DTE.Find.FindWhat = findWhatLast End Sub '' FindLine /TR g~b [݋Fh ǏS_MRLeg!j_0 '' Sub FindLine() Dim textSelection As TextSelection textSelection = DTE.ActiveDocument.Selection textSelection.CharLeft(True) DTE.ExecuteCommand("Edit.Find") DTE.Find.FindWhat = textSelection.Text End Sub '' ListModifiedDocuments (W QzS -NRQ@b gSb_vech '' ُNechS_MR]fe(OX[)0 '' Sub ListModifiedDocuments() Dim window As Window Dim target As Object Dim document As EnvDTE.Document window = DTE.Windows.Item(Constants.vsWindowKindCommandWindow) If (DTE.ActiveWindow Is window) Then target = window.Object Else target = GetOutputWindowPane("Modified Documents") target.clear() End If For Each document In DTE.Documents If Not document.Saved Then target.OutputString(document.Name & " " & document.FullName & Microsoft.VisualBasic.Constants.vbCrLf) End If Next End Sub '' InsertDocComments O(u VS Nx!jWOmȉS_MRech '' NO\ech7h_lʑmR0Rk*NQpe0 '' Sub InsertDocComments() Dim projectItem As ProjectItem Dim fileCodeModel As FileCodeModel Dim codeElement As CodeElement Dim codeElementType As CodeType Dim editPoint As EditPoint Dim commentStart As String projectItem = DTE.ActiveDocument.ProjectItem fileCodeModel = projectItem.FileCodeModel codeElement = fileCodeModel.CodeElements.Item(1) '' [N:yO NP '' OutlineCode :yO7h NR_Q\ve_[@b gNxۏLYt0SS勇eN-N,{N*N CodeType '' sSS0 If (TypeOf codeElement Is CodeNamespace) Then codeElement = codeElement.members.item(1) End If If (TypeOf codeElement Is CodeType) Then codeElementType = CType(codeElement, CodeType) Else Throw New Exception("Didn't find a type definition as first thing in file or find a namespace as the first thing with a type inside the namespace.") End If editPoint = codeElementType.GetStartPoint(vsCMPart.vsCMPartHeader).CreateEditPoint() '' _YۏLechlʑ0 commentStart = LineOrientedCommentStart() If (commentStart.Length = 2) Then commentStart = commentStart & commentStart.Chars(1) & " " ElseIf (commentStart.Length = 1) Then commentStart = commentStart & commentStart.Chars(0) & commentStart.Chars(0) & " " End If '' Odkd\O NSdm0O(u Try...Finally nxO ''  dm N Ne YNsQ핶r`0 Try DTE.UndoContext.Open("Insert Doc Comments") '' _sNxCQ } ُNCQ }SQQpevechlʑ0 For Each codeElement In codeElementType.Members If (codeElement.Kind = vsCMElement.vsCMElementFunction) Then '' SSpe0 Dim parameters As CodeElements Dim codeFunction As CodeFunction Dim codeElement2 As CodeElement Dim codeParameter As CodeParameter codeFunction = codeElement editPoint.MoveToPoint(codeFunction.GetStartPoint(vsCMPart.vsCMPartHeader)) 'editPoint.LineUp() parameters = codeFunction.Parameters '' ۏLlʑ0 editPoint.Insert(Microsoft.VisualBasic.Constants.vbCrLf) editPoint.LineUp() editPoint.Insert(Microsoft.VisualBasic.Constants.vbTab & commentStart & "<summary>") editPoint.Insert(Microsoft.VisualBasic.Constants.vbCrLf) editPoint.Insert(Microsoft.VisualBasic.Constants.vbTab & commentStart & "Summary of " & codeElement.Name & ".") editPoint.Insert(Microsoft.VisualBasic.Constants.vbCrLf) editPoint.Insert(Microsoft.VisualBasic.Constants.vbTab & commentStart & "</summary>") editPoint.Insert(Microsoft.VisualBasic.Constants.vbCrLf) editPoint.Insert(Microsoft.VisualBasic.Constants.vbTab & commentStart) For Each codeElement2 In parameters codeParameter = codeElement2 editPoint.Insert("<param name=" & codeParameter.Name & "></param>") editPoint.Insert(Microsoft.VisualBasic.Constants.vbCrLf) editPoint.Insert(Microsoft.VisualBasic.Constants.vbTab & commentStart) Next 'Spe End If '_N*NQpe Next 'Nx elt bXT Finally DTE.UndoContext.Close() End Try End Sub '' ListMacroSamples o:yYUOO(ugN VS ]wQzSO(uv UIHierarchy [a '' ُN]wQzSSb [Dn{thV T ㉳QeHhDn{thV 0 '' Sub ListMacroSamples() Dim uiHierarchy As UIHierarchy Dim samplesUIHierarchy As UIHierarchyItem Dim outputWindowPane As OutputWindowPane Dim uiHierarchyItem As UIHierarchyItem uiHierarchy = DTE.Windows.Item(Constants.vsWindowKindMacroExplorer).Object samplesUIHierarchy = uiHierarchy.GetItem("Macros\Samples") outputWindowPane = Utilities.GetOutputWindowPane("List Macros") outputWindowPane.Clear() samplesUIHierarchy.UIHierarchyItems.Expanded = True For Each uiHierarchyItem In samplesUIHierarchy.UIHierarchyItems Dim macroUIHierarchyItem As UIHierarchyItem outputWindowPane.OutputString(uiHierarchyItem.Name & Microsoft.VisualBasic.Constants.vbCrLf) uiHierarchyItem.UIHierarchyItems.Expanded = True For Each macroUIHierarchyItem In uiHierarchyItem.UIHierarchyItems outputWindowPane.OutputString(" " & macroUIHierarchyItem.Name & Microsoft.VisualBasic.Constants.vbCrLf) Next Next End Sub '' '' dk!jWWTvQN!jWWv Helper Qpe0 '' Function LineOrientedCommentStart(Optional ByVal document As Document = Nothing) As String Dim extension As String If (document Is Nothing) Then document = DTE.ActiveDocument End If extension = document.Name If (extension.EndsWith(".cs") Or extension.EndsWith(".cpp") Or extension.EndsWith(".h") Or extension.EndsWith(".idl") Or extension.EndsWith(".jsl")) Then Return "//" ElseIf (extension.EndsWith(".vb")) Then Return "'" Else Throw New Exception("Unrecognized file type. You can add this file type by modifying the function Utilities.LineOrientedCommentStart to include the extension of this file.") End If End Function Function GetOutputWindowPane(ByVal Name As String, Optional ByVal show As Boolean = True) As OutputWindowPane Dim window As Window Dim outputWindow As OutputWindow Dim outputWindowPane As OutputWindowPane window = DTE.Windows.Item(EnvDTE.Constants.vsWindowKindOutput) If show Then window.Visible = True outputWindow = window.Object Try outputWindowPane = outputWindow.OutputWindowPanes.Item(Name) Catch e As System.Exception outputWindowPane = outputWindow.OutputWindowPanes.Add(Name) End Try outputWindowPane.Activate() Return outputWindowPane End Function Function PrepareDefaultFind(ByVal prompt As String) As String Dim what As String DTE.Find.MatchWholeWord = False DTE.Find.Action = vsFindAction.vsFindActionFind DTE.Find.Target = vsFindTarget.vsFindTargetCurrentDocument DTE.Find.MatchCase = False DTE.Find.Backwards = False DTE.Find.MatchInHiddenText = True DTE.Find.PatternSyntax = vsFindPatternSyntax.vsFindPatternSyntaxLiteral what = InputBox(prompt) If (what <> "") Then DTE.Find.FindWhat = what End If Return what End Function End Module '' dk{|(uN\(uv6r~n:NSNN[Q>f:yvNUO(u7bLub0 '' gsQYUOO(udk{|v:yO S AddClassicComRef [ Public Class WinWrapper Implements System.Windows.Forms.IWin32Window Overridable ReadOnly Property Handle() As System.IntPtr Implements System.Windows.Forms.IWin32Window.Handle Get Dim iptr As New System.IntPtr(DTE.MainWindow.HWnd) Return iptr End Get End Property End Class rojectName) = 0 Then ' If no name specified, adds to the first macro project. projectToAddReferenceTo = DTE.MacrosIDE.Solution.Projects.Item(1).Object'' HrCg@b g (c) Microsoft Corporation0OYu@b gCg)R0 '' '' ُN:yOo:yYUOO(u VS ꁨRS[a!jW0 '' }6qُN:yO NS/ec FO`SN cS7hO(u0ُN:yO N/f(ueg '' o:yYUO[sBlASR%NeeQ ' eeN-N0NdkY RdNx: newTextDocument.Selection.SelectAll() textSel = newTextDocument.Selection textSel.Delete() ' EnvironmentEvents ]n:N Option Strict Off NQgbLd\O0 If (projItem.Name <> "EnvironmentEvents") Then textSel.Insert("Option Strict Off" + vbLf) End If textSel.Insert(docText) ' [Bl!jWW TNyveN T ' v T0(WdkYO(u Ty(WNx!jW-Ng~b!jWW: newCodeModel = newProjectItem.FileCodeModel() moduleCodeElement = newCodeModel.CodeElements.Item(projItem.Name) textSel = newTextDocument.Selection textSel.MoveToPoint(moduleCodeElement.GetStartPoint(vsCMPart.vsCMPartWhole), False) textSel.EndOfLine(False) ' Ygck(WubveN/fN*N{| R_{qQN DTE Sϑ0 If (projItem.FileCodeModel.CodeElements.Item(1).Kind = vsCMElement.vsCMElementClass) Then textSel.Insert(vbLf + vbTab + "public shared DTE as EnvDTE80.DTE2") Else textSel.Insert(vbLf + vbTab + "public Dim DTE as EnvDTE80.DTE2") End If ' s(W:NYc z^R^ QueryStatus0Exec T OnConnection: For Each codeElt In CType(moduleCodeElement, CodeType).Members() If (codeElt.Kind = vsCMElement.vsCMElementFunction) Then Dim codeFunc As EnvDTE.CodeFunction = codeElt If (IsMacroCallableFunction(codeFunc) = True) Then Dim commandName As String = proj.Name + ".Connect." + codeFunc.Name execCode = execCode + "If commandName = """ + commandName + """ Then" + vbLf execCode = execCode + "handled = True" + vbLf execCode = execCode + projItem.Name + ".DTE = _applicationObject" + vbLf execCode = execCode + projItem.Name + "." + codeFunc.Name + "()" + vbLf execCode = execCode + "Exit Sub" + vbLf + "End If" + vbLf queryStatusCode = queryStatusCode + "If commandName = """ + commandName + """Then" + vbLf queryStatusCode = queryStatusCode + "status = CType(vsCommandStatus.vsCommandStatusEnabled + vsCommandStatus.vsCommandStatusSupported, vsCommandStatus)" + vbLf + "End If" + vbLf onConnectionCode = onConnectionCode + "CommandObj = _applicationObject.Commands.AddNamedCommand(objAddIn, """ + codeFunc.Name + """, """ + codeFunc.Name + """, ""TODO: Enter your command description"", True, 59, Nothing, 1 + 2) '1+2 == vsCommandStatusSupported+vsCommandStatusEnabled" + vbLf onConnectionCode = onConnectionCode + "CommandObj.AddControl(objCommandBar)" + vbLf End If End If Next End If Next ' ub Exec0QueryStatus T OnConnection elv~>\R ' 6qT (uubvNxfbcYc z^-NvNx0 execCode = execCode + "End If" + vbLf + "End Sub" + vbLf objExecCodeElement = CType(connectCodeElement, CodeType).Members().Item("Exec") execEditPoint = objExecCodeElement.GetStartPoint(vsCMPart.vsCMPartWhole).CreateEditPoint() execEditPoint.Delete(objExecCodeElement.GetEndPoint(vsCMPart.vsCMPartWhole)) execEditPoint.Insert(execCode) queryStatusCode = queryStatusCode + vbLf + "End If" + vbLf + "End Sub" queryStatusCodeElement = CType(connectCodeElement, CodeType).Members().Item("QueryStatus") execEditPoint = queryStatusCodeElement.GetStartPoint(vsCMPart.vsCMPartWhole).CreateEditPoint() execEditPoint.Delete(queryStatusCodeElement.GetEndPoint(vsCMPart.vsCMPartWhole)) execEditPoint.Insert(queryStatusCode) onConnectionCode = onConnectionCode + "Else" + vbLf onConnectionCode = onConnectionCode + "'If you are not using events, you may wish to remove some of these to increase performance." + vbLf onConnectionCode = onConnectionCode + "EnvironmentEvents.DTEEvents = CType(_applicationObject.Events.DTEEvents, EnvDTE.DTEEvents)" + vbLf onConnectionCode = onConnectionCode + "EnvironmentEvents.DocumentEvents = CType(_applicationObject.Events.DocumentEvents(Nothing), EnvDTE.DocumentEvents)" + vbLf onConnectionCode = onConnectionCode + "EnvironmentEvents.WindowEvents = CType(_applicationObject.Events.WindowEvents(Nothing), EnvDTE.WindowEvents)" + vbLf onConnectionCode = onConnectionCode + "EnvironmentEvents.TaskListEvents = CType(_applicationObject.Events.TaskListEvents(""""), EnvDTE.TaskListEvents)" + vbLf onConnectionCode = onConnectionCode + "EnvironmentEvents.FindEvents = CType(_applicationObject.Events.FindEvents, EnvDTE.FindEvents)" + vbLf onConnectionCode = onConnectionCode + "EnvironmentEvents.OutputWindowEvents = CType(_applicationObject.Events.OutputWindowEvents(""""), EnvDTE.OutputWindowEvents)" + vbLf onConnectionCode = onConnectionCode + "EnvironmentEvents.SelectionEvents = CType(_applicationObject.Events.SelectionEvents, EnvDTE.SelectionEvents)" + vbLf onConnectionCode = onConnectionCode + "EnvironmentEvents.SolutionItemsEvents = CType(_applicationObject.Events.SolutionItemsEvents, EnvDTE.ProjectItemsEvents)" + vbLf onConnectionCode = onConnectionCode + "EnvironmentEvents.MiscFilesEvents = CType(_applicationObject.Events.MiscFilesEvents, EnvDTE.ProjectItemsEvents)" + vbLf onConnectionCode = onConnectionCode + "EnvironmentEvents.DebuggerEvents = CType(_applicationObject.Events.DebuggerEvents, EnvDTE.DebuggerEvents)" + vbLf onConnectionCode = onConnectionCode + "End If" + vbLf onConnectionCode = onConnectionCode + "End Sub" onConnectionCodeElement = CType(connectCodeElement, CodeType).Members().Item("OnConnection") execEditPoint = onConnectionCodeElement.GetStartPoint(vsCMPart.vsCMPartWhole).CreateEditPoint() execEditPoint.Delete(onConnectionCodeElement.GetEndPoint(vsCMPart.vsCMPartWhole)) execEditPoint.Insert(onConnectionCode) ' _(u[yv_(uv@b g z^Ɩ0 CopyReferences(proj, macroProject) ' [yv+T g[ System.Windows.Forms vυ_(u0YgO(u(u ' MsgBox vNUONx RS_ыN[yvubvYc z^e Yg NmR[ z^Ɩ ' v_(u \O_0RGYpe*N0 proj.Object.References.Add("System.Windows.Forms.dll") ' nt Connect.vb -NvNx(&TR Nx wweg1\/fNYtv)0 Try Dim connectTextSelection As EnvDTE.TextSelection = connectProjectItem.Document.Selection() connectTextSelection.SelectAll() connectTextSelection.SmartFormat() connectTextSelection.Collapse() Catch End Try completionMessage = "Add-in generation complete" + vbLf + vbLf completionMessage = completionMessage + "To make sure your Add-in compiles, you need to perform two actions:" + vbLf completionMessage = completionMessage + "1) If you had any modules with an 'Option Explicit', a duplicate will appear in the generated module. You need to remove the duplicate." + vbLf completionMessage = completionMessage + "2) Any calls to automation methods/properties not prepended with 'DTE.' will need to have these manually added (for example, change 'ActiveDocument()' to 'DTE.ActiveDocument()')." MsgBox(completionMessage, MsgBoxStyle.Information, "Make Add-in From Macro Project") End Sub ' \_(uNN*Nyv Y6R0RSN*Nyv0 Sub CopyReferences(ByVal objProjectDest As EnvDTE.Project, ByVal objProjectSrc As EnvDTE.Project) Dim objReferenceSrc As VSLangProj.Reference Dim objReferencesDest As VSLangProj.References objReferencesDest = objProjectDest.Object.References For Each objReferenceSrc In objProjectSrc.Object.References If (objReferenceSrc.Path <> "") Then If (objReferenceSrc.Name <> "EnvDTE") And (objReferenceSrc.Name <> "EnvDTE80") And (objReferenceSrc.Name <> "Microsoft.VisualStudio.CommandBars") Then Try objReferencesDest.Add(objReferenceSrc.Path) Catch MsgBox("Could not add a reference to " & objReferenceSrc.Path & vbLf & "Try adding a reference manually.") End Try End If End If Next End Sub ' O(uNHN/f[bNHN N/f[vĉR nx[ ' CodeFunction /f&T:N[0 Function IsMacroCallableFunction(ByVal codeFunc As EnvDTE.CodeFunction) Dim paramText As String Dim param As EnvDTE.CodeParameter ' N(u Private {|WvP[Qpe/Qpe0 If (codeFunc.Access = vsCMAccess.vsCMAccessPrivate) Then Return False End If ' [ NS+TSpeb@b gSpe_{:NS W[&{2N0 ' Ygl gSpe dkY\Suw0 If (codeFunc.Parameters.Count = 0) Then Return True End If ' 勹el gSpe nxOُNSpe/fS W[&{2N0 For Each param In codeFunc.Parameters paramText = param.GetStartPoint(vsCMPart.vsCMPartWhole).CreateEditPoint().GetText(param.GetEndPoint(vsCMPart.vsCMPartWhole)) If (paramText.StartsWith("Optional ") = False) Then Return False ElseIf (param.Type.TypeKind <> vsCMTypeRef.vsCMTypeRefString) Then Return False End If Next Return True End Function End Module End Module de = onConnectionCode + "'If your command no longer appears on the appropriate command bar, or if you would like to re-create the command," + vbLf onConnectio'' HrCg@b g (c) Microsoft Corporation0OYu@b gCg)R0 '' '' dk!jWWS+Tv[egy i0R VSMacros IDE -Nv Developer Studio 6.0 '' [:yO01uNُN[N '' VC++ v6 NT-Nv[QNN[hQv T Vdk vQQe_[N '' S_MRv Tv[eg S N/fgsOv0 '' '' ُN:yOo:yYUOO(u VS ꁨRS[a!jW0 '' }6qُN:yO NS/ec FO`SN cS7hO(u0ُN:yO N/f(ueg '' o:yYUO[sBlASR%N EnvDTE.vsWindowType.vsWindowTypeDocument Then MsgBox("This macro can only be run when a text editor window is active.") Else TypeOfFile = FileType(DTE.ActiveDocument) If TypeOfFile > 0 And TypeOfFile < 5 Then ' C T Java O(u TN*N ' 7h_v commentextSelection0 DTE.ActiveDocument.Selection.text() = "/*" & DTE.ActiveDocument.Selection.text() & "*/" ElseIf TypeOfFile = 5 Then DTE.ActiveDocument.Selection.text() = "<!-- " & DTE.ActiveDocument.Selection.text() & " -->" ElseIf TypeOfFile = 6 Or TypeOfFile = 7 Then ' 1uNl gvQNeN{|W-N7hv~lʑ Vdk ' _{_skNL v^:Nv^LnN*N '0 ' dkY 1uN VBS/DEF (Wdkyr[RvR&{Yvlʑ N/fN ' ' ~_g Vdk _{lʑcteLNx N/f ' vQ-NvgN0 If TypeOfFile = 6 Then CommentType = " ' " Else CommentType = " ; " End If StartLine = DTE.ActiveDocument.Selection.TopLine EndLine = DTE.ActiveDocument.Selection.BottomLine If EndLine < StartLine Then Temp = StartLine StartLine = EndLine EndLine = Temp End If If EndLine = StartLine Then DTE.ActiveDocument.Selection.text() = CommentType & DTE.ActiveDocument.Selection.text() Else For i = StartLine To EndLine DTE.ActiveDocument.Selection.GotoLine(i) DTE.ActiveDocument.Selection.SelectLine() DTE.ActiveDocument.Selection.text() = CommentType & DTE.ActiveDocument.Selection.text() Next End If Else MsgBox("Unable to comment out the highlighted text" + CStr(Lf) + "because the file type was unrecognized." + CStr(Lf) + "If the file has not yet been saved, " + CStr(Lf) + "please save it and try again.") End If End If End Sub Function FileType(ByVal doc As EnvDTE.Document) As Integer ' Ygnx[neNv{|W dkO z gYy ' (u0 ' ԏV 0 Then Do While pos <> 1 ext = Mid(ext, pos, Len(ext) - pos + 1) pos = InStr(ext, ".") Loop ext = LCase(ext) End If If ext = ".rc" Or ext = ".rc2" Then FileType = 4 ElseIf doc.Language = EnvDTE.Constants.dsCPP Then FileType = 1 ElseIf doc.Language = EnvDTE.Constants.dsJava Then FileType = 2 ElseIf doc.Language = EnvDTE.Constants.dsIDL Then FileType = 3 ElseIf doc.Language = EnvDTE.Constants.dsHTML_IE3 Then FileType = 5 ElseIf ext = ".xml" Then FileType = 5 ElseIf doc.Language = EnvDTE.Constants.dsHTML_RFC1866 Then FileType = 5 ElseIf doc.Language = EnvDTE.Constants.dsVBSMacro Then ' FileType = 6 ElseIf ext = ".def" Then FileType = 7 Else FileType = 0 End If End Function Sub ToggleCommentStyle() Dim CmtBlock As String Dim TmpBlock As String Dim selection As EnvDTE.TextSelection ' f: (Wlʑ7h_ /* T // KNۏLRbc0 TmpBlock = "" selection = DTE.ActiveDocument.Selection CmtBlock = selection.Text() TypeOfFile = FileType(DTE.ActiveDocument) If TypeOfFile > 0 And TypeOfFile < 5 Then ' C/C++ 7h_vlʑ0 ' SlʑWWvMR$N*NW[&{0 Trim(CmtBlock) If InStr(CmtBlock, "//") <> 0 Then Do While InStr(CmtBlock, "//") <> 0 TmpBlock = TmpBlock + Left(CmtBlock, InStr(CmtBlock, "//") - 1) CmtBlock = Right(CmtBlock, (Len(CmtBlock) - InStr(CmtBlock, "//") - 1)) Loop CmtBlock = "/*" + TmpBlock + CmtBlock + "*/" ElseIf InStr(CmtBlock, "/*") <> 0 Then CmtBlock = Right(CmtBlock, Len(CmtBlock) - InStr(CmtBlock, "/*") - 1) Do While InStr(CmtBlock, CStr(Lf)) <> 0 TmpBlock = TmpBlock + Left(CmtBlock, InStr(CmtBlock, CStr(Lf))) + "//" CmtBlock = Right(CmtBlock, (Len(CmtBlock) - InStr(CmtBlock, CStr(Lf)))) Loop CmtBlock = "//" + TmpBlock + Trim(CmtBlock) CmtBlock = Left(CmtBlock, InStr(CmtBlock, "*/") - 1) End If selection = DTE.ActiveDocument.Selection selection.Delete() selection.Text() = CmtBlock Else MsgBox("This macro does not work on this type of file.") End If End Sub Function StripTabs(ByVal MyStr As String) ' SdMR[6RhMO0 While InStr(MyStr, Microsoft.VisualBasic.ControlChars.Tab) > 1 MyStr = Right(MyStr, Len(MyStr) - InStr(MyStr, CStr(Microsoft.VisualBasic.ControlChars.Tab))) End While StripTabs = Trim(MyStr) End Function Sub CloseExceptActive() ' f: sQS_MRzSNYv@b ghVzS0 Dim current As Integer = 1 Dim i As Integer Dim countOfDocs As Integer = DTE.Documents.Count While (True) Dim doc As EnvDTE.Document doc = DTE.Documents.Item(current) If DTE.ActiveDocument.FullName <> doc.FullName Then ' N/fS_MRech0 doc.Close(vsSaveChangesPrompt) Else current = current + 1 End If countOfDocs = DTE.Documents.Count If (current > countOfDocs) Then Exit While End If End While End Sub Sub AddRevisionMarks() ' f: TeN-NmRlʑ ُNlʑc@bZPvf9e0 ' dkO z\evlʑWWmR0ReNvv ' z^XTSN(WvQ-NnOh Nc[勇eN@bZPvf9e0 ' dkO zvO(uĉRY N: ' 1) NeNvv_Y0 ' 2) [kNLۏLkbcYgS_MRLNlʑ_4Y ' Rbc0R NNL0 ' 3) YgS_MRYN~lʑWW-N R~~bcL v ' 0RWWv~>\0 ' 4) YgYNLylʑ(OY //0' T rem I{)-N ' R~~bcL v0R NNlʑ_4YvL0 '  Nlʑ_4Y ve_h:y(WgNL-N ' SdwYYvzz\dY0 EveryLine = "" '/f&T(WkNL ' (VBS T DEF {|W)>enlʑh? ' HQ nxO;mRech/fe,gzS ' ( NN[ُ7hZP FOُ/f*N}YvZPl)0 If DTE.ActiveDocument.Type = "Text" Then TypeOfFile = FileType(DTE.ActiveDocument) ' (WechvgvۏLbn0 ' dkd\O_NOndNUO@b Q[0 DTE.ActiveDocument.Selection.StartOfDocument() DTE.ActiveDocument.Selection.SelectLine() selection = DTE.ActiveDocument.Selection CurrText = selection.Text CurrText = LTrim(CurrText) ' Nbv@b gNxgbLvd\O'Yv T ' FOg~b N Tlʑ{|WdY0 If TypeOfFile > 0 And TypeOfFile < 5 Then ' C/C++ Nx|R0 ContSearch = True BeginComment = "/*" EndComment = "*/" EveryLine = " " ' (W C/C++ 7h_vNx-N _{g~b // ' Yg~b N0R Rg~b /*0 Do selection.Text = CurrText If InStr(CurrText, "//") = 1 Then '  // /f&TS(u? selection.SelectLine() CurrText = LTrim(selection.Text) ' Rdzz}v0 ContSearch = False ' g w // 7h_vlʑ ' Ng~b /* 7h_0 Else Exit Do End If Loop If ContSearch = False Then DTE.ActiveDocument.Selection.LineUp() End If ' (u DTE.ActiveDocument.Selection.SelectLine el ' N(Wzz}vYUSQ hv\O(uv T ' sS bSbVf&{(WQvNteL0 ' Vdk IQhOy0R NNL ' N Sr^pbdk{l0N/f(WYMOn ' \O w0R LineUp/LineDown }TNv~T0ǏgbL ' ُN}TN SNOIQh Ny N ndS_MRv ' @b Q[(SbǏVf&{) ' 6qT͑e Ny V0R TNL0ُ7h ' SNMQǏgL( NO(u LineUp/LineDown ~T ' 1\OQsُy`Q)vqSi0 If ContSearch = True Then DTE.ActiveDocument.Selection.StartOfDocument() ' ~Q_sv,{NL0 DTE.ActiveDocument.Selection.SelectLine() CurrText = DTE.ActiveDocument.Selection.Text DTE.ActiveDocument.Selection.LineDown() DTE.ActiveDocument.Selection.LineUp() ' ydMR[zz}v0 CurrText = LTrim(CurrText) ' L/f&T:N /*? If InStr(CurrText, "/*") = 1 Then While (InStr(CurrText, "*/") = 0) And (BreakAfter > CurrentCount) DTE.ActiveDocument.Selection.SelectLine() CurrText = selection.Text CurrText = LTrim(CurrText) DTE.ActiveDocument.Selection.LineDown() DTE.ActiveDocument.Selection.LineUp() CurrentCount = CurrentCount + 1 End While If (BreakAfter > CurrentCount) Then ' ~~d"}vLpeǏY ' VdkQ勪_s0 MsgBox("Could not find a closing comment mark") End If End If End If ' ُN_svNxS/f C/C++ vNx ' voR,g0 ElseIf TypeOfFile = 5 Then ' HTML Nx0 BeginComment = "<!--" EndComment = "-->" EveryLine = " " If InStr(CurrText, "<!--") = 1 Then If InStr(CurrText, "-->") <> 0 Then DTE.ActiveDocument.Selection.LineDown() Else Do DTE.ActiveDocument.Selection.SelectLine() CurrText = DTE.ActiveDocument.Selection.Text CurrText = Left(CurrText, Len(CurrText) - 2) selection = DTE.ActiveDocument.Selection selection.Text = CurrText + Lf If InStr(CurrText, "-->") Then Exit Do End If Loop End If End If ElseIf TypeOfFile = 6 Then ' VBS Nx0 BeginComment = "'" EndComment = "'" EveryLine = "'" Do selection = DTE.ActiveDocument.Selection selection.Text = CurrText If InStr(CurrText, "'") = 1 Or InStr(LCase(CurrText), "Rem") = 1 Then DTE.ActiveDocument.Selection.SelectLine() CurrText = LTrim(DTE.ActiveDocument.Selection) ContSearch = False Else Exit Do End If Loop If ContSearch = False Then DTE.ActiveDocument.Selection.LineUp() End If ElseIf TypeOfFile = 7 Then 'DEF Nx BeginComment = ";" EndComment = "" EveryLine = ";" Do selection = DTE.ActiveDocument.Selection selection.Text = CurrText If InStr(CurrText, ";") = 1 Then DTE.ActiveDocument.Selection.SelectLine() CurrText = LTrim(DTE.ActiveDocument.Selection) ContSearch = False Else Exit Do End If Loop If ContSearch = False Then DTE.ActiveDocument.Selection.LineUp() End If End If If TypeOfFile = 0 Then ' Nx{|W*gw0 MsgBox("Unable to add revision marks. Unrecognized file type") ElseIf (CurrentCount < BreakAfter) Then ']n BeginComment0EveryLine T EndComment ' MQ Y6Rdk... ' SceQ&^ glʑhv(uWW0 DTE.ActiveDocument.Selection.StartOfLine() ' O(uN*NK "" Then Header = StripTabs(Trim(selection.Text)) End If ' SQpeԏV{|W0 If Header <> "" Then If DTE.ActiveDocument.Language = "CSharp" Then ' ǏObOo`(public/private ...)0 Header = Right(Header, Len(Header) - InStr(Header, " ")) End If Reti = InStr(Header, " ") Loc1 = InStr(Header, "(") If Reti < Loc1 Then RetTp = Left(Header, Loc1 - 1) Header = Right(Header, Len(Header) - Reti) End If RetTp = Left(RetTp, InStr(RetTp, " ")) ' SQpe Ty0 Loc1 = InStr(Header, "(") - 1 Loc2 = InStr(Header, ")") If Loc1 > 0 And Loc2 > 0 Then ' nxO g ( T ) 0 fcName = Left(Header, Loc1) Header = Right(Header, Len(Header) - Len(fcName)) ' ԏV{|W-N/f&T gX[P{|W? Trim(fcName) If InStr(fcName, " ") <> 0 Then RetTp = RetTp + Left(fcName, InStr(fcName, " ")) fcName = Right(fcName, Len(fcName) - InStr(fcName, " ")) End If ' SQpeSpe0 iPrm = 0 iPrmA = 0 prms = Header ' {Spe*Npe0 Do While InStr(prms, ",") <> 0 iPrm = iPrm + 1 prms = Right(prms, Len(prms) - InStr(prms, ",")) Loop ' (Wpe~-NX[PSpeRh0 If iPrm > 0 Then ' Yg gY*NSpe0 iPrm = iPrm + 1 iPrmA = iPrm ReDim ParamArr(iPrm) Do While InStr(Header, ",") <> 0 ParamArr(iPrm - 1) = Left(Header, InStr(Header, ",") - 1) ' RN,{N*NSpe-N Rd'YbS0 If InStr(ParamArr(iPrm - 1), " (") <> 0 Then ParamArr(iPrm - 1) = Right(ParamArr(iPrm - 1), (Len(ParamArr(iPrm - 1)) - (Len(ParamArr(iPrm - 1)) - (Len(ParamArr(iPrm - 1)) - InStr(ParamArr(iPrm - 1), " ("))))) Trim(ParamArr(iPrm)) End If Header = Right(Header, Len(Header) - InStr(Header, ",")) iPrm = iPrm - 1 Loop ParamArr(iPrm - 1) = Header ' NgTN*NSpe-N Rd>\'YbS0 If InStr(ParamArr(iPrm - 1), ")") <> 0 Then ParamArr(iPrm - 1) = Left(ParamArr(iPrm - 1), InStr(ParamArr(iPrm - 1), ")") - 1) Trim(ParamArr(iPrm - 1)) End If Else ' S/fN*NSpe0 ReDim ParamArr(1) Header = Right(Header, Len(Header) - 1) ' Sd,{N*N'YbS0 Trim(Header) ParamArr(0) = StripTabs(Header) If InStr(ParamArr(0), ")") <> 1 Then ParamArr(0) = Left(ParamArr(0), InStr(ParamArr(0), ")") - 1) Trim(ParamArr(0)) iPrmA = 1 End If End If ' \IQh>e(W [e,gN NvgNL0 DTE.ActiveDocument.Selection.LineUp() DTE.ActiveDocument.Selection.LineDown() DTE.ActiveDocument.Selection.StartOfLine() selection = DTE.ActiveDocument.Selection() 'selection.text = Lf Descr = CStr(Lf) + "// Function name : " + fcName + CStr(Lf) Descr = Descr + "// Description : " + CStr(Lf) + "// Return type : " Descr = Descr + RetTp + CStr(Lf) ' SbpSSpeRh0 Last = iPrmA Do While iPrmA <> 0 ' NNUON*N argumentextSelection -N RdbcL&{0 If InStr(ParamArr(iPrmA - 1), CStr(Lf)) <> 0 Then ParamArr(iPrmA - 1) = Right(ParamArr(iPrmA - 1), (Len(ParamArr(iPrmA - 1)) - (Len(ParamArr(iPrmA - 1)) - (Len(ParamArr(iPrmA - 1)) - InStr(ParamArr(iPrmA - 1), CStr(Lf)))))) Trim(ParamArr(iPrmA - 1)) End If ParamArr(iPrmA - 1) = StripTabs(ParamArr(iPrmA - 1)) ' YgSpeǏ$N*N R,{N*NSpe ' \ gN*Nnv ( 0NdkY Rd: If iPrmA = Last And Last <> 1 Then ParamArr(iPrmA - 1) = Right(ParamArr(iPrmA - 1), Len(ParamArr(iPrmA - 1)) - 1) End If Descr = Descr + "// Argument : " + ParamArr(iPrmA - 1) + CStr(Lf) iPrmA = iPrmA - 1 Loop Descr = Descr + CStr(Lf) selection = DTE.ActiveDocument.Selection() selection.Text = Descr Else MsgBox("It is possible that the function you are trying to work with has a syntax error.") End If End If Else MsgBox("You need to have an active C/C++ document open" + CStr(Lf) + "with the function prototype selected.") End If End Sub ' Ygnx[g*NhƋ&{/f&T:N gHev C hƋ&{ ' RdkO z gYy(ul0 ' ُNhƋ&{ NSbP[l OY: ' foo.bar eHe ' foo gHe ' Spe: (uNKmՋ gHe C hƋ&{vW[&{2N0 ' ԏV "z" Then If Mid(Id, i, 1) < "A" Or Mid(Id, i, 1) > "Z" Then If Mid(Id, i, 1) < "0" Or Mid(Id, i, 1) > "9" Then If Mid(Id, i, 1) <> "_" Then ValidId = False End If End If End If End If Next If Mid(Id, 1, 1) >= "0" And Mid(Id, 1, 1) <= "9" Then ValidId = False End If End Function Sub PoundDefOut(ByVal ifndef) Dim PoundType As String Dim ControlVarName As String Dim sel As EnvDTE.TextSelection Dim selection As EnvDTE.TextSelection Dim Ok As Boolean If ifndef = True Then PoundType = "#ifndef " Else PoundType = "#ifdef " End If If FileType(DTE.ActiveDocument) <> 1 Then MsgBox("This macro only works on" + Lf + ".c, .cpp, .cxx, .h, .hpp, or .hxx files") Else ControlVarName = InputBox("What should the control variable be?" + Lf + Lf + "Example: #ifdef ControlVariable", PoundType + " out a section of code") Ok = True If ValidId(ControlVarName) = False Then Ok = False MsgBox("""" + ControlVarName + """ is not a valid C identifier." + Lf + "please re-run the macro with a valid C identifier") End If sel = DTE.ActiveDocument.Selection For i = 1 To (Len(sel.Text) - 1) If Mid(sel.Text, i, 1) = Lf Then sel.Text = Left(sel.Text, i) + Microsoft.VisualBasic.ControlChars.Tab + Right(sel.Text, Len(sel.Text) - i) End If Next If ControlVarName <> "" And Ok = True Then sel.Text = CStr(Microsoft.VisualBasic.ControlChars.Lf) + PoundType + ControlVarName + CStr(Microsoft.VisualBasic.ControlChars.Lf) + CStr(Microsoft.VisualBasic.ControlChars.Tab) + sel.Text + CStr(Lf) + "#endif //" + ControlVarName If Right(sel.Text, 1) <> CStr(Microsoft.VisualBasic.ControlChars.Lf) Then sel.Text = sel.Text + CStr(Microsoft.VisualBasic.ControlChars.Lf) End If End If End If End Sub ' Nb$N*N[[hQv T S/fvQ-NN*NO(u ifndef ' SN*NO(u ifdef0bNV6evNxv T S/fO(uv ' YthVcN N T0 Sub ifdefOut() ' f: (u #ifdef / #endif hƋQNkNx0 PoundDefOut(False) End Sub Sub ifndefOut() ' f: (u #ifndef / #endif hƋQNkNx0 PoundDefOut(True) End Sub ' O(u7bSNnxOS_MRv4YeNSS+TN!k0 ' gbLdkyd\O g$Nyel Nyel/fO(u #pragma once cN ' SNyel/f\te*NeN>e(W #ifndef/#endif ~g-N0,{Nyel ' fnZi FOُyelyr[N VC++ Vdk NSy i0Yg ' RO(uvQNыhVыNx O(u ' #ifndef/#endif el0&TR #pragma once yfSS0 Sub OneTimeInclude() ' f: TS_MR4YeN-NmRNx OvQS(Wk*N c/cpp eN-NS+TN!k0 Dim ext As String Dim DocName As String Dim examp As String Dim selection As EnvDTE.TextSelection Dim pos As Integer Dim ControlVarName As String ext = DTE.ActiveDocument.Name If ext = "" Then If MsgBox("The file you are working with does not have a file extension." + Lf + "Are you sure this is a C/C++ header file?", 4) = MsgBoxResult.Cancel Then Exit Sub End If ext = "nofilenamegiven.h" End If DocName = UC75M11Q7H16QHAQSS7L4L87HCN6OE6D1@yXQ1O8VU60167X8VF6537H12AQ38G6UD@c*U424HP8X2R601MBC0A2GPHU46V0EP15@O>'VSMPE @5ase(ext) pos = InStr(ext, ".") Do While pos <> 1 ext = Mid(ext, pos, (Len(ext) - pos + 1)) pos = InStr(ext, ".") Loop ext = LCase(ext) pos = InStr(DocName, ".") If ext = ".h" Or ext = ".hpp" Then ' fJT(u7b: [N VC++ NYvыhV dkd\O Nw\O(u0 ' If MsgBox("This macro uses the Visual C++ dependent #pragma once" + Lf + "Is the source to be portable across compilers?", 4) = 6 Then DTE.ActiveDocument.Selection.StartOfDocument(False) examp = "__" + Left(DocName, pos - 1) + "_" + UCase(Right(ext, Len(ext) - 1)) + "__" ControlVarName = InputBox("What should the control variable be?" + Lf + Lf + "Example: #ifdef " + examp, "One time header include protection", examp) selection = DTE.ActiveDocument.Selection If ValidId(ControlVarName) = True Then selection.Text = "#ifndef " + ControlVarName + CStr(Lf) + "#define " + ControlVarName + CStr(Lf) DTE.ActiveDocument.Selection.EndOfDocument(False) selection.Text = CStr(Lf) + "#endif //" + ControlVarName Else MsgBox(ControlVarName + " is not a valid c identifier." + Lf + "please re-run the macro with a valid C identifier") End If 'Else ' DTE.ActiveDocument.Selection.StartOfDocument (False) ' DTE.ActiveDocument.Selection = "#pragma once" + Lf + Lf 'End If Else MsgBox("This macro can only be run on .h or .hpp files") End If End Sub ' ꁨR[b[0 Sub AddToCompletionWords(ByVal word As String) ' YgY] gUS͋ R-Nbk0 If InStr(1, completionWords, " " & word & " ", 1) <> 0 Then Exit Sub End If If word <> " " Then completionWords = completionWords & word & " " End If End Sub Private Function ExtractNextCompletionWord() ExtractNextCompletionWord = "" ' Yg؏l gUS͋ Ry_0 If Len(completionWords) <= 1 Then Exit Function End If ' Y g_ bcLL0 If completionWordsIndex > Len(completionWords) Then completionWordsIndex = 2 End If ' g~b NN*N <space>0 Dim newIndex As Integer newIndex = InStr(completionWordsIndex, completionWords, " ", 0) If newIndex = 0 Then Exit Function End If ExtractNextCompletionWord = Mid(completionWords, completionWordsIndex, newIndex - completionWordsIndex) completionWordsIndex = newIndex + 1 ' Ǐ <space>. End Function Sub FillCompletionWords(ByVal word As String) ' (WdkeN-Ng~bNUS͋9SMv@b gUS͋ 6qT ' Nzz "" Then selection.Text = word previousSelection = word End If selection.WordLeft(DsMovementOptions.dsExtend) End Function Sub AutoCompleteFromFile() ' f: Omȉ;mReN d"}_Y.eQvUS͋vvQYOR0 Dim doc As EnvDTE.Document Dim sel As EnvDTE.TextSelection Dim origLine, origCol As Integer doc = DTE.ActiveDocument ' nxO;mRech/fe,gech0 If doc Is Nothing Then Exit Sub ElseIf doc.Type <> "Text" Then Exit Sub End If ' [bUS͋0 sel = doc.Selection sel.Cancel() origLine = sel.CurrentLine origCol = sel.CurrentColumn sel.WordLeft(DsMovementOptions.dsExtend) ' YgIQhck}YMONzz Public WithEvents DTEEvents As EnvDTE.DTEEvents <System.ContextStaticAttribute()> Public WithEvents DocumentEvents As EnvDTE.DocumentEvents <System.ContextStaticAttribute()> Public WithEvents WindowEvents As EnvDTE.WindowEvents <System.ContextStaticAttribute()> Public WithEvents TaskListEvents As EnvDTE.TaskListEvents <System.ContextStaticAttribute()> Public WithEvents FindEvents As EnvDTE.FindEvents <System.ContextStaticAttribute()> Public WithEvents OutputWindowEvents As EnvDTE.OutputWindowEvents <System.ContextStaticAttribute()> Public WithEvents SelectionEvents As EnvDTE.SelectionEvents <System.ContextStaticAttribute()> Public WithEvents BuildEvents As EnvDTE.BuildEvents <System.ContextStaticAttribute()> Public WithEvents SolutionEvents As EnvDTE.SolutionEvents <System.ContextStaticAttribute()> Public WithEvents SolutionItemsEvents As EnvDTE.ProjectItemsEvents <System.ContextStaticAttribute()> Public WithEvents MiscFilesEvents As EnvDTE.ProjectItemsEvents <System.ContextStaticAttribute()> Public WithEvents DebuggerEvents As EnvDTE.DebuggerEvents <System.ContextStaticAttribute()> Public WithEvents ProjectsEvents As EnvDTE.ProjectsEvents <System.ContextStaticAttribute()> Public WithEvents TextDocumentKeyPressEvents As EnvDTE80.TextDocumentKeyPressEvents <System.ContextStaticAttribute()> Public WithEvents CodeModelEvents As EnvDTE80.CodeModelEvents <System.ContextStaticAttribute()> Public WithEvents DebuggerProcessEvents As EnvDTE80.DebuggerProcessEvents <System.ContextStaticAttribute()> Public WithEvents DebuggerExpressionEvaluationEvents As EnvDTE80.DebuggerExpressionEvaluationEvents 'Event Sources End 'End of automaticStudio6Editor.MultiplePastes Samples.DevStudio6Editor.OneTimeInclude Samples.DevStudio6Editor.PrintAllOpenDocuments Samples.DevStudio6Editor.ToggleCommentStyle Samples.Utilities.AddClassicComRef Samples.Utilities.FindCase Samples.Utilities.FindLastTarget Samples.Utilities.FindLine Samples.Utilities.InsertDocComments Samples.Utilities.ListMacroSamples Samples.Utilities.ListModifiedDocuments Samples.Utilities.ListProj Samples.Utilities.LoadView Samples.Utilities.SaveView Samples.Utilities.TurnOffLineNumbers Samples.Utilities.TurnOffWordWrap Samples.Utilities.TurnOnLineNumbers Samples.Utilities.TurnOnWordWrap Samples.VSEditor.BeginningOfFunction Samples.VSEditor.CenterScreen Samples.VSEditor.CommentRegion Samples.VSEditor.CountOccurrences Samples.VSEditor.DoForWholeFile Samples.VSEditor.EmacsStyleIndentLine Samples.VSEditor.FillCommentParagraph Samples.VSEditor.FixLineEnds Samples.VSEditor.InsertDate Samples.VSEditor.InsertTime Samples.VSEditor.InsertTimeDate Samples.VSEditor.LineEmUp Samples.VSEditor.LineToTop Samples.VSEditor.ListMatchingLines Samples.VSEditor.ListNonMatchingLines Samples.VSEditor.NewCommentLine Samples.VSEditor.OneFunctionView Samples.VSEditor.OutlineCode Samples.VSEditor.PrintItemsInSelectedProject Samples.VSEditor.PrintNumberedLines Samples.VSEditor.SaveBackup Samples.VSEditor.SetFillColumn Samples.VSEditor.TopOfBlock Samples.MakeAddin.MakeAddinFromMacroProj Samples.VSDebugger.AddBreakpointToMain Samples.VSDebugger.AttachToCalc Samples.VSDebugger.BreakpointLastHit Samples.VSDebugger.DebuggerMode Samples.VSDebugger.DetachAll Samples.VSDebugger.DumpExpression Samples.VSDebugger.DumpStacks Samples.VSDebugger.LastBreakReason Samples.VSDebugger.ListAllBreakpoints Samples.VSDebugger.ListBreakpointsLastHit Samples.VSDebugger.ListDebuggedProcesses Samples.VSDebugger.RunToLine Samples.VSDebugger.RunToNextBreakpoint Samples.VSDebugger.ShowCurrentProcess Samples.VSDebugger.StepOverAll Samples.VSDebugger.SupportedLanguages Samples.AddDirAsSlnFolder.GenerateSlnFolderOnDirStructure Samples.Accessibility.DecreaseTextEditorFontSize Samples.Accessibility.IncreaseTextEditorFontSize Samples.Accessibility.MaximizeToolWindowsInEnvironment Samples.Accessibility.ToggleTextEditorGrayScale Samples.Accessibility.UpdateTextEditorFontSizeToMatchDisplayProperties Samples.DevStudio6Editor.AddFunctionDescription Samples.DevStudio6Editor.AddRevisionMarks Samples.DevStudio6Editor.AutoCompleteFromFile Samples.DevStudio6Editor.CloseExceptActive Samples.DevStudio6Editor.CommentOut Samples.DevStudio6Editor.ifdefOut Samples.DevStudioally generated code #End Region End Module function parameters. iPrm = 0 iPrmA = 0 prms = Header ' Count the number of parameters. Do While InTE.DebuggerEvents prms = Right(prms, Len(prms) - InStr(prms, ",")) Loop ' Store the parameter list in the array. If iPrm > Microsoft C/C++ MSF 7.00 DS8 18#.1:FG z~VIk 33> 18:lB$JEK?O Zf*I`n@dLBԁrAz)u:lB$JEK?O Zf*I`n@dLBԁrQ7s -Uo7_:lB$JEK?O Zf*I`n@dLBԁr +wixٲ|j:lB$JEK?O Zf*I`n@dLBԁrز]" aF:lB$JEK?O Zf*I`n@dLBԁrfMkCWd:lB$JEK?O Zf*I`n@dLBԁr Fd 0"':lB$JEK?O Zf*I`n@dLBԁrN aQ!Vy:lB$JEK?O Zf*I`n@dLBԁrۯA@fj:lB$JEK?O Zf*I`n@dLBԁr>I!ǴRR\M::lB$JEK?O Zf*I`n@dLBԁrRES؏9Pubdd 17d14f5c-a337-4978-8281-53493378c1071.vbvsmacros://C%3A/Documents%20and%20Settings/v-hadai/My%20Documents/Visual%20Studio%202008/Projects/VSMacros80/Samples/Samples.vsmacros/_Startupvsmacros:\\c%3a\documents%20and%20settings\v-hadai\my%20documents\visual%20studio%202008\projects\vsmacros80\samples\samples.vsmacros\_startupvsmacros://C%3A/Documents%20and%20Settings/v-hadai/My%20Documents/Visual%20Studio%202008/Projects/VSMacros80/Samples/Samples.vsmacros/Accessibilityvsmacros:\\c%3a\documents%20and%20settings\v-hadai\my%20documents\visual%20studio%202008\projects\vsmacros80\samples\samples.vsmacros\accessibilityvsmacros://C%3A/Documents%20and%20Settings/v-hadai/My%20Documents/Visual%20Studio%202008/Projects/VSMacros80/Samples/Samples.vsmacros/AddDirAsSlnFoldervsmacros:\\c%3a\documents%20and%20settings\v-hadai\my%20documents\visual%20studio%202008\projects\vsmacros80\samples\samples.vsmacros\adddirasslnfoldervsmacros://C%3A/Documents%20and%20Settings/v-hadai/My%20Documents/Visual%20Studio%202008/Projects/VSMacros80/Samples/Samples.vsmacros/DevStudio6Editorvsmacros:\\c%3a\documents%20and%20settings\v-hadai\my%20documents\visual%20studio%202008\projects\vsmacros80\samples\samples.vsmacros\devstudio6editorvsmacros://C%3A/Documents%20and%20Settings/v-hadai/My%20Documents/Visual%20Studio%202008/Projects/VSMacros80/Samples/Samples.vsmacros/EnvironmentEventsvsmacros:\\c%3a\documents%20and%20settings\v-hadai\my%20documents\visual%20studio%202008\projects\vsmacros80\samples\samples.vsmacros\environmenteventsvsmacros://C%3A/Documents%20and%20Settings/v-hadai/My%20Documents/Visual%20Studio%202008/Projects/VSMacros80/Samples/Samples.vsmacros/MakeAddinvsmacros:\\c%3a\documents%20and%20settings\v-hadai\my%20documents\visual%20studio%202008\projects\vsmacros80\samples\samples.vsmacros\makeaddinvsmacros://C%3A/Documents%20and%20Settings/v-hadai/My%20Documents/Visual%20Studio%202008/Projects/VSMacros80/Samples/Samples.vsmacros/Utilitiesvsmacros:\\c%3a\documents%20and%20settings\v-hadai\my%20documents\visual%20studio%202008\projects\vsmacros80\samples\samples.vsmacros\utilitiesvsmacros://C%3A/Documents%20and%20Settings/v-hadai/My%20Documents/Visual%20Studio%202008/Projects/VSMacros80/Samples/Samples.vsmacros/VSDebuggervsmacros:\\c%3a\documents%20and%20settings\v-hadai\my%20documents\visual%20studio%202008\projects\vsmacros80\samples\samples.vsmacros\vsdebuggervsmacros://C%3A/Documents%20and%20Settings/v-hadai/My%20Documents/Visual%20Studio%202008/Projects/VSMacros80/Samples/Samples.vsmacros/VSEditorvsmacros:\\c%3a\documents%20and%20settings\v-hadai\my%20documents\visual%20studio%202008\projects\vsmacros80\samples\samples.vsmacros\vseditor( I?gq+8a *EventsSolutionItemsEventsMiscFilesEventsMakeAddinFromMacroProjProjectCopyReferencesobjProjectDestobjProjectSrcCodeFunctionIsMacroCallableFunctioncodeFuncSaveViewLoadViewTurnOnLineNumbersTurnO6Editor.ifndefOut Samples.DevStudio6Editor.MultiplePastes Samples.DevStudio6Editor.OneTimeInclude Samples.DevStudio6Editor.PrintAllOpenDocuments Samples.DevStudio6Editor.ToggleCommentStyle Samples.Utilities.AddClassicComRef Samples.Utilities.FindCase Sampl0 =- 8(0n[X*8e(0X*eg(0 ؅X*ge (0FG Xa * e(0CRX+*e(01UX*e(0ғX?*e(0$XI*e (09Xq* e(0YX*e.*&A.cctorA$(100663298$#Samples.VSEditor$#Samples.Accessibility$#Samples.AddDirAsSlnFolder$#Samples.DevStudio6Editor$#Samples.EnvironmentEvents$#Samples.MakeAddin$#Samples.Utilities$#Samples.VSDebugger$#Samples._Utility"$#Samples._ApplicationObjects$@F:System.Diagnostics$@F:EnvDTE80$@F:EnvDTE$*Samples$#Samples.My.MyProject2$@PX:xml=http://www.w3.org/XML/1998/namespace*$@PX:xmlns=http://www.w3.org/2000/xmlns/$@P:Microsoft.VisualBasic&$#Microsoft.VisualBasic.Constants&$#Microsoft.VisualBasic.Conversion&$#Microsoft.VisualBasic.DateAndTime&$#Microsoft.VisualBasic.FileSystem&$#Microsoft.VisualBasic.Financial"$#Microsoft.VisualBasic.Globals&$#Microsoft.VisualBasic.Information&$#Microsoft.VisualBasic.Interaction"$#Microsoft.VisualBasic.VBMath"$#Microsoft.VisualBasic.Strings $@PX:= $Samples$Samples._ApplicationObjects6*M'WIsFileExcluded MW$(100663298$@100663334$Samples._ApplicationObjects extension fileName" IsFileExcludedJ*(GenerateSlnFolderOnDirStructure2$(100663298$@100663334$Samples._ApplicationObjects file files folder folders  VB$t_i4$L0"  VB$t_array$L0  VB$t_i4$L1"  VB$t_array$L1h4f projItem0% & outputWindowPaneh2P  folderName" newSlnFolder projJ*( ) GenerateSlnFolderOnDirStructure$  $(100663298$@100663334$Samples._ApplicationObjects& currentSlnFolder folderName proj sln2 & outputWindowPane0A$   TWM "*#0$1%>&D'E(I)J*K+A : ( 8 & 9  <   "/569:%<&=9?=@FATBUCV]D^FkGHIJMRSTUVWXYy B :  /V8ESX~   # 1@F+G    +ag h!i)j/k0l1n9oFpLqMs^ufwsxyz|!1AQaqS 4 F 8   B >   A @ P X   Q ' ' ' ' ' ' ' ' ' ' ' ' ' ' * * * + '  = 2 ' H q 0Ph.*tEqualst$(100663298$@100663298$Samples._ApplicationObjects Equals6*d GetHashCode` $(100663298$@100663298$Samples._ApplicationObjects GetHashCode2* GetTypeh$(100663298$@100663298$Samples._ApplicationObjects GetType2* ToString $(100663298$@100663298$Samples._ApplicationObjects ToString:* Create__Instance__$(100663298$@100663298$Samples._ApplicationObjects&  Create__Instance__>*P Dispose__Instance__L$(100663298$@100663298$Samples._ApplicationObjects"  VB$t_generic$S0.* .ctorT $(100663298$@100663298$Samples._ApplicationObjects<t0 K( < 0 ?* <0 H. < 0  ;' l`      _,#$ <0 G# < 0  8(D\t4H>*4K* PrintAllOpenDocuments0K $(100663298$#Samples.VSEditor$#Samples.Accessibility$#Samples.AddDirAsSlnFolder$#Samples.DevStudio6Editor$#Samples.EnvironmentEvents$#Samples.MakeAddin$#Samples.Utilities$#Samples.VSDebugger$#Samples._Utility"$#Samples._ApplicationObjects*$@FT:Microsoft.VisualBasic.ControlChars$@F:Microsoft.VisualBasic&$#Microsoft.VisualBasic.Constants&$#Microsoft.VisualBasic.Conversion&$#Microsoft.VisualBasic.DateAndTime&$#Microsoft.VisualBasic.FileSystem&$#Microsoft.VisualBasic.Financial"$#Microsoft.VisualBasic.Globals&$#Microsoft.VisualBasic.Information&$#Microsoft.VisualBasic.Interaction"$#Microsoft.VisualBasic.VBMath"$#Microsoft.VisualBasic.Strings$@F:System.Diagnostics$@F:EnvDTE80$@F:EnvDTE$*Samples$#Samples.My.MyProject2$@PX:xml=http://www.w3.org/XML/1998/namespace*$@PX:xmlns=http://www.w3.org/2000/xmlns/$@P:Microsoft.VisualBasic&$#Microsoft.VisualBasic.Constants&$#Microsoft.VisualBasic.Conversion&$#Microsoft.VisualBasic.DateAndTime&$#Microsoft.VisualBasic.FileSystem&$#Microsoft.VisualBasic.Financial"$#Microsoft.VisualBasic.Globals&$#Microsoft.VisualBasic.Information&$#Microsoft.VisualBasic.Interaction"$#Microsoft.VisualBasic.VBMath"$#Microsoft.VisualBasic.Strings $@PX:= $Samples$Samples._ApplicationObjects doc VB$t_ref$L06*d+ MultiplePastes8` $(100663298$@100663338$Samples._ApplicationObjects i NumPastes times VB$t_i4$L0" VB$t_array$S02*h ", CommentOuthd " $(100663298$@100663338$Samples._ApplicationObjects CommentType EndLine StartLine Temp TypeOfFile win" VB$t_array$S0 VB$t_i4$L0"  VB$t_array$S1"  VB$t_array$S2`  i2*L 3-FileTypel H 3$(100663298$@100663338$Samples._ApplicationObjects ext FileType pos:*h .ToggleCommentStyleP d $(100663298$@100663338$Samples._ApplicationObjects CmtBlock selection TmpBlock TypeOfFile2* 7/StripTabsl  7$(100663298$@100663338$Samples._ApplicationObjects StripTabs:*h 0CloseExceptActive d $(100663298$@100663338$Samples._ApplicationObjects countOfDocs current i& vsSaveChangesPrompt\ ` d doc:*t1fAddRevisionMarksl pf$(100663298$@100663338$Samples._ApplicationObjects"  BeginComment  BreakAfter  ContSearch"  CurrentCount  CurrText"  DefaultUserName  EndComment  EveryLine  selection  TypeOfFile"  VB$t_array$S0>*h}2(AddFunctionDescriptionxd}($(100663298$@100663338$Samples._Appes.Utilities.FindLastTarget Samples.Utilities.FindLine Samples.Utilities.InsertDocComments Samples.Utilities.ListMacroSamples Samples.Utilities.ListModifiedDocuments Samples.Utilities.ListProj Samples.Utilities.LoadView Samples.Utilities.SaveView Samples.Utilities.TurnOffLineNumbers Samples.Utilities.TurnOffWordWrap Samples.Utilities.TurnOnLineNumbers Samples.Utilities.TurnOnWordWrap Samples.VSEditor.BeginningOfFunction Samples.VSEditor.CenterScreen Samples.VSEditor.CommentRegion Samples.VSEditor.CountOccurrences Samples.VSEditor.DoForWholeFile Samples.VSEditor.EmacsStyleIndentLine Samples.VSEditor.FillCommentParagraph Samples.VSEditor.FixLineEnds Samples.VSEditor.InsertDate Samples.VSEditor.InsertTime Samples.VSEditor.InsertTimeDate Samples.VSEditor.LineEmUp Samples.VSEditor.LineToTop Samples.VSEditor.ListMatchingLines Samples.VSEditor.ListNonMatchingLines Samples.VSEditor.NewCommentLine Samples.VSEditor.OneFunctionView Samples.VSEditor.OutlineCode Samples.VSEditor.PrintItemsInSelectedProject Samples.VSEditor.PrintNumberedLines Samples.VSEditor.SaveBackup Samples.VSEditor.SetFillColumn Samples.VSEditor.TopOfBlock Samples.MakeAddin.MakeAddinFromMacroProj Samples.VSDebugger.AddBreakpointToMain Samples.VSDebugger.AttachToCalc Samples.VSDebugger.BreakpointLastHit Samples.VSDebugger.DebuggerMode Samples.VSDebugger.DetachAll Samples.VSDebugger.DumpExpression Samples.VSDebugger.DumpStacks Samples.VSDebugger.LastBreakReason Samples.VSDebugger.ListAllBreakpoints Samples.VSDebugger.ListBreakpointsLastHit Samples.VSDebugger.ListDebuggedProcesses Samples.VSDebugger.RunToLine Samples.VSDebugger.RunToNextBreakpoint Samples.VSDebugger.ShowCurrentProcess Samples.VSDebugger.StepOverAll Samples.VSDebugger.SupportedLanguages Samples.AddDirAsSlnFolder.GenerateSlnFolderOnDirStructure Samples.Accessibility.DecreaseTextEditorFontSize Samples.Accessibility.IncreaseTextEditorFontSize Samples.Accessibility.MaximizeToolWindowsInEnvironment Samples.Accessibility.ToggleTextEditorGrayScale Samples.Accessibility.UpdateTextEditorFontSizeToMatchDisplayProperties Samples.DevStudio6Editor.AddFunctionDescription Samples.DevStudio6Editor.AddRevisionMarks Samples.DevStudio6Editor.AutoCompleteFromFile Samples.DevStudio6Editor.CloseExceptActive Samples.DevStudio6Editor.CommentOut Samples.DevStudio6EditSamples.DevStudio6Editor.CommentOut Samples.DevStudio6Editor.ifdefOut Samples.DevStudio6Editor.ifndefOut Samples.DevStudio6Editor.MultiplePastes Samples.DevStudio6Editor.OneTimeInclude Samples.DevStudio6Editor.PrintAllOpenDocuments Samples.DevStudio6Editor.ToggleCommentStyle Samples.Utilities.AddClassicComRef Samples.Utilities.FindCase Samples.Utilities.FindLastTarget Samples.Utilities.FindLine Samples.Utilities.InsertDocComments Samples.Utilities.ListMacroSamples Samples.Utilities.ListModifiedDocuments Samples.Utilities.ListProj Samples.Utilities.LoadView Samples.Utilities.SaveView Samples.Utilities.TurnOffLineNumbers Samples.Utilities.TurnOffWordWrap Samples.Utilities.TurnOnLineNumbers Samples.Utilities.TurnOnWordWrap Samples.VSEditor.BeginningOfFunction Samples.VSEditor.CenterScreen Samples.VSEditor.CommentRegion Samples.VSEditor.CountOccurrences Samples.VSEditor.DoForWholeFile Samples.VSEditor.EmacsStyleIndentLine Samples.VSEditor.FillCommentParagraph Samples.VSEditor.FixLineEnds Samples.VSEditor.InsertDate Samples.VSEditor.InsertTime Samples.VSEditor.InsertTimeDate Samples.VSEditor.LineEmUp Samples.VSEditor.LineToTop Samples.VSEditor.ListMatchingLines Samples.VSEditor.ListNonMatchingLines Samples.VSEditor.NewCommentLine Samples.VSEditor.OneFunctionView Samples.VSEditor.OutlineCode Samples.VSEditor.PrintItemsInSelectedProject Samples.VSEditor.PrintNumberedLines Samples.VSEditor.SaveBackup Samples.VSEditor.SetFillColumn Samples.VSEditor.TopOfBlock Samples.MakeAddin.MakeAddinFromMacroProj Samples.VSDebugger.AddBreakpointToMain Samples.VSDebugger.AttachToCalc Samples.VSDebugger.BreakpointLastHit Samples.VSDebugger.DebuggerMode Samples.VSDebugger.DetachAll Samples.VSDebugger.DumpExpression Samples.VSDebugger.DumpStacks Samples.VSDebugger.LastBreakReason Samples.VSDebugger.ListAllBreakpoints Samples.VSDebugger.ListBreakpointsLastHit Samples.VSDebugger.ListDebuggedProcesses Samples.VSDebugger.RunToLine Samples.VSDebugger.RunToNextBreakpoint Samples.VSDebugger.ShowCurrentProcess Samples.VSDebugger.StepOverAll Samples.VSDebugger.SupportedLanguages Samples.AddDirAsSlnFolder.GenerateSlnFolderOnDirStructure Samples.Accessibility.DecreaseTextEditorFontSize Samples.Accessibility.IncreaseTextEditorFontSize Samples.Accessibility.MaximizeToolWindowsInEnvironment Samples.Accessibility.ToggleTextEditorGrayScale Samples.Accessibility.UpdateTextEditorFontSizeToMatchDisplayProperties Samples.DevStudio6Editor.AddFunctionDescription Samples.DevStudio6Editor.AddRevisionMarks Samples.DevStudio6Editor.AutoCompleteFromFile Samples.DevStudio6Editor.CloseExceptActive Samples.DevStudio6Editor.CommentOut Samples.DevStudio6Editor.ifdefOut Samples.DevStudio6Editor.ifndefOut Samples.DevStudio6Editor.MultiplePastes Samples.DevStudio6Editor.OneTimeInclude Samples.DevStudio6Editor.PrintAllOpenDocuments Samples.DevStudio6Editor.ToggleCommentStyle Samples.Utilities.AddClassicComRef Samples.Utilities.FindCase Samples.Utilities.FindLastTarget Samples.Utilities.FindLine Samples.Utilities.InsertDocComments Samples.Utilities.ListMacroSamples Samples.Utilities.ListModifiedDocuments Samples.Utilities.ListProj Samples.Utilities.LoadView Samples.Utilities.SaveView Samples.Utilities.TurnOffLineNumbers Samples.Utilities.TurnOffWordWrap Samples.Utilities.TurnOnLineNumbers Samples.Utilities.TurnOnWordWrap Samples.VSEditor.BeginningOfFunction Samples.VSEditor.CenterScreen Samples.VSEditor.CommentRegion Samples.VSEditor.CountOccurrences Samples.VSEditor.DoForWholeFile Samples.VSEditor.EmacsStyleIndentLine Samples.VSEditor.FillCommentParagraph Samples.VSEditor.FixLineEnds Samples.VSEditor.InsertDate Samples.VSEditor.InsertTime Samples.VSEditor.InsertTimeDate Samples.VSEditor.LineEmUp Samples.VSEditor.LineToTop Samples.VSEditor.ListMatchingLines Samples.VSEditor.ListNonMatchingLines Samples.VSEditor.NewCommentLine Samples.VSEditor.OneFunctionView Samples.VSEditor.OutlineCode Samples.VSEditor.PrintItemsInSelectedProject Samples.VSEditor.PrintNumberedLines Samples.VSEditor.SaveBackup Samples.VSEditor.SetFillColumn Samples.VSEditor.TopOfBlock Samples.MakeAddin.MakeAddinFromMacroProj Samples.VSDebugger.AddBreakpointToMain Samples.VSDebugger.AttachToCalc Samples.VSDebugger.BreakpointLastHit Samples.VSDebugger.DebuggerMode Samples.VSDebugger.DetachAll Samples.VSDebugger.DumpExpression Samples.VSDebugger.DumpStacks Samples.VSDebugger.LastBreakReason Samples.VSDebugger.ListAllBreakpoints Samples.VSDebugger.ListBreakpointsLastHit Samples.VSDebugger.ListDebuggedProcesses Samples.VSDebugger.RunToLine Samples.VSDebugger.RunToNextBreakpoint Samples.VSDebugger.ShowCurrentProcess Samples.VSDebugger.StepOverAll Samples.VSDebugger.SupportedLanguages Samples.AddDirAsSlnFolder.GenerateSlnFolderOnDirStructure Samples.Accessibility.DecreaseTextEditorFontSize Samples.Accessibility.IncreaseTextEditorFontSize Samples.Accessibility.MaximizeToolWindowsInEnvironment Samples.Accessibility.ToggleTextEditorGrayScale Samples.Accessibility.UpdateTextEditorFontSizeToMatchDisplayProperties Samples.DevStudio6Editor.AddFunctionDescription Samples.DevStudio6Editor.AddRevisionMarks Samples.DevStudio6Editor.AutoCompleteFromFile Samples.DevStudio6Editor.CloseExceptActive Samples.DevStudio6Editor.CommentOut Samples.DevStudio6Editor.ifdefOut Samples.DevStudio6Editor.ifndefOut Samples.DevStudio6Editor.MultiplePastes Samples.DevStudio6Editor.OneTimeInclude Samples.DevStudio6Editor.PrintAllOpenDocuments Samples.DevStudio6Editor.ToggleCommentStyle Samples.Utilities.AddClassicComRef Samples.Utilities.FindCase Samples.Utilities.FindLastTarget Samples.Utilities.FindLine Samples.Utilities.InsertDocComments Samples.Utilities.ListMacroSamples Samples.Utilities.ListModifiedDocuments Samples.Utilities.ListProj Samples.Utilities.LoadView Samples.Utilities.SaveView Samples.Utilities.TurnOffLineNumbers Samples.Utilities.TurnOffWordWrap Samples.Utilities.TurnOnLineNumbers Samples.Utilities.TurnOnWordWrap Samples.VSEditor.BeginningOfFunction Samples.VSEditor.CenterScreen Samples.VSEditor.CommentRegion Samples.VSEditor.CountOccurrences Samples.VSEditor.DoForWholeFile Samples.VSEditor.EmacsStyleIndentLine Samples.VSEditor.FillCommentParagraph Samples.VSEditor.FixLineEnds Samples.VSEditor.InsertDate Samples.VSEditor.InsertTime Samples.VSEditor.InsertTimeDate Samples.VSEditor.LineEmUp Samples.VSEditor.LineToTop Samples.VSEditor.ListMatchingLines Samples.VSEditor.ListNonMatchingLines Samples.VSEditor.NewCommentLine Samples.VSEditor.OneFunctionView Samples.VSEditor.OutlineCode Samples.VSEditor.PrintItemsInSelectedProject Samples.VSEditor.PrintNumberedLines Samples.VSEditor.SaveBackup Samples.VSEditor.SetFillColumn Samples.VSEditor.TopOfBlock Samples.MakeAddin.MakeAddinFromMacroProj Samples.VSDebugger.AddBreakpointToMain Samples.VSDebugger.AttachToCalc Samples.VSDebugger.BreakpointLastHit Samples.VSDebugger.DebuggerMode Samples.VSDebugger.DetachAll Samples.VSDebugger.DumpExpression Samples.VSDebugger.DumpStacks Samples.VSDebugger.LastBreakReason Samples.VSDebugger.ListAllBreakpoints Samples.VSDebugger.ListBreakpointsLastHit Samples.VSDebugger.ListDebuggedProcesses Samples.VSDebugger.RunToLine Samples.VSDebugger.RunToNextBreakpoint Samples.VSDebugger.ShowCurrentProcess Samples.VSDebugger.StepOverAll Samples.VSDebugger.SupportedLanguages Samples.AddDirAsSlnFolder.GenerateSlnFolderOnDirStructure Samples.Accessibility.DecreaseTextEditorFontSize Samples.Accessibility.IncreaseTextEditorFontSize Samples.Accessibility.MaximizeToolWindowsInEnvironment Samples.Accessibility.ToggleTextEditorGrayScale Samples.Accessibility.UpdateTextEditorFontSizeToMatchDisplayProperties Samples.DevStudio6Editor.AddFunctionDescription Samples.DevStudio6Editor.AddRevisionMarks Samples.DevStudio6Editor.AutoCompleteFromFile Samples.DevStudio6Editor.CloseExceptActive Samples.DevStudio6Editor.CommentOut Samples.DevStudio6Editor.ifdefOut Samples.DevStudio6Editor.ifndefOut Samples.DevStudio6Editor.MultiplePastes Samples.DevStudio6Editor.OneTimeInclude Samples.DevStudio6Editor.PrintAllOpenDocuments Samples.DevStudio6Editor.ToggleCommentStyle Samples.Utilities.AddClassicComRef Samples.Utilities.FindCase Samples.Utilities.FindLastTarget Samples.Utilities.FindLine Samples.Utilities.InsertDocComments Samples.Utilities.ListMacroSamples Samples.Utilities.ListModifiedDocuments Samples.Utilities.ListProj Samples.Utilities.LoadView Samples.Utilities.SaveView Samples.Utilities.TurnOffLineNumbers Samples.Utilities.TurnOffWordWrap Samples.Utilities.TurnOnLineNumbers Samples.Utilities.TurnOnWordWrap Samples.VSEditor.BeginningOfFunction Samples.VSEditor.CenterScreen Samples.VSEditor.CommentRegion Samples.VSEditor.CountOccurrences Samples.VSEditor.DoForWholeFile Samples.VSEditor.EmacsStyleIndentLine Samples.VSEditor.FillCommentParagraph Samples.VSEditor.FixLineEnds Samples.VSEditor.InsertDate Samples.VSEditor.InsertTime Samples.VSEditor.InsertTimeDate Samples.VSEditor.LineEmUp Samples.VSEditor.LineToTop Samples.VSEditor.ListMatchingLines Samples.VSEditor.ListNonMatchingLines Samples.VSEditor.NewCommentLine Samples.VSEditor.OneFunctionView Samples.VSEditor.OutlineCode Samples.VSEditor.PrintItemsInSelectedProject Samples.VSEditor.PrintNumberedLines Samples.VSEditor.SaveBackup Samples.VSEditor.SetFillColumn Samples.VSEditor.TopOfBlock Samples.MakeAddin.MakeAddinFromMacroProj Samples.VSDebugger.AddBreakpointToMain Samples.VSDebugger.AttachToCalc Samples.VSDebugger.BreakpointLastHit Samples.VSDebugger.DebuggerMode Samples.VSDebugger.DetachAll Samples.VSDebugger.DumpExpression Samples.VSDebugger.DumpStacks Samples.VSDebugger.LastBreakReason Samples.VSDebugger.ListAllBreakpoints Samples.VSDebugger.ListBreakpointsLastHit Samples.VSDebugger.ListDebuggedProcesses Samples.VSDebugger.RunToLine Samples.VSDebugger.RunToNextBreakpoint Samples.VSDebugger.ShowCurrentProcess Samples.VSDebugger.StepOverAll Samples.VSDebugger.SupportedLanguages Samples.AddDirAsSlnFolder.GenerateSlnFolderOnDirStructure Samples.Accessibility.DecreaseTextEditorFontSize Samples.Accessibility.IncreaseTextEditorFontSize Samples.Accessibility.MaximizeToolWindowsInEnvironment Samples.Accessibility.ToggleTextEditorGrayScale Samples.Accessibility.UpdateTextEditorFontSizeToMatchDisplayProperties Samples.DevStudio6Editor.AddFunctionDescription Samples.DevStudio6Editor.AddRevisionMarks Samples.DevStudio6Editor.AutoCompleteFromFile Samples.DevStudio6Editor.CloseExceptActive Samples.DevStudio6Editor.CommentOut Samples.DevStudio6Editor.ifdefOut Samples.DevStudio6Editor.ifndefOut Samples.DevStudio6Editor.MultiplePastes Samples.DevStudio6Editor.OneTimeInclude Samples.DevStudio6Editor.PrintAllOpenDocuments Samples.DevStudio6Editor.ToggleCommentStyle Samples.Utilities.AddClassicComRef Samples.Utilities.FindCase Samples.Utilities.FindLastTarget Samples.Utilities.FindLine Samples.Utilities.InsertDocComments Samples.Utilities.ListMacroSamples Samples.Utilities.ListModifiedDocuments Samples.Utilities.ListProj Samples.Utilities.LoadView Samples.Utilities.SaveView Samples.Utilities.TurnOffLineNumbers Samples.Utilities.TurnOffWordWrap Samples.Utilities.TurnOnLineNumbers Samples.Utilities.TurnOnWordWrap Samples.VSEditor.BeginningOfFunction Samples.VSEditor.CenterScreen Samples.VSEditor.CommentRegion Samples.VSEditor.CountOccurrences Samples.VSEditor.DoForWholeFile Samples.VSEditor.EmacsStyleIndentLine Samples.VSEditor.FillCommentParagraph Samples.VSEditor.FixLineEnds Samples.VSEditor.InsertDate Samples.VSEditor.InsertTime Samples.VSEditor.InsertTimeDate Samples.VSEditor.LineEmUp Samples.VSEditor.LineToTop Samples.VSEditor.ListMatchingLines Samples.VSEditor.ListNonMatchingLines Samples.VSEditor.NewCommentLine Samples.VSEditor.OneFunctionView Samples.VSEditor.OutlineCode Samples.VSEditor.PrintItemsInSelectedProject Samples.VSEditor.PrintNumberedLines Samples.VSEditor.SaveBackup Samples.VSEditor.SetFillColumn Samples.VSEditor.TopOfBlock Samples.MakeAddin.MakeAddinFromMacroProj Samples.VSDebugger.AddBreakpointToMain Samples.VSDebugger.AttachToCalc Samples.VSDebugger.BreakpointLastHit Samples.VSDebugger.DebuggerMode Samples.VSDebugger.DetachAll Samples.VSDebugger.DumpExpression Samples.VSDebugger.DumpStacks Samples.VSDebugger.LastBreakReason Samples.VSDebugger.ListAllBreakpoints Samples.VSDebugger.ListBreakpointsLastHit Samples.VSDebugger.ListDebuggedProcesses Samples.VSDebugger.RunToLine Samples.VSDebugger.RunToNextBreakpoint Samples.VSDebugger.ShowCurrentProcess Samples.VSDebugger.StepOverAll Samples.VSDebugger.SupportedLanguages Samples.AddDirAsSlnFolder.GenerateSlnFolderOnDirStructure Samples.Accessibility.DecreaseTextEditorFontSize Samples.Accessibility.IncreaseTextEditorFontSize Samples.Accessibility.MaximizeToolWindowsInEnvironment Samples.Accessibility.ToggleTextEditorGrayScale Samples.Accessibility.UpdateTextEditorFontSizeToMatchDisplayProperties Samples.DevStudio6Editor.AddFunctionDescription Samples.DevStudio6Editor.AddRevisionMarks Samples.DevStudio6Editor.AutoCompleteFromFile Samples.DevStudio6Editor.CloseExceptActive Samples.DevStudio6Editor.CommentOut Samples.DevStudio6Editor.ifdefOut Samples.DevStudio6Editor.ifndefOut Samples.DevStudio6Editor.MultiplePastes Samples.DevStudio6Editor.OneTimeInclude Samples.DevStudio6Editor.PrintAllOpenDocuments Samples.DevStudio6Editor.ToggleCommentStyle Samples.Utilities.AddClassicComRef Samples.Utilities.FindCase Samples.Utilities.FindLastTarget Samples.Utilities.FindLine Samples.Utilities.InsertDocComments Samples.Utilities.ListMacroSamples Samples.Utilities.ListModifiedDocuments Samples.Utilities.ListProj Samples.Utilities.LoadView Samples.Utilities.SaveView Samples.Utilities.TurnOffLineNumbers Samples.Utilities.TurnOffWordWrap Samples.Utilities.TurnOnLineNumbers Samples.Utilities.TurnOnWordWrap Samples.VSEditor.BeginningOfFunction Samples.VSEditor.CenterScreen Samples.VSEditor.CommentRegion Samples.VSEditor.CountOccurrences Samples.VSEditor.DoForWholeFile Samples.VSEditor.EmacsStyleIndentLine Samples.VSEditor.FillCommentParagraph Samples.VSEditor.FixLineEnds Samples.VSEditor.InsertDate Samples.VSEditor.InsertTime Samples.VSEditor.InsertTimeDate Samples.VSEditor.LineEmUp Samples.VSEditor.LineToTop Samples.VSEditor.ListMatchingLines Samples.VSEditor.ListNonMatchingLines Samples.VSEditor.NewCommentLine Samples.VSEditor.OneFunctionView Samples.VSEditor.OutlineCode Samples.VSEditor.PrintItemsInSelectedProject Samples.VSEditor.PrintNumberedLines Samples.VSEditor.SaveBackup Samples.VSEditor.SetFillColumn Samples.VSEditor.TopOfBlock Samples.MakeAddin.MakeAddinFromMacroProj Samples.VSDebugger.AddBreakpointToMain Samples.VSDebugger.AttachToCalc Samples.VSDebugger.BreakpointLastHit Samples.VSDebugger.DebuggerMode Samples.VSDebugger.DetachAll Samples.VSDebugger.DumpExpression Samples.VSDebugger.DumpStacks Samples.VSDebugger.LastBreakReason Samples.VSDebugger.ListAllBreakpoints Samples.VSDebugger.ListBreakpointsLastHit Samples.VSDebugger.ListDebuggedProcesses Samples.VSDebugger.RunToLine Samples.VSDebugger.RunToNextBreakpoint Samples.VSDebugger.ShowCurrentProcess Samples.VSDebugger.StepOverAll Samples.VSDebugger.SupportedLanguages Samples.AddDirAsSlnFolder.GenerateSlnFolderOnDirStructure Samples.Accessibility.DecreaseTextEditorFontSize Samples.Accessibility.IncreaseTextEditorFontSize Samples.Accessibility.MaximizeToolWindowsInEnvironment Samples.Accessibility.ToggleTextEditorGrayScale Samples.Accessibility.UpdateTextEditorFontSizeToMatchDisplayProperties Samples.DevStudio6Editor.AddFunctionDescription Samples.DevStudio6Editor.AddRevisionMarks Samples.DevStudio6Editor.AutoCompleteFromFile Samples.DevStudio6Editor.CloseExceptActive Samples.DevStudio6Editor.CommentOut Samples.DevStudio6Editor.ifdefOut Samples.DevSlicationObjects !Descr !fcName !Header !iPrm !iPrmA !Last !Loc1 !Loc2 !prms  !Reti  !RetTp  !selection2*l,3!ValidIdlh,!$(100663298$@100663338$Samples._ApplicationObjects "ValidId "VB$t_i4$L0d! "i6*4"PoundDefOutp "$(100663298$@100663338$Samples._ApplicationObjects" #ControlVarName #Ok #PoundType #sel #selection #VB$t_i4$L0" #VB$t_array$S0T# #i2*5$ifdefOut$$(100663298$@100663338$Samples._ApplicationObjects2*86$ifndefOut4$$(100663298$@100663338$Samples._ApplicationObjects6*67$OneTimeInclude<6$$(100663298$@100663338$Samples._ApplicationObjects" $ControlVarName $DocName $examp $ext $pos $selection" $VB$t_array$S0" $VB$t_array$S1>*dK8&AddToCompletionWords`K&$(100663298$@100663338$Samples._ApplicationObjectsB*Xo9-'ExtractNextCompletionWordhTo-'$(100663298$@100663338$Samples._ApplicationObjects. %ExtractNextCompletionWord %newIndex>*:'FillCompletionWords\'$(100663298$@100663338$Samples._ApplicationObjects &firstCol &firstLine &firstTime" &searchString &selB*Q;P(SuggestNextCompletionWordQP($(100663298$@100663338$Samples._ApplicationObjects 'selection. 'SuggestNextCompletionWord 'word>*<(AutoCompleteFromFile($(100663298$@100663338$Samples._ApplicationObjects (doc (origCol (origLine (selx Kl! "'#(I$  (    &+,/(0M4r5678 ?  1 2 4 ;   "&:@ AB*C+D<EIGHI"J2P7Q?R@SFTGVpWXYZ[\^_abcdef ghijk l  E V 6 6h 'm 9'((AB,%(#,l1ABp    3"p /<=AHIjq)-.01?    8&     ,  :  ;  :  ?  !  C  ?  !   #8ahwy%?@Oavw  1 $ 2 2  /T\4= 3V[\8<E  5  ( E  l7`.5. j  G ,K[\`aquxyz} # 9 . @/ &  . ,    f{   &F\"#$% &*+,/-7.E/N1O2R3S4U6d78EFHIJ5KZMcOv{QRSTUVWP2XA[N\O]P^Vcidoevf}ghijklmn-oCpWqirlsmtrusvyxyz{|}~)2367<Kpv-RSTdv;      1 6 ; 6 5 & ' 6"$" .6/9+ +:*C>A<:/6F67DB<"Z<L '&##48@FIIE;;!(# '#! =.ZBG+ +: '#  =.5BG+ +:  #O 4;9l_l   (}f Tjw}&@^_u568;>@Dbcsz~!./IMN`k    7DGHIn"#$'*+~,-.12345$6%(-798O9Z:[;h<i=l?mAzB{D! 0   o 7 !  )9  !?M**$3?7.*.0F!4IQ"(I3%(%-VI!!5#U,94Dn5*@%8=Y.&:<??Sa5!J6M;ka*(-?+o  z  !,MOSTU$V%X3YbZ[\]^_`abd"e)f*h)       ?CG5,   >  "tjqrstu w2xDyEzb{d|x}z~6"  # "  2 `  4  / -1  7ZV   <$0   <$0   $6! /56<=DRThvw|>Wm"%&34 &    &    6 "   " + @ a 5 3qBI   E  x&Kl #$3HI3 D    ;  -'o)/0FJMNem1 ' *   < %  H    p ,,' -9 ; DFIQY]twx 2 !  ! + -   (-" Q   5 1  Z P(Q !"(#7$?%Etudio6Editor.ifndefOut Samples.DevStudio6Editor.MultiplePastes Samples.DevStudio6Editor.OneTimeInclude Samples.DevStudio6Editor.PrintAllOpenDocuments Samples.DevStudio6Editor.ToggleCommentStyle Samples.Utilities.AddClassicComRef Samples.Utilities.FindCase Samples.Utilities.FindLastTarget Samples.Utilities.FindLine Samples.Utilities.InsertDocComments Samples.Utilities.ListMacroSamples Samples.Utilities.ListModifiedDocuments Samples.Utilities.ListProj Samples.Utilities.LoadView Samples.Utilities.SaveView Samples.Utilities.TurnOffLineNumbers Samples.Utilities.TurnOffWordWrap Samples.Utilities.TurnOnLineNumbers Samples.Utilities.TurnOnWordWrap Samples.VSEditor.BeginningOfFunction Samples.VSEditor.CenterScreen Samples.VSEditor.CommentRegion Samples.VSEditor.CountOccurrences Samples.VSEditor.DoForWholeFile Samples.VSEditor.EmacsStyleIndentLine Samples.VSEditor.FillCommentParagraph Samples.VSEditor.FixLineEnds Samples.VSEditor.InsertDate Samples.VSEditor.InsertTime Samples.VSEditor.InsertTimeDate Samples.VSEditor.LineEmUp Samples.VSEditor.LineToTop Samples.VSEditor.ListMatchingLines Samples.VSEditor.ListNonMatchingLines Samples.VSEditor.NewCommentLine Samples.VSEditor.OneFunctionView Samples.VSEditor.OutlineCode Samples.VSEditor.PrintItemsInSelectedProject Samples.VSEditor.PrintNumberedLines Samples.VSEditor.SaveBackup Samples.VSEditor.SetFillColumn Samples.VSEditor.TopOfBlock Samples.MakeAddin.MakeAddinFromMacroProj Samples.VSDebugger.AddBreakpointToMain Samples.VSDebugger.AttachToCalc Samples.VSDebugger.BreakpointLastHit Samples.VSDebugger.DebuggerMode Samples.VSDebugger.DetachAll Samples.VSDebugger.DumpExpression Samples.VSDebugger.DumpStacks Samples.VSDebugger.LastBreakReason Samples.VSDebugger.ListAllBreakpoints Samples.VSDebugger.ListBreakpointsLastHit Samples.VSDebugger.ListDebuggedProcesses Samples.VSDebugger.RunToLine Samples.VSDebugger.RunToNextBreakpoint Samples.VSDebugger.ShowCurrentProcess Samples.VSDebugger.StepOverAll Samples.VSDebugger.SupportedLanguages Samples.AddDirAsSlnFolder.GenerateSlnFolderOnDirStructure Samples.Accessibility.DecreaseTextEditorFontSize Samples.Accessibility.IncreaseTextEditorFontSize Samples.Accessibility.MaximizeToolWindowsInEnvironment Samples.Accessibility.ToggleTextEditorGrayScale Samples.Accessibility.UpdateTextEditorFontSizeToMatchDisplayProperties Samples.DevStudio6Editor.AddFunctionDescription Samples.DevStudio6Editor.AddRevisionMarks Samples.DevStudio6Editor.AutoCompleteFromFile Samples.DevStudio6Editor.CloseExceptActive Samples.DevStudio6Editor.CommentOut Samples.DevStudio6Editor.ifdefOut Samples.DevStudio6Editor.ifndefOut Samples.DevStudio6Editor.MultiplePastes Samples.DevStudio6Editor.OneTimeInclude Samples.DevStudio6Editor.PrintAllOpenDocuments Samples.DevStudio6Editor.ToggleCommentStyle Samples.Utilities.AddClassicComRef Samples.Utilities.FindCase Samples.Utilities.FindLastTarget Samples.Utilities.FindLine Samples.Utilities.InsertDocComments Samples.Utilities.ListMacroSamples Samples.Utilities.ListModifiedDocuments Samples.Utilities.ListProj Samples.Utilities.LoadView Samples.Utilities.SaveView Samples.Utilities.TurnOffLineNumbers Samples.Utilities.TurnOffWordWrap Samples.Utilities.TurnOnLineNumbers Samples.Utilities.TurnOnWordWrap Samples.VSEditor.BeginningOfFunction Samples.VSEditor.CenterScreen Samples.VSEditor.CommentRegion Samples.VSEditor.CountOccurrences Samples.VSEditor.DoForWholeFile Samples.VSEditor.EmacsStyleIndentLine Samples.VSEditor.FillCommentParagraph Samples.VSEditor.FixLineEnds Samples.VSEditor.InsertDate Samples.VSEditor.InsertTime Samples.VSEditor.InsertTimeDate Samples.VSEditor.LineEmUp Samples.VSEditor.LineToTop Samples.VSEditor.ListMatchingLines Samples.VSEditor.ListNonMatchingLines Samples.VSEditor.NewCommentLine Samples.VSEditor.OneFunctionView Samples.VSEditor.OutlineCode Samples.VSEditor.PrintItemsInSelectedProject Samples.VSEditor.PrintNumberedLines Samples.VSEditor.SaveBackup Samples.VSEditor.SetFillColumn Samples.VSEditor.TopOfBlock Samples.MakeAddin.MakeAddinFromMacroProj Samples.VSDebugger.AddBreakpointToMain Samples.VSDebugger.AttachToCalc Samples.VSDebugger.BreakpointLastHit Samples.VSDebugger.DebuggerMode Samples.VSDebugger.DetachAll Samples.VSDebugger.DumpExpression Samples.VSDebugger.DumpStacks Samples.VSDebugger.LastBreakReason Samples.VSDebugger.ListAllBreakpoints Samples.VSDebugger.ListBreakpointsLastHit Samples.VSDebugger.ListDebuggedProcesses Samples.VSDebugger.RunToLine Samples.VSDebugger.RunToNextBreakpoint Samples.VSDebugger.ShowCurrentProcess Samples.VSDebugger.StepOverAll Samples.VSDebugger.SupportedLanguages Samples.AddDirAsSlnFolder.GenerateSlnFolderOnDirStructure Samples.Accessibility.DecreaseTextEditorFontSize Samples.Accessibility.IncreaseTextEditorFontSize Samples.Accessibility.MaximizeToolWindowsInEnvironment Samples.Accessibility.ToggleTextEditorGrayScale Samples.Accessibility.UpdateTextEditorFontSizeToMatchDisplayProperties Samples.DevStudio6Editor.AddFunctionDescription Samples.DevStudio6Editor.AddRevisionMarks Samples.DevStudio6Editor.AutoCompleteFromFile Samples.DevStudio6Editor.CloseExceptActive Samples.DevStudio6Editor.CommentOut Samples.DevStudio6Editor.ifdefOut Samples.DevStudio6Editor.ifndefOut Samples.DevStudio6Editor.MultiplePastes Samples.DevStudio6Editor.OneTimeInclude Samples.DevStudio6Editor.PrintAllOpenDocuments Samples.DevStudio6Editor.ToggleCommentStyle Samples.Utilities.AddClassicComRef Samples.Utilities.FindCase Samples.Utilities.FindLastTarget Samples.Utilities.FindLine Samples.Utilities.InsertDocComments Samples.Utilities.ListMacroSamples Samples.Utilities.ListModifiedDocuments Samples.Utilities.ListProj Samples.Utilities.LoadView Samples.Utilities.SaveView Samples.Utilities.TurnOffLineNumbers Samples.Utilities.TurnOffWordWrap Samples.Utilities.TurnOnLineNumbers Samples.Utilities.TurnOnWordWrap Samples.VSEditor.BeginningOfFunction Samples.VSEditor.CenterScreen Samples.VSEditor.CommentRegion Samples.VSEditor.CountOccurrences Samples.VSEditor.DoForWholeFile Samples.VSEditor.EmacsStyleIndentLine Samples.VSEditor.FillCommentParagraph Samples.VSEditor.FixLineEnds Samples.VSEditor.InsertDate Samples.VSEditor.InsertTime Samples.VSEditor.InsertTimeDate Samples.VSEditor.LineEmUp Samples.VSEditor.LineToTop Samples.VSEditor.ListMatchingLines Samples.VSEditor.ListNonMatchingLines Samples.VSEditor.NewCommentLine Samples.VSEditor.OneFunctionView Samples.VSEditor.OutlineCode Samples.VSEditor.PrintItemsInSelectedProject Samples.VSEditor.PrintNumberedLines Samples.VSEditor.SaveBackup Samples.VSEditor.SetFillColumn Samples.VSEditor.TopOfBlock Samples.MakeAddin.MakeAddinFromMacroProj Samples.VSDebugger.AddBreakpointToMain Samples.VSDebugger.AttachToCalc Samples.VSDebugger.BreakpointLastHit Samples.VSDebugger.DebuggerMode Samples.VSDebugger.DetachAll Samples.VSDebugger.DumpExpression Samples.VSDebugger.DumpStacks Samples.VSDebugger.LastBreakReason Samples.VSDebugger.ListAllBreakp      !"#$%&'()*+,-./0123456789:;<=>?@ABCDEFGIJKLMNOPQRSTUVWXYZ[\]^_`abcdefghijklmnopqrstuvwxyz{|}~oints Samples.VSDebugger.ListBreakpointsLastHit Samples.VSDebugger.ListDebuggedProcesses Samples.VSDebugger.RunToLine Samples.VSDebugger.RunToNextBreakpoint Samples.VSDebugger.ShowCurrentProcess Samples.VSDebugger.StepOverAll Samples.VSDebugger.SupportedLanguages Samples.AddDirAsSlnFolder.GenerateSlnFolderOnDirStructure Samples.Accessibility.DecreaseTextEditorFontSize Samples.Accessibility.IncreaseTextEditorFontSize Samples.Accessibility.MaximizeToolWindowsInEnvironment Samples.Accessibility.ToggleTextEditorGrayScale Samples.Accessibility.UpdateTextEditorFontSizeToMatchDisplayProperties &F(O)) ) 1 +  " %  7(+0 234+5.6/9;:B;I<P=YAsB|CDFGHIK !   '     # $ 1 )    & 3 1 $ ` 8\t<Tl8Pt0Hl.** .cctor* $(100663298$@100663298$Samples._ApplicationObjects6*H4get_ComputerD4$(100663298$@100663298$Samples._ApplicationObjects Computer:*Dget_ApplicationLD$(100663298$@100663298$Samples._ApplicationObjects Application2*Tget_UserT$(100663298$@100663298$Samples._ApplicationObjects User:*pdget_WebServicesld$(100663298$@100663298$Samples._ApplicationObjects WebServicesH *<~ 2-.7<40yz{ > <D0 9 <T0 : <d0C ( 8Pp6*:woCStepOverAll:oC$(100663298$#Samples.VSEditor$#Samples.Accessibility$#Samples.AddDirAsSlnFolder$#Samples.DevStudio6Editor$#Samples.EnvironmentEvents$#Samples.MakeAddin$#Samples.Utilities$#Samples.VSDebugger$#Samples._Utility"$#Samples._ApplicationObjects*$@FT:Microsoft.VisualBasic.ControlChars$@F:Microsoft.VisualBasic&$#Microsoft.VisualBasic.Constants&$#Microsoft.VisualBasic.Conversion&$#Microsoft.VisualBasic.DateAndTime&$#Microsoft.VisualBasic.FileSystem&$#Microsoft.VisualBasic.Financial"$#Microsoft.VisualBasic.Globals&$#Microsoft.VisualBasic.Information&$#Microsoft.VisualBasic.Interaction"$#Microsoft.VisualBasic.VBMath"$#Microsoft.VisualBasic.Strings$@F:System.Diagnostics$@F:EnvDTE80$@F:EnvDTE$*Samples$#Samples.My.MyProject2$@PX:xml=http://www.w3.org/XML/1998/namespace*$@PX:xmlns=http://www.w3.org/2000/xmlns/$@P:Microsoft.VisualBasic&$#Microsoft.VisualBasic.Constants&$#Microsoft.VisualBasic.Conversion&$#Microsoft.VisualBasic.DateAndTime&$#Microsoft.VisualBasic.FileSystem&$#Microsoft.VisualBasic.Financial"$#Microsoft.VisualBasic.Globals&$#Microsoft.VisualBasic.Information&$#Microsoft.VisualBasic.Interaction"$#Microsoft.VisualBasic.VBMath"$#Microsoft.VisualBasic.Strings $@PX:= $Samples$Samples._ApplicationObjects2*lxCDumpStackshC$(100663298$@100663415$Samples._ApplicationObjects LcommandWin  LVB$t_ref$L0"  LVB$t_array$S0  LVB$t_ref$L1  LVB$t_ref$L2,dbC LmyThread(`DD LmyFrame`\FD Largs" LfunctionName Li LmyArg Lpos" LprogramModule>*\ yQFAddBreakpointToMainpX QF$(100663298$@100663415$Samples._ApplicationObjects Mbp Mbps MVB$t_ref$L0>*0 zFRunToNextBreakpoint` , F$(100663298$@100663415$Samples._ApplicationObjects ( OF Nbp>*\ {WGListBreakpointsLastHit4 X WG$(100663298$@100663415$Samples._ApplicationObjects Obppane Ohitbps OVB$t_ref$L0t T S}G Obp:* U|GBreakpointLastHit`  UG$(100663298$@100663415$Samples._ApplicationObjects Pbppane:*8 }7HListAllBreakpoints 4 7H$(100663298$@100663415$Samples._ApplicationObjects Qbppane Qbps QVB$t_ref$L0T 0 O]H Qbp6*`~HDebuggerMode< `H$(100663298$@100663415$Samples._ApplicationObjects" RoutputWinPane RVB$t_i4$L0:*IShowCurrentProcessI$(100663298$@100663415$Samples._ApplicationObjects" SoutputWinPane Sproc" SVB$t_array$S0:*ILastBreakReasonI$(100663298$@100663415$Samples._ApplicationObjects" ToutputWinPane TVB$t_i4$L06*,JAttachToCalc,J$(100663298$@100663415$Samples._ApplicationObjects Uattached Uproc UVB$t_ref$L0>* JListDebuggedProcessesJ$(100663298$@100663415$Samples._ApplicationObjects" VoutputWinPane Vproc VVB$t_ref$L0" VVB$t_array$S0:*x{KSupportedLanguagesx{K$(100663298$@100663415$Samples._ApplicationObjects Wlang" WoutputWinPane WVB$t_ref$L02*vKDetachAll vK$(100663298$@100663415$Samples._ApplicationObjects& XVB$ActiveHandler" XVB$ResumeTarget2*OiLRunToLineOiL$(100663298$@100663415$Samples._ApplicationObjects :{L" YtextSelection6*LDumpExpressionL$(100663298$@100663415$Samples._ApplicationObjects" ZcommandWindow Zexpression" ZVB$t_array$S0L Zi6*9MIsDebugging9M$(100663298$@100663415$Samples._ApplicationObjects [IsDebuggingloC:`%&8  $  E C& # $1%B&C)mn*-/57&8.93:P;Q<Y=Z[@jxA}BCDEFIUJV}K~LN Y 7 X e Eu9)88$Y78&/X"   QF xRV:;WDPX\Y]~Z 3  "  F]^_$b4cMdZedfegrhuivjkl  E 2 30# 2  $  WGpt uv&'y>JzW{X{||}~! ; 4 # >-  ;  xGUl EFRS ; > N B  7H &'0<STwx ; '  6  C  H`  23ABPQ]^ B - +B ,C )@  I x  ./|} B + " G ]  I RSabpq B 1 9F 3A B] >H  ,J'AHJMNOps ( 5 7    ! .  J  $567NZ B 9 T  <k   {Kx  1=TUv  B Z 0 ;  xKvl)l !  7 liLO`' ;!L"M#8 9 . '  L(, -3.>/@1]_3452678:= \ > (! S  4 D  xM9l=> ?@A B6C7D& * ;  S ?,Ph  8 P t  4 X p  $ >* _H)MakeAddinFromMacroProj| H)$(100663298$#Samples.VSEditor$#Samples.Accessibility$#Samples.AddDirAsSlnFolder$#Samples.DevStudio6Editor$#Samples.EnvironmentEvents$#Samples.MakeAddin$#Samples.Utilities$#Samples.VSDebugger$#Samples._Utility"$#Samples._ApplicationObjects$@F:System.Diagnostics$@F:EnvDTE80$@F:EnvDTE$*Samples$#Samples.My.MyProject2$@PX:xml=http://www.w3.org/XML/1998/namespace*$@PX:xmlns=http://www.w3.org/2000/xmlns/$@P:Microsoft.VisualBasic&$#Microsoft.VisualBasic.Constants&$#Microsoft.VisualBasic.Conversion&$#Microsoft.VisualBasic.DateAndTime&$#Microsoft.VisualBasic.FileSystem&$#Microsoft.VisualBasic.Financial"$#Microsoft.VisualBasic.Globals&$#Microsoft.VisualBasic.Information&$#Microsoft.VisualBasic.Interaction"$#Microsoft.VisualBasic.VBMath"$#Microsoft.VisualBasic.Strings $@PX:= $Samples$Samples._ApplicationObjects& :completionMessage& :connectCodeElement& :connectProjectItem :execCode" :execEditPoint" :macroProject" :macroProjectSrc& :objExecCodeElement& :onConnectionCode*  :onConnectionCodeElement  :proj  :projItem"  :queryStatusCode*  :queryStatusCodeElement" :VB$t_array$S0 :VB$t_ref$L0 :VB$t_ref$L1  :VB$t_ref$L2" !:VB$t_array$S1DJ) :membersDLhc* :objProjenumD0 + :doc :docText :textDoc :winP, ', :codeElt& :moduleCodeElement" :newCodeModel" :newProjectItem" :newTextDocument :textSel( ;h- :codeFunc$ - :commandNameDx *0* :connectTextSelection6* `P1CopyReferences P1$(100663298$@100663391$Samples._ApplicationObjects& ;objReferencesDest" ;objReferenceSrc ;VB$t_ref$L0B* al2IsMacroCallableFunction l2$(100663298$@100663391$Samples._ApplicationObjects* <IsMacroCallableFunction <param <paramText <VB$t_ref$L0H)&).*@+V,c-q./0123578:;=>A9GBYC]D^E_FHIJKNOPRSTVWXYZ![/\=]K^Y_stbcdefhprv+w4x={R|`}a~lu )A[nzLZ[\],<FTbp~ !0@JT! 1 F _ B 6 A C      e ) C  D;/   ( |   : u i n g l g Q ^ $ 7V6Lc cQ64!??(>R4d)jXUQMFK!`iJedVvAp   A X c U ' O c g Y . < > 8 e h Z / + ? g - / ,   G } ] P1!"LXof = D 1D   l2 %123 AM f s z~ L A   0   . @ O   < d | 6*MCommentRegionM$(100663298$#Samples.VSEditor$#Samples.Accessibility$#Samples.AddDirAsSlnFolder$#Samples.DevStudio6Editor$#Samples.EnvironmentEvents$#Samples.MakeAddin$#Samples.Utilities$#Samples.VSDebugger$#Samples._Utility"$#Samples._ApplicationObjects*$@FT:Microsoft.VisualBasic.ControlChars$@F:Microsoft.VisualBasic&$#Microsoft.VisualBasic.Constants&$#Microsoft.VisualBasic.Conversion&$#Microsoft.VisualBasic.DateAndTime&$#Microsoft.VisualBasic.FileSystem&$#Microsoft.VisualBasic.Financial"$#Microsoft.VisualBasic.Globals&$#Microsoft.VisualBasic.Information&$#Microsoft.VisualBasic.Interaction"$#Microsoft.VisualBasic.VBMath"$#Microsoft.VisualBasic.Strings$@F:System.Diagnostics$@F:EnvDTE80$@F:EnvDTE$*Samples$#Samples.My.MyProject2$@PX:xml=http://www.w3.org/XML/1998/namespace*$@PX:xmlns=http://www.w3.org/2000/xmlns/$@P:Microsoft.VisualBasic&$#Microsoft.VisualBasic.Constants&$#Microsoft.VisualBasic.Conversion&$#Microsoft.VisualBasic.DateAndTime&$#Microsoft.VisualBasic.FileSystem&$#Microsoft.VisualBasic.Financial"$#Microsoft.VisualBasic.Globals&$#Microsoft.VisualBasic.Information&$#Microsoft.VisualBasic.Interaction"$#Microsoft.VisualBasic.VBMath"$#Microsoft.VisualBasic.Strings $@PX:= $Samples$Samples._ApplicationObjects" \commentStart \endPoint \selection \startPoint<-'N \line6*l;oNNewCommentLineh;oN$(100663298$@100663433$Samples._ApplicationObjects" ]textSelection2* ,NSaveBackupp ,N$(100663298$@100663433$Samples._ApplicationObjects ^endPoint ^fileName ^startPoint ^text" ^textDocument" ^VB$t_array$S0" ^VB$t_array$S1" ^VB$t_array$S2:* OOneFunctionView  O$(100663298$@100663433$Samples._ApplicationObjects _editPoint" _textSelection* _textSelectionPointSaved>* IPBeginningOfFunction IP$(100663298$@100663433$Samples._ApplicationObjects `codeElement" `textSelection2* *PLineToTop *P$(100663298$@100663433$Samples._ApplicationObjects" atextSelection>* ;PEmacsStyleIndentLine ;P$(100663298$@100663433$Samples._ApplicationObjects* bsavedTextSelectionPoint" btextSelection2* /QTopOfBlock /Q$(100663298$@100663433$Samples._ApplicationObjects" ccurrentIndent ceditPoint cindent cselection ctextDoc6*vQIndentLevel vQ$(100663298$@100663433$Samples._ApplicationObjects dIndentLevel dlastLine6*|n[RSkipSpaceRightxn[R$(100663298$@100663433$Samples._ApplicationObjects elastPos eline6*KROutlineCodeKR$(100663298$@100663433$Samples._ApplicationObjects felt felts ffileCM fi fVB$t_i4$L06*L%SCollapseEltH%S$(100663298$@100663433$Samples._ApplicationObjects gepEnd gepStart gVB$t_i4$L0 gVB$t_i4$L1ENS gi gmemsDOS gi gmems6*99TCenterScreenP99T$(100663298$@100663433$Samples._ApplicationObjects htextPoint:*drTPrintNumberedLines`rT$(100663298$@100663433$Samples._ApplicationObjects ii ilineCount inewText" itextSelection* itextSelectionNewFile iVB$t_i4$L06*bUDoForWholeFilehbU$(100663298$@100663433$Samples._ApplicationObjects jcommandU jactivePoint janchorPoint jcornerPoint jselection jtextPane2*'AVLineEmUp'AV$(100663298$@100663433$Samples._ApplicationObjects kanyMoved keditPoint khowFarOut krows kselection kVB$t_i8$L0 kVB$t_i8$L1 kVB$t_i8$L2 V kAnyRowValid karrIdx kcurCharPos kcurDispPos"  kmaxMinPosIdx  kminCharPos  kminDispPos`V"  koriginalLineXV  kwordCount6*|hXFixLineEnds|hX$(100663298$@100663433$Samples._ApplicationObjects leditPoint lselection6*}XSetFillColumn}X$(100663298$@100663433$Samples._ApplicationObjects|MY mcolumn>*aYFillCommentParagraphaY$(100663298$@100663433$Samples._ApplicationObjects ncolumnLimit neditPoint ni nlinePrefix nselection ntextDocvZ nextraSpace ntextWZ nlastCol  nstartCol"  nstartDispCol  nstartRowB*U\IsOnNonEmptyCommentLineU\$(100663298$@100663433$Samples._ApplicationObjects* oIsOnNonEmptyCommentLine olineText opfxText>*<,]GetCommentLinePrefix8,]$(100663298$@100663433$Samples._ApplicationObjects* pGetCommentLinePrefix plinePrefix ptext ptrimText4M] pleftChar6*( ]MoveWordRight@$ ]$(100663298$@100663433$Samples._ApplicationObjects qlineLenx $] qorgLine6*!}^MoveWordLeft, !}^$(100663298$@100663433$Samples._ApplicationObjects rlineLend !$^ rorgLine6*!_IsWhitespace!!_$(100663298$@100663433$Samples._ApplicationObjects" sIsWhitespace:*#,-_ListMatchingLines!#,-_$(100663298$@100663433$Samples._ApplicationObjects tfindResult tlastFoundAt& toutputWindowPane" ttextDocument" ttextSelection* ttextSelectionPointSaved twindow tVB$t_i4$S0>*$Y`ListNonMatchingLines#$Y`$(100663298$@100663433$Samples._ApplicationObjects udone uendLine" uoutputWinPane" utextSelection& utextSelectionSaved uwindow:*& aaCountOccurrences$& aa$(100663298$@100663433$Samples._ApplicationObjects vcount vfindResult& vfirstFindLocation" vtextSelection* vtextSelectionPointSaved(%p&#a" vfoundSelection(%&)a" vfoundSelection2*',jbInsertTime&',jb$(100663298$@100663433$Samples._ApplicationObjects" wtextSelection" wVB$t_date$S02*p(,bInsertDate'l(,b$(100663298$@100663433$Samples._ApplicationObjects" xtextSelection" xVB$t_date$S06*t)CbInsertTimeDatet(p)Cb$(100663298$@100663433$Samples._ApplicationObjects" ytextSelection" yVB$t_date$S0" yVB$t_date$S1:**cIsPrintableFilex)*c$(100663298$@100663433$Samples._ApplicationObjects zextensions zexts zfileName" zIsPrintableFile" zVB$t_array$S0F*+tcPrintItemsInSelectedProject*+tc$(100663298$@100663433$Samples._ApplicationObjects {proj" {VB$t_array$S0F*,-dPrintItemsInSelectedProject+,-d$(100663298$@100663433$Samples._ApplicationObjects |projItem |VB$t_ref$L0+, hd |doc,M #$"%)&0(F)GI-Q.Y/a0h1r2u3v4w*z|5}89: 3 : ) < / '0&)/    $  `oN;T?BCD,E9F 3 C " N,LSV'X-Y.ZI[V\c]k`abc*e 8 0   1 = 9 , . I * G Okpq"r.uCvKwTx\yc|k}~ 3 L >  4 , ' 7  4 * ' ; PI $'67>FG 3 a 1^    HP*<( 3 I lP;`")09 3 N # $ ; t/Qh%-AMRX[\^`lqw|} < 5 & ; (      3 ' 0/!+  ) P Qv #-=GHTWXelopqt> & $ & /$ L# 6  3!  [Rn  % ( ) *l <  / " 7   RK x)6? DI! > #  &  \S%P%)*+$,:0U1a2u3z489:;<>?@A BCDE"F#Gn \ X  ^  $3  I  $3   *  (Y"  *  H9T9<MP*Q7R = > rTU\]^$_N`Va_cgdoexghijklmnpq 5 "  O % / ) 4 / ! @ j % 0 0  & G bUwz{*@MZ 0 5 @ @ I > ( * ( / 5 I  `AV'FT)DILWbmx|*/19:NO\i} % " ( - 7 D$))))#* F '.(&31.6,,,,BA*1EBAc.%   '1'K(lfH  $  &   hX|"$+3M U ] ^ f gz - 7 " Z 0%^  ! = X}  ,- D!S"Y#Z$z%{&@ ( G 8 "  C  aYU/057892:=;><X>s?@CGHIJKLFPQRUVTW[\$]4`<a>b?c@fRgXhYmcnkpwv~wxyz{~"6>EZ`pO  ' 7 G  B @ 5 @ 9#K)  (&^>0CN]1T13cG)K0?<?+2?5t:H4>\4G/297SPA/2911  D  $  U\&Sq B $ B / 0  O0 /  ,]';P^_mo}Q 7 $ ; ) , )3@-  Q  *] &08;<>GHnpyz ; ' 5 % ! /(  &  d&  `  }^ %/7:;="F#G!fh'q(r&)*: ' / %  /&  %  Z%  ^  l_`1234567: & ! P-_,DAHJK%LAMLPXQaRoUwV~XY[\]_`ab cdZg*i ' A / 4 < A ( N  ! E ( B  ' { 9 \ ,  < ; DY`8kqstu)v:xBzM{^~jry $ " ) I 5 ( @ L B   5 ' M?  ; % %  H 6 \aa P%-EKLbrtw ! 3 N ( I   E ( 3<O <P   ,  < ; 8 Hjb,<* T D Hb,<* T D HbC<A T s lc`N N y " ) Txctl-:=>fr& 7 _   - 7 -d ,:;LS[\]ijT ' 7O1V#=  ?  a   ( H ` |  8 \ t 0Hd| $<Tp 8\t0Hl $D\|.* .ctor $#Samples.My.MyProject$#Samples.VSEditor$#Samples.Accessibility$#Samples.AddDirAsSlnFolder$#Samples.DevStudio6Editor$#Samples.EnvironmentEvents$#Samples.MakeAddin$#Samples.Utilities$#Samples.VSDebugger$#Samples._Utility"$#Samples._ApplicationObjects$*Samples$#Samples.My.MyProject2$@PX:xml=http://www.w3.org/XML/1998/namespace*$@PX:xmlns=http://www.w3.org/2000/xmlns/$@P:Microsoft.VisualBasic&$#Microsoft.VisualBasic.Constants&$#Microsoft.VisualBasic.Conversion&$#Microsoft.VisualBasic.DateAndTime&$#Microsoft.VisualBasic.FileSystem&$#Microsoft.VisualBasic.Financial"$#Microsoft.VisualBasic.Globals&$#Microsoft.VisualBasic.Information&$#Microsoft.VisualBasic.Interaction"$#Microsoft.VisualBasic.VBMath"$#Microsoft.VisualBasic.Strings $@PX:=$Samples.My$Samples._ApplicationObjects< 0klm   02*vQCget_HandleQC$(100663298$@100663394$Samples._ApplicationObjects KHandle KiptrHQC< ?  Hd2*Kb/3SaveView|K/3$(100663298$#Samples.VSEditor$#Samples.Accessibility$#Samples.AddDirAsSlnFolder$#Samples.DevStudio6Editor$#Samples.EnvironmentEvents$#Samples.MakeAddin$#Samples.Utilities$#Samples.VSDebugger$#Samples._Utility"$#Samples._ApplicationObjects$@F:System$@F:System.Windows.Forms$@F:System.Windows$@F:System.Diagnostics$@F:EnvDTE80$@F:EnvDTE$*Samples$#Samples.My.MyProject2$@PX:xml=http://www.w3.org/XML/1998/namespace*$@PX:xmlns=http://www.w3.org/2000/xmlns/$@P:Microsoft.VisualBasic&$#Microsoft.VisualBasic.Constants&$#Microsoft.VisualBasic.Conversion&$#Microsoft.VisualBasic.DateAndTime&$#Microsoft.VisualBasic.FileSystem&$#Microsoft.VisualBasic.Financial"$#Microsoft.VisualBasic.Globals&$#Microsoft.VisualBasic.Information&$#Microsoft.VisualBasic.Interaction"$#Microsoft.VisualBasic.VBMath"$#Microsoft.VisualBasic.Strings $@PX:= $Samples$Samples._ApplicationObjects =name2*0Qcz3LoadView,Qz3$(100663298$@100663394$Samples._ApplicationObjects >name:*d3TurnOnLineNumbers43$(100663298$@100663394$Samples._ApplicationObjects:*he4TurnOffLineNumbersd4$(100663298$@100663394$Samples._ApplicationObjects6*f5TurnOnWordWrapl5$(100663298$@100663394$Samples._ApplicationObjects:*g6TurnOffWordWrap6$(100663298$@100663394$Samples._ApplicationObjects2*h7ListProj7$(100663298$@100663394$Samples._ApplicationObjects ?project" ?projectObjects ?target ?window" ?VB$t_array$S06* siw8ListProjAux sw8$(100663298$@100663394$Samples._ApplicationObjects @projectItem @VB$t_ref$L0  .8& @notSubCollection" @projectItems22* xj8OutputItem x8$(100663298$@100663394$Samples._ApplicationObjects Ai" AVB$t_array$S0:*l kb9AddClassicComRef h b9$(100663298$@100663394$Samples._ApplicationObjects& BmacroProjectName" BopenFileDialog" BoutputDirectory" BoutputFileName* BprojectToAddReferenceTo" BsdkDirectory" BsystemDirectory BtlbimpPath Bwinptr"  BVB$t_array$S0  BVB$t_ref$L0 0 q<;  Bproject d <  Berr2*)l2<FindCasep )2<$(100663298$@100663394$Samples._ApplicationObjects6*9m[<FindLastTarget9[<$(100663298$@100663394$Samples._ApplicationObjects" CfindWhatLast2*tLn<FindLinepL<$(100663298$@100663394$Samples._ApplicationObjects" DtextSelection>*o<ListModifiedDocumentsx<$(100663298$@100663394$Samples._ApplicationObjects Edocument Etarget Ewindow EVB$t_ref$L0" EVB$t_array$S0:*Hp=InsertDocCommentsD=$(100663298$@100663394$Samples._ApplicationObjects FcodeElement" FcodeElementType" FcommentStart FeditPoint" FfileCodeModel FprojectItem"  FVB$t_array$S0  FVB$t_ref$L0"  FVB$t_array$S1  FVB$t_ref$L1@`>" FcodeElement2" FcodeFunction" FcodeParameter  Fparameters:*q@ListMacroSamplesL@$(100663298$@100663394$Samples._ApplicationObjects& GoutputWindowPane& GsamplesUIHierarchy GuiHierarchy" GuiHierarchyItem GVB$t_ref$L0 GVB$t_ref$L1A* GmacroUIHierarchyItemB*rALineOrientedCommentStartA$(100663298$@100663394$Samples._ApplicationObjects Hextension. HLineOrientedCommentStart>*Xhs7BGetOutputWindowPaneTh7B$(100663298$@100663394$Samples._ApplicationObjects& IGetOutputWindowPane" IoutputWindow& IoutputWindowPane Iwindow8P }B Ie:*8tBPrepareDefaultFind\4B$(100663298$@100663394$Samples._ApplicationObjects& JPrepareDefaultFind Jwhatx/3Kl(+,'-6.7/H0I1 U  8 /  xz3Ql589':6;7<N=O> ]  ? 8  x3lFG+HUIJKLM S W T R S Q x4lQR+SUTUVWX T X U S T R x5lab+cUdefgh L P M K L J x6llm+nUopqrs M Q N L M K 7&,/0[hvw G 4 *   0 - # 9   7 w8s  .5:=MNOPqv - ;>9<-I   8x '+,0Tvs  /    = K b9< ,5AIUc#0167?%&'KLP]^`aow     $ 6 C e > j + ; Nj9pHr2Y-N:2]H@E;IKA@l>  &  H2<)<' ( " T[<9H"%&&'7( ) ( ) `<LT,/0142J3 5 % ( / <8=>#?1@2A>BUCVWEiuF}GHIJ G - # ?   + 'x   =6OWXY.^6_t`ua}bcdegjklmnostw"/x;CR[go$2;Xdvw 5 2 9 6 6  1 ;  ] 2 * F . ^  8 <M/_9M'iMMjM[85\Q_   $  @ ,8?LM_l S C H ! < H i = Nz   A U_lvw_ & *  "  0  7Bh!-.;EFZ[bfr G + % I $ H  $ B#4EVgxB ( 8 C # # * P  %  |8Pp $@Xx(Ld8Pt:*/get_GetInstance/$(100663298$@100663298$Samples._ApplicationObjects  GetInstance  Value.*h.ctord$(100663298$@100663298$Samples._ApplicationObjectsx/lKL MNO(P)Q-R5-&2!H<^_c` ' .*D .cctor@$(100663298$#Samples.VSEditor$#Samples.Accessibility$#Samples.AddDirAsSlnFolder$#Samples.DevStudio6Editor$#Samples.EnvironmentEvents$#Samples.MakeAddin$#Samples.Utilities$#Samples.VSDebugger$#Samples._Utility"$#Samples._ApplicationObjects$@F:Microsoft.Win32$@F:System.Diagnostics$@F:EnvDTE80$@F:System$@F:EnvDTE$*Samples$#Samples.My.MyProject2$@PX:xml=http://www.w3.org/XML/1998/namespace*$@PX:xmlns=http://www.w3.org/2000/xmlns/$@P:Microsoft.VisualBasic&$#Microsoft.VisualBasic.Constants&$#Microsoft.VisualBasic.Conversion&$#Microsoft.VisualBasic.DateAndTime&$#Microsoft.VisualBasic.FileSystem&$#Microsoft.VisualBasic.Financial"$#Microsoft.VisualBasic.Globals&$#Microsoft.VisualBasic.Information&$#Microsoft.VisualBasic.Interaction"$#Microsoft.VisualBasic.VBMath"$#Microsoft.VisualBasic.Strings $@PX:= $Samples$Samples._ApplicationObjectsZ*L!UpdateTextEditorFontSizeToMatchDisplayPropertiesHL$(100663298$@100663328$Samples._ApplicationObjects font fontSize pointSize. textEditorFontsAndColorsB*<")IncreaseTextEditorFontSize|<)$(100663298$@100663328$Samples._ApplicationObjects. textEditorFontsAndColors VB$t_ref$S0B*S#eDecreaseTextEditorFontSizeSe$(100663298$@100663328$Samples._ApplicationObjects fontSize. textEditorFontsAndColors VB$t_ref$S0B* $ToggleTextEditorGrayScale $(100663298$@100663328$Samples._ApplicationObjects& accessibilityKey. applicationRegistryRootKey& editorInGrayScale" fontsAndColors. textEditorFontsAndColors VB$t_ref$L0 VB$t_ref$L1  VB$t_ui4$S0 Rh displayItem j displayItemJ*$ %MaximizeToolWindowsInEnvironment $(100663298$@100663328$Samples._ApplicationObjects VB$t_ref$L04  F window  = exception0$ > 7lL` #1$=%J&B ? ) R = # H)<<),-:., R M leS`156"768P9Q:, R = = 0  !>FG$J'K3L@MRNSQdTzUXZ[\]'`>a?@cJXdefghklm+ ] X , E \ B  _ R U " Ekk  B  Eee44  B  pq s(u)v1w9x:CyKzL}M~U\defg2 1 141-,   I0 `x(@p2* vSetSite v$(100663298$@100663313$Samples._ApplicationObjects2*( SetTitle$ $(100663298$@100663313$Samples._ApplicationObjects2*SetHandle,$(100663298$@100663313$Samples._ApplicationObjects>*\PushVBHostIntoLibraryX$(100663298$@100663313$Samples._ApplicationObjects:*,GetParentWindow`,$(100663298$@100663313$Samples._ApplicationObjects"  GetParentWindow6* GetWindowTitle  $(100663298$@100663313$Samples._ApplicationObjects" GetWindowTitle2* get_Handle $(100663298$@100663313$Samples._ApplicationObjects Handle6* StartupHelper$(100663298$@100663313$Samples._ApplicationObjects6*ShutdownHelper$$(100663298$@100663313$Samples._ApplicationObjects2*hStartupd$(100663298$@100663313$Samples._ApplicationObjects TempObj2*Shutdownl$(100663298$@100663313$Samples._ApplicationObjects<v 0,-.7 < 00121 <04561$ H<8: ;=$G l,`BCD$E%F)G*HA0  < 0JK L,< 0RS T 0$WX 8,YZ [\]%^0_7`BaIbTc[dfemfxghijklmnop6(;-9+;-7)?1<.@2<.;- 6quw#x&y2z4{5}P~S_ab}14@BC^amopM#) R#. P#, R#. N#* V#2 S#/ W#3 S#/ R#. ) TH " +X<Tt,Ld|6*)StopDebugging)$(100663298$#Samples.VSEditor$#Samples.Accessibility$#Samples.AddDirAsSlnFolder$#Samples.DevStudio6Editor$#Samples.EnvironmentEvents$#Samples.MakeAddin$#Samples.Utilities$#Samples.VSDebugger$#Samples._Utility"$#Samples._ApplicationObjects$*Samples$#Samples.My.MyProject2$@PX:xml=http://www.w3.org/XML/1998/namespace*$@PX:xmlns=http://www.w3.org/2000/xmlns/$@P:Microsoft.VisualBasic&$#Microsoft.VisualBasic.Constants&$#Microsoft.VisualBasic.Conversion&$#Microsoft.VisualBasic.DateAndTime&$#Microsoft.VisualBasic.FileSystem&$#Microsoft.VisualBasic.Financial"$#Microsoft.VisualBasic.Globals&$#Microsoft.VisualBasic.Information&$#Microsoft.VisualBasic.Interaction"$#Microsoft.VisualBasic.VBMath"$#Microsoft.VisualBasic.Strings $@PX:= $Samples$Samples._ApplicationObjects:*7ReleaseIfComObject7$(100663298$@100663313$Samples._ApplicationObjects6*4"TReleaseObject0"T$(100663298$@100663313$Samples._ApplicationObjects  e<)0 0 T7H    -B>  lT"` '  +4P /01 Y U!1=1!y}  Q mmu 9I  Q  5)  u  a IQ AQ9% }]   e qM= eu q]  Q9  15 !  M)!% u q    I]e}q]9 - 99  ) 59a 1ea Q  =qumQyE u=%YI  u} }UI!u  9  UIAQ Ei)-e}]i%$  @  `!  B@  @ %B @ @  E ( @ @@ @  P@  @@@  @@  @P"  @@ @  $0<HT`lx ,8DP\ht(4LXdp| $0<HT`lx ,8DP\ht(4@LXdp| $0<HT`lx ,8DP\ht(4@LXd  $ 0 < H T ` l x   , 8 D P \ h t    ( 4 @ L X d p |  $ 0 < %.cctor)06000026% IsFileExcluded) 06000027.%GenerateSlnFolderOnDirStructure2)06000028.%GenerateSlnFolderOnDirStructure)06000029%Equals)06000008%GetHashCode)06000009%hGetType)h0600000a%ToString)0600000b"%Create__Instance__)0600000c"% /Dispose__Instance__)0600000d%T.ctor)T0600000e"% PrintAllOpenDocuments) 0600002a%8 MultiplePastes)8 0600002b%h CommentOut)h 0600002c%l FileType)l 0600002d"%P ToggleCommentStyle)P 0600002e%l StripTabs)l 0600002f% CloseExceptActive) 06000030%l AddRevisionMarks)l 06000031&%x AddFunctionDescription)x 06000032%l ValidId)l 06000033%p PoundDefOut)p 06000034% ifdefOut) 06000035% ifndefOut) 06000036%< OneTimeInclude)< 06000037"% AddToCompletionWords) 06000038&%h ExtractNextCompletionWord)h 06000039"%\ FillCompletionWords)\ 0600003a&% SuggestNextCompletionWord) 0600003b"% AutoCompleteFromFile) 0600003c%.cctor)06000003%get_Computer)06000004%Lget_Application)L06000005%get_User)06000006%get_WebServices)06000007% StepOverAll) 06000077% DumpStacks) 06000078"%p AddBreakpointToMain)p 06000079"%` RunToNextBreakpoint)` 0600007a&%4 ListBreakpointsLastHit)4 0600007b%` BreakpointLastHit)` 0600007c"% ListAllBreakpoints) 0600007d%< DebuggerMode)< 0600007e"% ShowCurrentProcess) 0600007f% LastBreakReason) 06000080% AttachToCalc) 06000081"% ListDebuggedProcesses) 06000082"% SupportedLanguages) 06000083%  DetachAll)  06000084% RunToLine) 06000085% DumpExpression) 06000086% IsDebugging) 06000087&% MakeAddinFromMacroProj) 0600005f% CopyReferences) 06000060&% IsMacroCallableFunction) 06000061%CommentRegion)06000089%NewCommentLine)0600008a%pSaveBackup)p0600008b% OneFunctionView) 0600008c"% BeginningOfFunction) 0600008d% LineToTop) 0600008e"% EmacsStyleIndentLine) 0600008f% TopOfBlock) 06000090% IndentLevel) 06000091%SkipSpaceRight)06000092%OutlineCode)06000093%CollapseElt)06000094%PCenterScreen)P06000095"%PrintNumberedLines)06000096%hDoForWholeFile)h06000097%LineEmUp)06000098%FixLineEnds)06000099%SetFillColumn)0600009a"%FillCommentParagraph)0600009b&%IsOnNonEmptyCommentLine)0600009c"%GetCommentLinePrefix)0600009d%@MoveWordRight)@0600009e%, MoveWordLeft), 0600009f%!IsWhitespace)!060000a0%!ListMatchingLines)!060000a1"%#ListNonMatchingLines)#060000a2%$CountOccurrences)$060000a3%&InsertTime)&060000a4%'InsertDate)'060000a5%t(InsertTimeDate)t(060000a6%x)IsPrintableFile)x)060000a7*%*PrintItemsInSelectedProject)*060000a8*%+PrintItemsInSelectedProject)+060000a9%.ctor)06000002% get_Handle) 06000076% SaveView) 06000062% LoadView) 06000063%4 TurnOnLineNumbers)4 06000064"% TurnOffLineNumbers) 06000065%l TurnOnWordWrap)l 06000066% TurnOffWordWrap) 06000067% ListProj) 06000068% ListProjAux) 06000069% OutputItem) 0600006a% AddClassicComRef) 0600006b%p FindCase)p 0600006c% FindLastTarget) 0600006d% FindLine) 0600006e"%x ListModifiedDocuments)x 0600006f% InsertDocComments) 06000070%L ListMacroSamples)L 06000071&% LineOrientedCommentStart) 06000072"% GetOutputWindowPane) 06000073"%\ PrepareDefaultFind)\ 06000074%get_GetInstance)0600000f%.ctor)06000010%.cctor)06000020>%HUpdateTextEditorFontSizeToMatchDisplayProperties)H06000021*%IncreaseTextEditorFontSize)06000022*%DecreaseTextEditorFontSize)06000023&%ToggleTextEditorGrayScale)06000024.% MaximizeToolWindowsInEnvironment) 06000025%SetSite)06000015%SetTitle)06000016%,SetHandle),06000017"%PushVBHostIntoLibrary)06000018%`GetParentWindow)`06000019% GetWindowTitle) 0600001a%get_Handle)0600001b%StartupHelper)0600001c%$ShutdownHelper)$0600001d%Startup)0600001e%lShutdown)l0600001f%StopDebugging)06000011"%ReleaseIfComObject)06000012%ReleaseObject)06000013w 1 !'"TX,0T؃Samples.My.MyComputer13D5DBCAtpSamples.My.MyProjectD96357D2`bSamples.My.MyProject.MyWebServices1AF645B1ldSamples.My.MyProject.ThreadSafeObjectProvider`1F6D6B5918$cSamples._UtilityC7E9E410PSamples._Startup93FB0122( HSamples.AccessibilityC20BB767, |Samples.AddDirAsSlnFolderF0E53C66(eSamples.DevStudio6EditorFB596022  0Samples.MakeAddin5FC086A1<DcSamples.UtilitiesAF9EDB74`HdSamples.WinWrapperB01AD322P (dSamples.VSDebugger57D94EF4,h dSamples.VSEditor0B6646D7-.  *4DTdt   /)7T"v  ,  L)<eSN/CAntWMin/MVi di Kct80       !"#$%&'()*+,-./0123456789:;<=>H@ABCDEFG)IKLMNOPQRSTUVWXYZ[\]^es_S "37f(}!,"$$$6&K-'o'P(Q(H) P1 l2 /3K z3Q 3 4 5 6 7 w8s 8x b9 2<) [<9 <L < = @ A 7Bh B QC oC: C QF F WG GU 7H H` I I ,J J {Kx Kv iLO L M9 M oN; N, O PI P* P; /Q Qv [Rn RK S% 9T9 rT bU AV' hX| X} aY U\ ,] ] }^ _ -_, Y` aa  jb, b, bC c ct -d  d ,,Xyvsmacros://C%3A/Documents%20and%20Settings/v-hadai/My%20Documents/Visual%20Studio%202008/Projects/VSMacros80/Samples/Samples.vsmacros/AddDirAsSlnFolder17d14f5c-a337-4978-8281-53493378c1071.vbvsmacros://C%3A/Documents%20and%20Settings/v-hadai/My%20Documents/Visual%20Studio%202008/Projects/VSMacros80/Samples/Samples.vsmacros/DevStudio6Editorvsmacros://C%3A/Documents%20and%20Settings/v-hadai/My%20Documents/Visual%20Studio%202008/Projects/VSMacros80/Samples/Samples.vsmacros/VSDebuggervsmacros://C%3A/Documents%20and%20Settings/v-hadai/My%20Documents/Visual%20Studio%202008/Projects/VSMacros80/Samples/Samples.vsmacros/MakeAddinvsmacros://C%3A/Documents%20and%20Settings/v-hadai/My%20Documents/Visual%20Studio%202008/Projects/VSMacros80/Samples/Samples.vsmacros/VSEditorvsmacros://C%3A/Documents%20and%20Settings/v-hadai/My%20Documents/Visual%20Studio%202008/Projects/VSMacros80/Samples/Samples.vsmacros/Utilitiesvsmacros://C%3A/Documents%20and%20Settings/v-hadai/My%20Documents/Visual%20Studio%202008/Projects/VSMacros80/Samples/Samples.vsmacros/Accessibilityvsmacros://C%3A/Documents%20and%20Settings/v-hadai/My%20Documents/Visual%20Studio%202008/Projects/VSMacros80/Samples/Samples.vsmacros/_Startup.1:FG z~VIk 33>/LinkInfo/names/src/headerblock/src/files/17d14f5c-a337-4978-8281-53493378c1071.vb/src/files/vsmacros:\\c%3a\documents%20and%20settings\v-hadai\my%20documents\visual%20studio%202008\projects\vsmacros80\samples\samples.vsmacros\_startup/src/files/vsmacros:\\c%3a\documents%20and%20settings\v-hadai\my%20documents\visual%20studio%202008\projects\vsmacros80\samples\samples.vsmacros\accessibility/src/files/vsmacros:\\c%3a\documents%20and%20settings\v-hadai\my%20documents\visual%20studio%202008\projects\vsmacros80\samples\samples.vsmacros\adddirasslnfolder/src/files/vsmacros:\\c%3a\documents%20and%20settings\v-hadai\my%20documents\visual%20studio%202008\projects\vsmacros80\samples\samples.vsmacros\devstudio6editor/src/files/vsmacros:\\c%3a\documents%20and%20settings\v-hadai\my%20documents\visual%20studio%202008\projects\vsmacros80\samples\samples.vsmacros\environmentevents/src/files/vsmacros:\\c%3a\documents%20and%20settings\v-hadai\my%20documents\visual%20studio%202008\projects\vsmacros80\samples\samples.vsmacros\makeaddin/src/files/vsmacros:\\c%3a\documents%20and%20settings\v-hadai\my%20documents\visual%20studio%202008\projects\vsmacros80\samples\samples.vsmacros\utilities/src/files/vsmacros:\\c%3a\documents%20and%20settings\v-hadai\my%20documents\visual%20studio%202008\projects\vsmacros80\samples\samples.vsmacros\vsdebugger/src/files/vsmacros:\\c%3a\documents%20and%20settings\v-hadai\my%20documents\visual%20studio%202008\projects\vsmacros80\samples\samples.vsmacros\vseditor ;V " 2 w I #8w3 XXXXXXXXXX(H<8#0NT<)`x,,h  !"#$%&'()*+,-./0123456789:;<=>?@ABCDEFGHIJKLMNOPQRSTUVWXYZ[\]^_`abcdefghijklmnopqrstuvwxyz{|}~MZ@ !L!This program cannot be run in DOS mode. $PEL:FG!  1 @@ `@1W@  H.text  `.reloc @0@B1H&( **( *s s s s *0~o +*0~o +*0~o +*0~o +*0( ( +*0 ( +*0( +*0 ( +*0 - (+ ++ +*0 **( *0/ { o -(+ { o  +*V( s } *:( o *v( (! , ( (" &*0" ( (%(# ($ * 6&( **}**}*B| () *Vs* } (+ *0, | ~, 99o , ++ +*0 { +*0 {  +**0(=((>(?((@(A((B(C((D(E((F(G((H(I((J(O((P(Q((R(S((T~(*0o{rpr%po- ( ,t(> {rpr9po- ( ,t(@ {rprWpo- ( ,t(B {rprqpo- ( ,t(D {rprpo- ( ,t(F {rprpo- ( ,t(H {rprpo- ( ,t(J {rprpo- ( ,t(P {rprpo- ( ,t(R {rpr3po- ( ,t(T {rQpo. t*v{(}o*r (/ (/ *0L(0 o1 "@@Ykl(2 ~rYprwpo3 rpo4 @o5 *0<~rYprwpo3 rpo4 o6 @(7 o5 *0S~rYprwpo3 rpo4 o6 @(8 , o6 @(9 o5 *0~: ~o; o< rpo< -+rpo= &rpo< rp@o> rpo? (@ ~rYprwpo3 rpo4 oA tC 9 oB +aoC tDoD rp(E o? (F (G oH oD rp(E o? (F (G oI oJ -uK, uKoK rp@o> 8 oB +yoC tDoD rp(E oL   (M o> oD rp(E oN   (M o> ~ oH ~oI oJ :{uK, uKoK rp@o> *w@0~oO oP +SoC tL oQ -=oR ,oS %(# ($ oT (# ($ oJ -uK, uKoK *$)<6M W 6prZsU rp*0M(V oW (X oW ~oY , ++~oY , + + +*0(Z ([   +|  ('-fo\ o] o^ ,o_ ,o_ o` 2(# ~(sroprp(a ob ($     ?y   +?  ('-)(X oc od t ((    2* &2X260(e ,'rprprp(f (e ,8(g -rp(h &8~(soi (g - ~(srmpob 8nsU ~rpoj &~rpoj &~rpoj &~rpoj &~rpoj &~rpoj &~rpoj &~rpoj &~rpoj &~rpoj &~rpoj &~r%poj &~r/poj &~r9poj &~rCpoj &~rSpoj &~rcpoj &~rspoj &~rpoj &~ok tQ (X ol od t  ((*0K~om on +oC t oo oJ -uK, uKoK * 130rprprp(f (p  8~oq or rp(s &~oq or rp(s &~oq or rp(s &~oq or rpr p(t   >R*0 "~ou ov .rp(h &8~oq (-_,j~oq or rprp~oq or rp(w (x rp(x (t 8k3j~oq or rprp~oq or rp(w (x rp(x (t 8`93rp +rp ~oq or rp(w (y ~oq or rp(w (y /  3\~oq or rp~oq or rp(w (x (t 8 8~oq or rp@  Y   (s & ,$ ( @( (z y@q@~oq or rp(s &~oq or rp  ~oq or rp(w (x  (t >+rp(h &*03o{  r<p(| 1-+ (} (~ r<p(| 3( r@p( rHp( `, 8o rRp( 3 8o r^p( 3 8o rhp( 3 +qo rxp( 3 +Yrp( 3 +Fo rp( 3 +.o rp( 3 +rp( 3 + *0rp ~oq or t\ o ~oq (-@ @( @( ( (@ 9=( &rp(| .`+8rp(| ( (E (} rp(| ( rp(| 3rprp( 8rp(| ;(} rp(| ( +9r p(| ( rp(a (} r p(| ( r p(| 3rp( (a rp(| ( ~oq or t\ o o +rp(h &*07+(} rHp(| ( rHp(| 0( *0 ~om o +e~om @o ~oq o o ( . (y o` + ~om o 1+-*0 rLp @  rp rprp~oq o rTp( @y~oq (-@ ~oq or r^p(s &~oq or rp(s &~oq or t\o (  @(  @( ( (@ 9]Y rp rpr~po rp(| 3o o ( Y +++Y( ,%~oq or rp(s &Y( 9~oq or r^p(s &~oq or rp(s &~oq or rTp(w (F ~oq or rp(s &~oq or rp(s &( rp(| @8~oq or rp(s &o ( ~oq or rp(s &~oq or rp(s &  rp(| Y @( ( (@ :I @( , rp(h &8 @( 9rp rprprp(| @rp(| .*~oq or rp(s &8~oq or rp(s &~oq or rTp(w (F (} ( ~oq or t\r p(E o rp(| ,+8Z8 @( 9rp rprp~oq or t\o rp(| ( rp(| `,I~oq or rp(s &~oq or (F ( Y ++8eY( ,%~oq or rp(s &8 @( 9rp rprp~oq or t\o rp(| 3I~oq or rp(s &~oq or (F ( Y +++Y( ,%~oq or rp(s & @( ,rp(h &8H @( 96~oq or rd p(s &~oq or t\r pr| p(a o o r p(a o I  o   r p  r p ( o  I  o   r p ( (  r p  r( p  rH p    r p ( o *0 }!~oq -8h~oq o rRp( ~oq o r p( `9~oq or t\  o ( &rp  o rp( . o ( (/(F rp( ;~oq o r p( 3(} r~p(| ( r~p(| @ r p(| @ ( ,8@(9 (y (  (} @ (9 (y (   r~p(| (  r p(| ڌ@r p(| @@( @( ( (@ 9(y ( (} (} ( ( &r~p(| .5 r~p(| ( (E  (} r~p(| (  +#  (} r p(| ( r p(| 3 >K   ֍I8~ r p(| ( ~ ښr p(| .f~ ~ ښ~ ښ(} ~ ښ(} ~ ښ(} ~ ښr p(| ( ~ ( &(} r p(| (  r p(| @3~ ~ ښr p(| .=~ ~ ښ~ ښr p(| ( ~ ښ( &8I(} ( ( &~(/(F ~r p(| .8~~~r p(| ( ~( &~oq or rp(s &~oq or rp(s &~oq or rd p(s &~oq or t\ r pr p(a r p(E  r p(a @8~ښr p(| .o~~ښ~ښ(} ~ښ(} ~ښ(} ~ښr p(| ( ~ښ( &~~ښ(/(F @( @( ( (@ ,+~~ښ~ښ(} ( r6 p~ښr p( @r p(E ~oq or t\  o +rb p(h &+r p(h &*0,"Y rp( 3 Y 8(} 8(~ r p( (~ r p( `,~(~ r p( (~ r p( `,N(~ r p( (~ r p( `,(~ r p( .Y  >F(~ r p( (~ r p( _,Y *0#Y( ,r p +r p ~oq (-.r p(h &8vrq pr p(E rp(f  (3Y( , r,pr0p(a (h &~oq or t\  o (} +[ o (~ r p( 37 o ( rHp o o (} ( (a o 1rp( _9 Ir prp o rp( o o ( r p( . o r p(E o *>Y(4*>Y(4*06$~oq o{ rp( 3rp(h 38rp ( r<p(| +#  (} (~ r<p(| 3 ( r<p(|  rp(  rp( `9p~oq or r^pY(s &Irp( r p (} ( ( rp( rp(E rhp(f ~oq or t\(3Y( 9Ir prpr p( o ~oq or rpY(s &rp(E o +rp(E (h &+rp(h &*0K~r~pr~p(a ( .+&r~p( .~r~p(a *0o%rp ~(} 0+V~~(} 1~~r~p( 3+ ~~~(~ ր*0&r~p~oq or t\rp(E  o +a,o o  +o o _,+;o o o ( (8o  o -*0Q'Y ~oq or t\ (9(F rp( .o o *0(~oq -8+o rTp( .+wor t\ o o o o o ( r~p( 3 o +& o (: o o (;&*0 )~ +*"*0 *~ +*"*0 +~ +*"*0 ,~ +*"*0 -~ +*"*0 .~ +*"*0 /~ +*"*0 0~ +*"*0 1~ +*"*0 2~ +*"*0 3~ +*"*0 4~  +*" *0 5~! +*"!*0 6~" +*""*0 7~# +*"#*0 8~$ +*"$*0 9~% +*"%*0:~o @( t  o] rpo o o r po tbo rpo r'po  r?po  *(# rYp0rp(h &($ T($ rp4rp(h 382rprprp(f (} 3#~o ok o @o +i~o ok o o +&oC to ( 3oJ -uK, uKoK -r{p0rp(h &8frp rp(E rp(E r_p  rp(E   r^p(E  r prp(E rp(E rZp(E rp(E r(p(E r^p(E rp(E rp(E r~ po r!p( o] o 8oC t"  r"po oQ rf"po t`o o o o 9~o r"p o r"p(E o o_ rf"po t`o o o o  o rp( .r"po o o o  o o o o o o  o o @o o 3r"po +r #po tbo o  8X oC t%o @;t (aY( 9 o rP#po (a  rd#pr#p( r#p(E  o r#p(a I!! ! o !r<p!o !r#p!( r#p(E  rd#pr$p(   r($p(E  I!!!r%p!o !r%p!o !r%p!( r&p(E  oJ : uK,  uKoK oJ :uK, uKoK r&p(E tbo rpo o o o o  o  r'p(E  tbo r'po   o o  o o  o r?'p(E rK'p(E r(p(E r(p(E r)p(E r*p(E rd+p(E r#,p(E r-p(E r-p(E r.p(E r/p(E r0p(E r0p(E tbo r?po   o o  o o o  (` od r0p(w r0pr0p(s &o_ or t\o o o (# ($ r1p rN1p(E r1p(E r2p(E @rp(h &*Ax*6Oklt!, 60;od r0p(w tj od r0p(w tlo 8oC tk o rp( ;o rS4p( o ra4p( _o rs4p( _,;o o &*(# r4po r4p(a (h &($ oJ :KuK, uKoK **6"0<o 3 Y 8o o 3 Y 8o o +V oC tm o o o o r95po - Y E+o o . Y , oJ - uK, uKoK Y +* 3o0K=rM5pr5prp(f rp( 3r5p(h &+~o o &*0Q>r5prW6prp(f rp( 3r}6p(h &+~o o o *0~rwpr6po3 r6po4 Yo5 ~rwpr6po3 r6po4 Yo5 ~rwpr po3 r6po4 Yo5 ~rwpr7po3 r6po4 Yo5 ~rwprRpo3 r6po4 Yo5 ~rwpr7po3 r6po4 Yo5 *0~rwpr6po3 r6po4 Yo5 ~rwpr6po3 r6po4 Yo5 ~rwpr po3 r6po4 Yo5 ~rwpr7po3 r6po4 Yo5 ~rwprRpo3 r6po4 Yo5 ~rwpr7po3 r6po4 Yo5 *0~rwpr6po3 r!7po4 Yo5 ~rwpr6po3 r!7po4 Yo5 ~rwpr po3 r!7po4 Yo5 ~rwpr7po3 r!7po4 Yo5 ~rwprRpo3 r!7po4 Yo5 ~rwpr7po3 r!7po4 Yo5 *0~rwpr6po3 r!7po4 Yo5 ~rwpr6po3 r!7po4 Yo5 ~rwpr po3 r!7po4 Yo5 ~rwpr7po3 r!7po4 Yo5 ~rwprRpo3 r!7po4 Yo5 ~rwpr7po3 r!7po4 Yo5 *0?~oO r37po ~o t  3+~o @( t ~ou 3 o ( +$r7p(s r7p(s &o] ( (i*0s@o +E oC t" o 3.( (jo  -( (i oJ - uK, uKoK * Y[0xA +'r7p rp(s & 2r7p o (s &r7p r7p(s &*0Bsus ( r7p(| ( o r7po o rT8po o @Ho o (} ( (} ( r<p(| ( rp(E ~o ~o r8p(| ( r8p(E ~ r8po ,"r8prpo r"9p(x (F r"9p( 3r*9p(h &ݘ( I  r9p o  r9p    r,p ( ( &r9pr:prp(f (} 3-~o ok o @o od tt+r~o ok o o  +/ oC t  o ( 3 od tt oJ - uK,  uKoK -r:p(h &n (E o o -rA;p(h &Go  (E o - r;p(h &%(#   o (h &($ *A0X36~r;prpo ~o o *09C~o o ~r;prpo ~o o *0LD~oq or t\ o ~r;prpo ~o o o *0 E~oO r37po ~ou 3o ( +$r;p(s r;p(s &~om on +Q oC t o -;r7po{ r <po r7p( (s & oJ - uK, uKoK * Wn0F~oq o o o @o u|,>r<p(w r#<p  @ (w t% ub, tb + r-<ps zo o (r o 3o ( r~p(a +-o 3$o ( o ( r~p( ~o r*=po o o  8{ oC t% o @`t  o o o  r7po o rHprR=p(a o r7po I  rHp  rf=p o  r<p ( o r7po rHpr~=p(a o r7po rHp(E o  o  +S oC t%tm r=po r=p(a o r7po rHp(E o  oJ - uK,  uKoK  oJ :y uK,  uKoK ~o o *AHj0G~oO r=po o t r>po r.>p(s oi o  o  o  o  8oC t~  o  r7p(E ob o  o  o  o  +,oC t~r <po  r7p(a ob oJ -uK, uKoK oJ :buK, uKoK *GM0H- ~oq o{ rF>po  rN>po  `rpo  `rX>po  `rb>po  `, rp +&+#r"po  , rp ++ rl>ps z*0hI~oO r?po , o o t o o %(# o o ($ o  +* .=60J~o o ~o o ~o o ~o o ~o o ~o o ~o o rprp(f rp( .~o o  +*&( *0K~o o ()  +*~o o +~o o ~o o 3*0L~oO r37po o t ~o o -r?po 8cr=@p~o o o  r7p(a o ~o o o! o"  8 oC t I  ra@p o# @($  ru@p o%  r7p ( o o& o'  8T oC t o( r7p() o* 1o( o( (} ( + o( o+ o,  +u oC t1 r}@p(E I    o-  r~p o.  r@p o/  (  oJ - uK,  uKoK I  r@p  r@p  r p   r@p ( o  oJ : uK,  uKoK  oJ : uK,  uKoK *AH[uen0 M~o o0 r@prprprprprpo1 o2 +oC t r@po3 oJ -uK, uKoK * ;-h0N~o o4 ~o o 3Q~o o5 o6 o7 r@p( 3r@p(h &o8 +r@p(h &+rAp(h &*0Or3Ap(s ~o o9 o: 1U~o o9 o2 + oC t o; ob oJ - uK, uKoK + rEApob * ' r7p( ob *0Tr3Ap(s ~o o? YE <<<<<<</ +:r]Bpob ++rBpob +rBpob + rBpob *0U ~o o@ oA +4oC t o> ( r Cp( 3 oB  + oJ -uK, uKoK - rCp(h &* VZ0Vr3Ap(s ~o oC oD 3rOCpob 8~o oC oA +ZoC t I rCp o= @($ rCp o> r7p ( ob oJ -uK, uKoK * 7|0xWr3Ap(s rCpob ~o oE oF +$oC t oG r7p(E ob oJ -uK, uKoK * F`0vX($  ~o oH Qr Dp(h &A E u6__t6(# 3 (I z,($ * @U A0OY(J #.:~oq or t\ (J (2 oK ~o oL *0Z~oO r37po o t ~o oM oN 9 rUDpo/ r7p( o +hI rHp oO @oP o. rUDp oO @oP o/ r7p ( o  oO oQ 1+r]Dp(E o *09[~o -rDp(h &++~o o  * *0\~oq or t\ oR oS oT (r ~o rDpo +. oU  o oV oW oX 3+-~o o * G5|0;]~ou oY t\ oZ (ro r~po *0 ,^~oq o rDp(E ~oq -8~oq rpo t`o o o o o ~o rDprprEpo[ &~oq rf"po rOEp(w rcEp Y(s &,( I( (z tI ~oq o\ &~oq o` *0_~ou oY t\ o] oS o] oS o^  o o o o o o_ o o^  o o oV o o` o_ o *0I`~ou oY t\ o] oa ,o o (# ($ * "9 60*a~ou oY t\ o] ~b oc &*0;b~ou oY t\ o] oS o o o *0c~oq rf"po t`od o  o] oe oV ((f j3 (g +Y +<((f j3 (g +:+2oU 3+'+ o / oU oh o *0vd+noU j oW (oU j. o +*oh oi 3 o +oj @ +oU jj. @ +-*0neoU j +oh j ok oh j3+DoU j@o r~p( @o rHp( `_-*0Kf~oq o o o o  + @o  (  1*0%g o o  o o ol om o  _,GrqEp(w t&  o  + @o ( 1+Xo 3OrqEp(w t&o +@o (1on ,?o 0(@o o o o ol oo *09h~oq or rEp(w tf ~b op &*0i~oq or t\ o oq ~o rDprprEpo[ oY t\or o o os o  +I~oq or t\ot (u rEp(E o ov  1~oq oo ~oq o` *0jrEprprp(f rp( ;~oq or t\ow oS o] oS ~oq ox o rEp(w toy o o o` ~rpo o o  ~b oz &*0'kj  ~oq or t\oR oS oT oe oR oe j 8 ֍ ֍ ֍ ֍ jj oR oe o{ j j8oU j oW j1!j +( j  1+(oU j 1"jj j j+soh joj jj1+ o| @o (- oh j oj j j.   / oV j> j j+\j.I  .7 oR oe jַo{ o}   o~ j1- j 9*(*0|l~oq or t\ oR oS +Col o} @o rp( 3o| o} oV oU oT oe 2*0}mo 1"~o rEp(p @o +NrEprprp(f rp( 3rFp ~o rEp(p @o *0n  ~o r#Fpo ~o rEpo - rp(~o rEpo (y ~oq rf"po t`~oq or t\o] oS ( +o  (- oV + oU 08ol o} oj 1u+ (oj 0oh o 08oU o o{ (oh oi 3 oV +r7p (E o 8woj oV  (9WoW  o ok oh  oj   oU  +oh (oj   oU _- oU /yoU  o oW  ok oi  ڌ@o oW oi ֌@o o ol r~p(E o +s 1doh o|  ڌ@o o  ڌ@o o ol r~p(E o oV + oV  (:~o o *A0ooW oi @o o o ( rp( ( rQFp( `,ao ( rp( ( rp( `_o ( rQFp( _`, + + o o `, + *0poW oi @o o (} (} ( ( rp( 3rUFp(E +N ( ( +,( (E o ( ( ( ( ( `- *0qPoi j Poh j1&PoU PoV PoU 1PoW +b+ Pok Poh jP@o (_-+ Pok Poh jP@o (_-*0rPoi j Poh 3&PoU Po PoU /Pol +Z+ Po| Poh P@o (_-+ Po| Poh P@o (_-*0so o 3 + *0,t ~oq rf"po t` o ~oq o @o r]Fp(t&rFp(s o o] oS o oi ~o to ~o o +uow oe 0+go rFpow oe ( r@po ( ob ow oe ot ~o o .o *0u ~ou oY t\ o] oS  o o oX o rFp(t&~o o rFp(s o oi o o oX +X o ~o o 3  o ob ~o o rGp(|  o ov  o] oe `- o *0 v ~ou oY t\ o] oS  o r Gp(trp( 38~o to ~o o +h-%~ou oY t\o] oS +*~ou oY t\o] o ,+ ~o o . o r1Gp(u rIGp(a (h &*0,w~oq or t\ ( ( o *0,x~oq or t\ ( ( o *0Cy~oq or t\ ( ( r~p( ( (a o *0zsU  IrN>preGprprX>prprkGpr@prF>pr"p rp ruGp rb>p o o (V oW oY + *0t{~o rGp(w @( ,rGp(h &+5~o  @( t o] (*0|o +_oC t" (,=r Hpo ,o_ oo +!r Hpo oQ oo o` o (oJ -uK, uKoK * suBSJB v2.0.50727l!#~ "'#Strings JpH#US|#GUID#BlobW 3&@ }|)  ' N$ d $h E> uN} Ne>>3>x>>>/ > > > >K > >! >f  $  U > >>P>>>#>/>I6f6 ~N B [ NJa">>}" (Np>>p N&bp>>1'`'>   ;>Q> N>  ]> HT4>A>>J>>>> >^>>**>>4>@>Y>>}*}<}I}  >W >z > > > > >!>Z!>r!>!>!> ">(">>6">A">L">g"> "">">">">#>.#>#>#>#>$>$>$>$>H%6%V%>%>%>&&>E&>&&>&&>u'6'''')7B7 M7 W e      & * = &_ &b &u &w &1 1-1:1G!JQQXas B'6 EB T c r ^   0   :  QeP ^\ ^h   ( 5  B!FSc$!F\h $`W] I$X Q&Y 'Y 'p'?9?N?ԍ_? j?Du??T@ԏ@ZZZZLCR#################l {  /<Bg<B%*B>RHLQ ! %% ^9^I^Q^^Y^$^,^4^<^$,4<a^i^q^y{Sc\h)0uqL^^DLvL&L^^3>DI(N8^A!A1qI@^Y^Yh[sQxjQpy~9v 2 < a19q p9*D4?)M!YqIi9uQw!}!) Y! Quq! 9.i?a4a a 3a3a^q6ICqqKaWEyjPyyPiV[ a4qhIioiv4Iy *1a79Dv9[?qi9r9|4q9a 9rI9 qYq.948B< BIqPqkq tV V ]]Iichtqqqq    +Ii]9u eV xV.3hhh ^9Oj w 1 9 ! ) )?Yq ? qp 1&   !, 9/1 Yq9B7 ? MWE )gK uT 3)\ 1?Yq)K !!Wa? YqYYqQ7  1higK iK I)Ei yL 9n 7  3i a4[[% ^0 "2V4 aqn0 9q1< B  L q99 o  3 q' 4 q= qG ^gK Ie hIp 9u 9  gK !u ! )YqiYq   3?YqI Ea !3 (!  7 >!G!3g!% !, !3!3!3 9!a!h9!? 1"31"E 1T"K AaYqao"Q i?I{"hq"IYqI"W y?Q"q"] Q"qQ"g ?YqYYqYvq1# 7 ?>#1F#31I#  _#qg#31s# hYq1# #hYq1# 1# ?#1# h1&$ ?Yq1*4$. qG$: K$? 1T$31`$E Yn$ Y$g N h$a & $a !$h!$!$1$ha$9$u q$~ $a ! % %(%3 % P% d%  $h9n% u%!z%h!%h!%h!!)% !% !%1d% %%%h$! 9u) $%a q d%; !Y !4 !(&_ !9&9M& Y&k&E~&pIqISEI&I& 9& & & q.a>!)&3& uq 9' 1kq1' ]'q/'qa@'% I'j'E9^HI^Q^Y^3,01p} #)5. O. a. . X@3@CCIg`#cciF3{S33+83{3{ 3 ##@@3C{``3c{3{3{3{3{3#{C{#+3+3]+3q+3!3k!+A+A3a+a3{+33+3++33+!+!3IA3A+a3a+3++3!#### #@#`##### # #@ #` # # # # # # #@ #` # # # # # # #@ #` # # # ###!&+0,Uafu9J|&Pkuz %*/49>CHHMRW\afb   * R u {  : m   " 5 u U g u u   . F f   +6=  O;TYG^y3x /    ! &. & +! 0f 5 :$ ? Dy   =>@?BACDEFHGIJKLMNP!O!R#Q#S%T%U'V'W)X)Z+Y+\-[-]/^/v1 2M 4O 6QQuu  '   >}       //!mscorlibMicrosoft.VisualBasicMyApplicationSamples.MyMyComputerMyProjectMyWebServicesThreadSafeObjectProvider`1_UtilitySamples_ApplicationObjects_StartupAccessibilityAddDirAsSlnFolderDevStudio6EditorEnvironmentEventsMakeAddinUtilitiesWinWrapperVSDebuggerVSEditorMicrosoft.VisualBasic.ApplicationServicesApplicationBase.ctorMicrosoft.VisualBasic.DevicesComputerSystemObject.cctorget_Computerm_ComputerObjectProviderget_Applicationm_AppObjectProviderUserget_Userm_UserObjectProviderget_WebServicesm_MyWebServicesObjectProviderApplicationWebServicesEqualsoGetHashCodeTypeGetTypeToStringCreate__Instance__TinstanceDispose__Instance__get_GetInstanceMicrosoft.VisualBasic.MyServices.InternalContextValue`1m_ContextGetInstanceStopDebuggingReleaseIfComObjectReleaseObjectEnvDTE_DTEDTEMicrosoft.VisualBasic.CompilerServicesIVbHostSystem.Windows.FormsIWin32WindowMicrosoft.VsaIVsaSitem_pSitem_strTitlem_HandleHostServicesm_VBHostSetSiteSetTitlestrSetHandleintPushVBHostIntoLibraryGetParentWindowGetWindowTitleget_HandleStartupHelperShutdownHelperStartupShutdownHandlefontSizeIncrementminimumSupportedEditorSizewhiteColorblackColorUpdateTextEditorFontSizeToMatchDisplayPropertiesIncreaseTextEditorFontSizeDecreaseTextEditorFontSizeToggleTextEditorGrayScaleMaximizeToolWindowsInEnvironmentSystem.Collections.SpecializedStringCollectionexcludedExtensionsoutputWindowPaneTitleIsFileExcludedfilePathEnvDTE80SolutionFolderGenerateSlnFolderOnDirStructure2currentPathcurrentSlnFolderGenerateSlnFolderOnDirStructurestartFolderParamArrpreviousSelectioncompletionWordscompletionWordsIndexPrintAllOpenDocumentsMultiplePastesCommentOutDocumentFileTypedocToggleCommentStyleStripTabsMyStrCloseExceptActiveAddRevisionMarksAddFunctionDescriptionValidIdIdPoundDefOutifndefifdefOutifndefOutOneTimeIncludeAddToCompletionWordswordExtractNextCompletionWordFillCompletionWordsSuggestNextCompletionWordAutoCompleteFromFileDTEEvents_DTEEventsget_DTEEventsset_DTEEventsWithEventsValueDocumentEvents_DocumentEventsget_DocumentEventsset_DocumentEventsWindowEvents_WindowEventsget_WindowEventsset_WindowEventsTaskListEvents_TaskListEventsget_TaskListEventsset_TaskListEventsFindEvents_FindEventsget_FindEventsset_FindEventsOutputWindowEvents_OutputWindowEventsget_OutputWindowEventsset_OutputWindowEventsSelectionEvents_SelectionEventsget_SelectionEventsset_SelectionEventsBuildEvents_BuildEventsget_BuildEventsset_BuildEventsSolutionEvents_SolutionEventsget_SolutionEventsset_SolutionEventsProjectItemsEvents_SolutionItemsEventsget_SolutionItemsEventsset_SolutionItemsEvents_MiscFilesEventsget_MiscFilesEventsset_MiscFilesEventsDebuggerEvents_DebuggerEventsget_DebuggerEventsset_DebuggerEventsProjectsEvents_ProjectsEventsget_ProjectsEventsset_ProjectsEventsTextDocumentKeyPressEvents_TextDocumentKeyPressEventsget_TextDocumentKeyPressEventsset_TextDocumentKeyPressEventsCodeModelEvents_CodeModelEventsget_CodeModelEventsset_CodeModelEventsDebuggerProcessEvents_DebuggerProcessEventsget_DebuggerProcessEventsset_DebuggerProcessEventsDebuggerExpressionEvaluationEvents_DebuggerExpressionEvaluationEventsget_DebuggerExpressionEvaluationEventsset_DebuggerExpressionEvaluationEventsSolutionItemsEventsMiscFilesEventsMakeAddinFromMacroProjProjectCopyReferencesobjProjectDestobjProjectSrcCodeFunctionIsMacroCallableFunctioncodeFuncSaveViewLoadViewTurnOnLineNumbersTurnOffLineNumbersTurnOnWordWrapTurnOffWordWrapListProjProjectItemsListProjAuxprojectItemsleveloutputWinPaneProjectItemOutputItemprojectItemAddClassicComRefFindCaseFindLastTargetFindLineListModifiedDocumentsInsertDocCommentsListMacroSamplesLineOrientedCommentStartdocumentOutputWindowPaneGetOutputWindowPaneNameshowPrepareDefaultFindpromptStepOverAllDumpStacksAddBreakpointToMainRunToNextBreakpointListBreakpointsLastHitBreakpointLastHitListAllBreakpointsDebuggerModeShowCurrentProcessLastBreakReasonAttachToCalcListDebuggedProcessesSupportedLanguagesDetachAllRunToLinelineDumpExpressionexpStrIsDebuggingpassedStringCommentRegionNewCommentLineSaveBackupOneFunctionViewBeginningOfFunctionLineToTopEmacsStyleIndentLineTopOfBlockEditPointIndentLeveleditPointSkipSpaceRightOutlineCodeCodeElementCodeElementsCollapseEltelteltslocCenterScreenPrintNumberedLinesDoForWholeFileLineEmUpFixLineEndsSetFillColumnfillColumnFillCommentParagraphIsOnNonEmptyCommentLinelinePrefixGetCommentLinePrefixMoveWordRightMoveWordLeftIsWhitespaceListMatchingLinesListNonMatchingLinesCountOccurrencesInsertTimeInsertDateInsertTimeDateIsPrintableFileprojItemPrintItemsInSelectedProjectprojItemsSystem.ComponentModelEditorBrowsableAttributeEditorBrowsableStateSystem.CodeDom.CompilerGeneratedCodeAttributeSystem.DiagnosticsDebuggerNonUserCodeAttributeDebuggerHiddenAttributeStandardModuleAttributeHideModuleNameAttributeSystem.ComponentModel.DesignHelpKeywordAttributeSystem.Runtime.CompilerServicesRuntimeHelpersGetObjectValueRuntimeTypeHandleGetTypeFromHandleActivatorCreateInstanceMyGroupCollectionAttributeget_Valueset_ValueSystem.Runtime.InteropServicesComVisibleAttributeSystem.ThreadingThreadget_CurrentThreadAbortMarshalIsComObjectReleaseComObjectExceptionProjectDataSetProjectErrorClearProjectErrorContextStaticAttributeIntPtrset_VBHostZeroGetEventSourceInstanceGetGlobalInstanceConvertToUInt32System.DrawingFontPropertyPropertiesSystemInformationget_MenuFontGetHeightMathRoundget_PropertiesItemInt32OperatorsAddObjectConditionalCompareObjectGreaterEqualSubtractObjectMicrosoft.Win32RegistryKeyFontsAndColorsItemsColorableItemsSystem.CollectionsIEnumeratorRegistryCurrentUserget_RegistryRootOpenSubKeyCreateSubKeySetValueGetValueConversionsToBooleanget_ObjectGetEnumeratorget_Currentget_NameStringConcatUInt32Parseset_Backgroundset_ForegroundMoveNextIDisposableDisposeget_Backgroundget_ForegroundWindowWindowsget_Windowsget_Documentget_AutoHidesset_AutoHidesset_LinkableSystem.IOPathGetExtensionToLowerGetFileNameContainsDirectoryGetDirectoriesGetFilesget_Parentget_ProjectItemsAddFromFilevsSaveChangesCloseOutputStringAddSolutionFolderSolution2IsNullOrEmptyInteractionInputBoxExistsMsgBoxResultMsgBoxStyleMsgBoxClearAddSolutionget_SolutionDocumentsget_DocumentsPrintOutToIntegerget_ActiveDocumentget_SelectionNewLateBindingLateCallLateSetComplexget_ActiveWindowvsWindowTypeget_TypeLateGetConcatenateObjectBooleanChangeTypeStringsCompareMethodInStrLenMidLCaseCompareStringget_LanguageTextSelectionget_TextCompareObjectGreaterCompareObjectLessAndObjectTrimLeftRightDeleteset_Textget_Countget_FullNameLTrimSelectLineConditionalCompareObjectEqualConditionalCompareObjectGreaterConditionalCompareObjectLessDateAndTimeDateTimeget_NowCompareObjectEqualCompareObjectNotEqualUCaseStartOfDocumentget_TopLineget_CurrentColumnWordRightWordLeftCancelFindTextget_CurrentLineCharRightMoveToLineAndOffsetAccessedThroughPropertyAttributeTextDocumentFileCodeModelget_ActiveSolutionProjectsLateIndexGetget_FileCodeModelget_CodeElementsCodeTypeget_Membersget_MacrosIDE_SolutionProjectsget_ProjectsOpenTextPointget_StartPointCreateEditPointget_EndPointGetTextItemOperationsget_ItemOperationsAddNewItemSelectAllInsertvsCMPartGetStartPointMoveToPointEndOfLinevsCMElementget_KindGetEndPointSmartFormatCollapseVSLangProjReferencesReferenceIEnumerableget_PathCodeParametervsCMAccessget_Accessget_ParametersStartsWithCodeTypeRefvsCMTypeRefget_TypeKindWindowConfigurationsget_WindowConfigurationsWindowConfigurationApplyget_Collectionget_FileNamesFileDialogVSProjectOpenFileDialogEnvironmentget_SystemDirectoryset_InitialDirectoryset_Filterset_FilterIndexset_TitleCommonDialogDialogResultShowDialogget_FileNameget_CurrentDirectoryLocalMachineFileSystemChDirAppWinStyleShellset_FileNameget_CheckFileExistsget_Referencesget_MessageExecuteCommandFindget_Findset_MatchCaseget_FindWhatset_FindWhatCharLeftget_Savedget_ProjectItemCodeNamespaceget_Lengthget_CharsUndoContextget_UndoContextLineUpUIHierarchyItemUIHierarchyGetItemUIHierarchyItemsget_UIHierarchyItemsset_ExpandedEndsWithOutputWindowset_VisibleOutputWindowPanesget_OutputWindowPanesActivateset_MatchWholeWordvsFindActionset_ActionvsFindTargetset_Targetset_Backwardsset_MatchInHiddenTextvsFindPatternSyntaxset_PatternSyntaxget_MainWindowget_HWndDebuggerget_DebuggerStepOverdbgDebugModeget_CurrentModeCommandWindowStackFrameExpressionProgramget_CurrentProgramThreadsget_Threadsget_IDConversionStrStackFramesget_StackFramesget_ModuleInStrRevget_FunctionNameExpressionsget_ArgumentsBreakpointBreakpointsget_BreakpointsdbgBreakpointConditionTypedbgHitCountTypeset_TagGoget_BreakpointLastHitget_Tagset_Enabledget_AllBreakpointsLastHitProcessget_CurrentProcessget_ProcessIDdbgEventReasonget_LastBreakReasonProcessesget_LocalProcessesAttachget_DebuggedProcessesLanguageLanguagesget_LanguagesCreateProjectErrorValGotoLineRunToCursorGetExpressionget_IsValidValueget_DataMembersVirtualPointget_TopPointget_BottomPointget_LineLineDownStartOfLineNewLineNewFilevsSaveStatusSaveget_ActivePointget_CodeElementOutlineSectionEndOfDocumentSystem.ReflectionMissingValuevsPaneShowHowTryToShowToLongBeepget_LineCharOffsetget_LineLengthget_DisplayColumnget_IsCodeTypeLessThanCopyPasteget_BottomLinevsStartOfLineOptionsTextPaneget_AnchorPointInt64vsWhitespaceOptionsDeleteWhitespacePadToColumnGlobalsget_Globalsset_VariableValueget_VariableExistsget_VariableValueIndexOfCharTrimStartToCharIsPunctuationIsWhiteSpacevsFindResultFind2set_WaitForFindToCompleteExecuteStatusBarget_StatusBarEqualToToLongTimeStringToLongDateStringAddRangeConditionalCompareObjectNotEqualget_IsOpenDebuggableAttributeDebuggingModesCompilationRelaxationsAttributeRuntimeCompatibilityAttributeVsaModuleVBAssembly#EnvironmentEventsDTEEventsDocumentEventsWindowEventsTaskListEventsFindEvents%OutputWindowEventsSelectionEvents'SolutionItemsEventsMiscFilesEventsDebuggerEventsDTEFontsAndColorsTextEditorFontSizeAccessibility+TextEditorInGrayScale'FontsAndColorsItems_BG_FGOAdd directory as solution folder reportThe item "U"may have not been added to the solution. ?Enter the folder path to importOThe specified folder could not be foundIThe path entered could not be found .obj .ilk .pch .pdb .exe .dll .sbr .lib .exp .bsc .tlb .ncb .sln .suo.vcproj.vbproj.csproj.vjsproj .msiEEnter the number of times to paste paste LineUpLineDown text This macro can only be run when a text editor window is active./**/ <!--  --> '  ; TopLineBottomLineGotoLineSelectLine+Unable to comment out the highlighted text because the file type was unrecognized. If the file has not yet been saved, please save it and try again...rc .rc2 C/C++ JavaODL/IDLHTML - IE 3.0 .xml'HTML 2.0 (RFC 1866)VBS Macro .def//]This macro does not work on this type of file. ... TextStartOfDocument KCould not find a closing comment mark <!----> 'Rem;iUnable to add revision marks. Unrecognized file typeStartOfLineI*********************************** ) REVISION LOG ENTRY  Revision By:  Revised on  Comments: ... G*********************************** CSharp(), (- // Function name : W// Description : // Return type : +// Argument : It is possible that the function you are trying to work with has a syntax error.You need to have an active C/C++ document open with the function prototype selected.azAZ09_#ifndef #ifdef This macro only works on .c, .cpp, .cxx, .h, .hpp, or .hxx filesWhat should the control variable be? Example: #ifdef ControlVariable- out a section of code"" is not a valid C identifier. please re-run the macro with a valid C identifier  #endif //The file you are working with does not have a file extension. Are you sure this is a C/C++ header file?#nofilenamegiven.h.h .hpp__mWhat should the control variable be? Example: #ifdef EOne time header include protection #define EndOfDocument is not a valid c identifier. please re-run the macro with a valid C identifier]This macro can only be run on .h or .hpp files[^a-zA-Z0-9]Connect.vbConnect ExecQueryStatusOnConnectionMCould not find the proper items in the project. To use this macro run the Add-in wizard, select VB as the programming language and select to create a Tools Menu item.+CreateAddinFromMacrosWarning: Running this macro will replace the Exec, QueryStatus, and OnConnection of your Add-in. Do you wish to continue?1Create Addin From Macros}Enter the name of the Macro Project to create an Add-in out ofUCould not find the specified macro project=Make Add-in From Macro ProjectPublic Sub Exec(ByVal commandName As String, ByVal executeOption As vsCommandExecOption, ByRef varIn As Object, ByRef varOut As Object, ByRef handled As Boolean) Implements IDTCommandTarget.Exec ' handled = False If (executeOption = vsCommandExecOption.vsCommandExecOptionDoDefault) Then Public Sub QueryStatus(ByVal commandName As String, ByVal neededText As vsCommandStatusTextWanted, ByRef status As vsCommandStatus, ByRef commandText As Object) Implements IDTCommandTarget.QueryStatus istatus = vsCommandStatus.vsCommandStatusUnsupported If neededText = EnvDTE.vsCommandStatusTextWanted.vsCommandStatusTextWantedNone Then }Public Sub OnConnection(ByVal application As Object, ByVal connectMode As ext_ConnectMode, ByVal addInInst As Object, ByRef custom As System.Array) Implements IDTExtensibility2.OnConnection o_applicationObject = CType(Application, EnvDTE80.DTE2) a_addInInstance = CType(addInInst, EnvDTE.AddIn) kIf connectMode = ext_ConnectMode.ext_cm_UISetup Then aDim objAddIn As AddIn = CType(addInInst, AddIn) 5Dim CommandObj As Command CDim objCommandBar As CommandBar 'If your command no longer appears on the appropriate command bar, or if you would like to re-create the command, ' close all instances of Visual Studio .NET, open a command prompt (MS-DOS window), and run the command 'devenv /setup'. objCommandBar = CType(_applicationObject.Commands.AddCommandBar("", vsCommandBarType.vsCommandBarTypeMenu, _applicationObject.CommandBars.Item("Tools")), Microsoft.VisualStudio.CommandBars.CommandBar) M{7651A701-06E5-11D1-8EBD-00A0C90F26EA}TextDocument8^(uy\Nx\!jWW.vb%Option Strict Off I public shared DTE as EnvDTE80.DTE2C public Dim DTE as EnvDTE80.DTE2.Connect.%If commandName = "" Then handled = True 5.DTE = _applicationObject () !Exit Sub End If "Then status = CType(vsCommandStatus.vsCommandStatusEnabled + vsCommandStatus.vsCommandStatusSupported, vsCommandStatus) End If CommandObj = _applicationObject.Commands.AddNamedCommand(objAddIn, " ", "", "TODO: Enter your command description", True, 59, Nothing, 1 + 2) '1+2 == vsCommandStatusSupported+vsCommandStatusEnabled KCommandObj.AddControl(objCommandBar) End If End Sub  End If End Sub Else 'If you are not using events, you may wish to remove some of these to increase performance. EnvironmentEvents.DTEEvents = CType(_applicationObject.Events.DTEEvents, EnvDTE.DTEEvents) EnvironmentEvents.DocumentEvents = CType(_applicationObject.Events.DocumentEvents(Nothing), EnvDTE.DocumentEvents) EnvironmentEvents.WindowEvents = CType(_applicationObject.Events.WindowEvents(Nothing), EnvDTE.WindowEvents) EnvironmentEvents.TaskListEvents = CType(_applicationObject.Events.TaskListEvents(""), EnvDTE.TaskListEvents) EnvironmentEvents.FindEvents = CType(_applicationObject.Events.FindEvents, EnvDTE.FindEvents) EnvironmentEvents.OutputWindowEvents = CType(_applicationObject.Events.OutputWindowEvents(""), EnvDTE.OutputWindowEvents) EnvironmentEvents.SelectionEvents = CType(_applicationObject.Events.SelectionEvents, EnvDTE.SelectionEvents) EnvironmentEvents.SolutionItemsEvents = CType(_applicationObject.Events.SolutionItemsEvents, EnvDTE.ProjectItemsEvents) EnvironmentEvents.MiscFilesEvents = CType(_applicationObject.Events.MiscFilesEvents, EnvDTE.ProjectItemsEvents) EnvironmentEvents.DebuggerEvents = CType(_applicationObject.Events.DebuggerEvents, EnvDTE.DebuggerEvents) End If End SubReferencesAdd1System.Windows.Forms.dll9Add-in generation complete To make sure your Add-in compiles, you need to perform two actions: 1) If you had any modules with an 'Option Explicit', a duplicate will appear in the generated module. You need to remove the duplicate. e2) Any calls to automation methods/properties not prepended with 'DTE.' will need to have these manually added (for example, change 'ActiveDocument()' to 'DTE.ActiveDocument()'). EnvDTEEnvDTE80EMicrosoft.VisualStudio.CommandBars;Could not add a reference to C Try adding a reference manually.Optional GEnter the name you want to save as:%Save window layoutCEmpty string, enter a valid name.WWhich window layout would you like to load?%Load Window LayoutQEmpty string, enter a window layout name BasicShowLineNumbersPlainText HTMLXMLWordWrapM{28836128-FC2C-11D2-A433-00C04F72D18A}List Project ClearOutputString \Type Libraries (*.tlb)|*.tlb|DLLs (*.dll)|*.dll|All files (*.*)|*.*+Open COM type librarydevenv.exe#PublicAssemblies\Asoftware\microsoft\.NetFramework%SDKInstallRootv2.0bin_Unable to get tlbimp.exe location from registry'cmd /c tlbimp.exe "" /out:"Please enter the project to add the reference to (entering nothing or canceling will default to the first project in the solution)AddComReferenceUWas unable to grab Macros solution projectCWas unable to create COM+ wrapper?Was unable to add the referenceEdit.Find%Modified Documents clear members itemDidn't find a type definition as first thing in file or find a namespace as the first thing with a type inside the namespace.'Insert Doc Comments<summary>Summary of </summary><param name=></param>M{07CD18B4-3BA1-11D2-890A-0060083196C6}Macros\SamplesList Macros.cs .cpp .idl .jsl-Unrecognized file type. You can add this file type by modifying the function Utilities.LineOrientedCommentStart to include the extension of this file.M{34E76E81-EE4A-11D0-AE2E-00A0C90FFFC3}SNo program is currently being debugged. #Current Program:  Thread ( ) , = : ) mainSetByMacro+Hit tagged breakpoint/Hit untagged breakpointProgram endedDebugger/No breakpoints were hit/No breakpoint was hit 1No breakpoints are set Break Mode Design Mode Run Mode 9No process is being debugged!Breakpoint hit No reason OException not handled by the debuggee %Exception thrown calc.exe/calc.exe is not runningENo processes are being debugged. Process: [] YDebugger supports the following languages: ICould not detach from all processes. = ! = Invalid valueIDebugger doesn't exist! Fatal error.Comment Region .bak8^ĉ\e,geNM{00000000-0000-0000-0000-000000000000}Selection InsertMembersActivePoint. #Enter a command: activepaneFillColumn-Enter the fill column:80-Fill Comment Paragraph* * 'List Matching LinesMatching Lines line /List Non-matching Lines%Non-matching Lines]Ǐ#Count OccurrencesThere were  occurrences..c .rgs .txt LengthSelect one project within the Solution Explorer, then re-run this macro.M{7651A703-06E5-11D1-8EBD-00A0C90F26EA}!N?z\V4?_ :        0 ()- )   % ( 159===AAAEEEIIIMMMQQQUUUYYY]]]aaaeeeiiimmmqqquuuyyy=AEIMQUY]aeimquy}}9-1]Ǐ    MyTemplate8.0.0.0   My.Computer My.UserMy.WebServicesMy.Application  a4System.Web.Services.Protocols.SoapHttpClientProtocolCreate__Instance__Dispose__Instance__   !%                  !           5 9 1  }   A } 5} MQ  U 5}E Y9 1 a 1mq 99yy q qqqq m   qq  9q=AEIMQUY]aeimquy FindEventsSelectionEventsTaskListEventsSolutionEventsMiscFilesEventsDebuggerProcessEventsSolutionItemsEvents DTEEvents BuildEvents'"DebuggerExpressionEvaluationEventsProjectsEventsDocumentEvents WindowEventsOutputWindowEventsDebuggerEventsTextDocumentKeyPressEventsCodeModelEvents       } 1      q    T"}}}91qq           1 }1   %     @} q 91     (      1       1 5 = m A !%)- I IMQ EI EEIE U U YY ] U U e a   - - !- i q 1 m  qqq uq     q    y qq uq}   q       q   q1  q1qqqqy qyy  1} 9 TWrapNonExceptionThrows11 1_CorDllMainmscoree.dll% @0 1akpointToMain Samples.VSDebugger.AttachToCalc Samples.VSDebugger.BreakpointLastHit Samples.VSDebugger.DebuggerMode Samples.VSDebugger.DetachAll Samples.VSDebugger.DumpExpression Samples.VSDebugger.DumpStacks Samples.VSDebugger.LastBreakReason Samples.VSDebugger.ListAllBreakpoints Samples.VSDebugger.ListBreakpointsLastHit Samples.VSDebugger.ListDebuggedProcesses Samples.VSDebugger.RunToLine Samples.VSDebugger.RunToNextBreakpoint Samples.VSDebugger.ShowCurrentProcess Samples.VSDebugger.StepOverAll Samples.VSDebugger.SupportedLanguages Samples.AddDirAsSlnFolder.GenerateSlnFolderOnDirStructure Samples.Accessibility.DecreaseTextEditorFontSize Samples.Accessibility.IncreaseTextEditorFontSize Samples.Accessibility.MaximizeToolWindowsInEnvironment Samples.Accessibility.ToggleTextEditorGrayScale Samples.Accessibility.UpdateTextEditorFontSizeToMatchDisplayProperties Samples.DevStudio6Editor.AddFunctionDescription Samples.DevStudio6Editor.AddRevisionMarks Samples.DevStudio6Editor.AutoCompleteFromFile Samples.DevStudio6Editor.CloseExceptActive Samples.DevStudio6Editor.CommentOut Samples.DevStudio6Editor.ifdefOut Samples.DevStudio6Editor.ifndefOut Samples.DevStudio6Editor.MultiplePastes Samples.DevStudio6Editor.OneTimeInclude Samples.DevStudio6Editor.PrintAllOpenDocuments Samples.DevStudio6Editor.ToggleCommentStyle Samples.Utilities.AddClassicComRef Samples.Utilities.FindCase Samples.Utilities.FindLastTarget Samples.Utilities.FindLine Samples.Utilities.InsertDocComments Samples.Utilities.ListMacroSamples Samples.Utilities.ListModifiedDocuments Samples.Utilities.ListProj Samples.Utilities.LoadView Samples.Utilities.SaveView Samples.Utilities.TurnOffLineNumbers Samples.Utilities.TurnOffWordWrap Samples.Utilities.TurnOnLineNumbers Samples.Utilities.TurnOnWordWrap Samples.VSEditor.BeginningOfFunction Samples.VSEditor.CenterScreen Samples.VSEditor.CommentRegion Samples.VSEditor.CountOccurrences Samples.VSEditor.DoForWholeFile Samples.VSEditor.EmacsStyleIndentLine Samples.VSEditor.FillCommentParagraph Samples.VSEditor.FixLineEnds Samples.VSEditor.InsertDate Samples.VSEditor.InsertTime Samples.VSEditor.InsertTimeDate Samples.VSEditor.LineEmUp Samples.VSEditor.LineToTop Samples.VSEditor.ListMatchingLines Samples.VSEditor.ListNonMatchingLines Samples.VSEditor.NewCommentLine Samples.VSE<VisualStudioProject> <VisualBasic Version = "9.0.21107.8" MVID = "{F3FBBB37-315A-4DF0-9D7E-0A01FC8CB303}" ProjectType = "Local" ProductVersion = "9.0.21107" SchemaVersion = "2.0" > <Build> <Settings DefaultNamespace = "Samples" OptionCompare = "0" OptionExplicit = "1" OptionStrict = "0" ProjectName = "Samples" ReferencePath = "" TreatWarningsAsErrors = "false" WarningLevel = "1" RootNamespace = "Samples" > <Config Name = "Debug" DefineConstants = "" DefineDebug = "true" DefineTrace = "true" DebugSymbols = "true" RemoveIntegerChecks = "false" /> </Settings> <References> <Reference Name = "EnvDTE80" AssemblyName = "EnvDTE80" /> <Reference Name = "System.Drawing" AssemblyName = "System.Drawing" /> </References> <Imports> <Import Namespace = "Microsoft.VisualBasic" /> </Imports> </Build> <Files> <Include> <VSAAppGlobal VSAAppGlobalName = "DTE" ItemType = "1" VSAAppGlobalType = "EnvDTE._DTE" /> <File RelPath = "EnvironmentEvents" BuildAction = "Compile" ItemType = "2" VSAESItemType = "2" > <VSAEventSource VSAEventSourceName = "DTEEvents" VSAEventSourceType = "EnvDTE.DTEEvents" /> <VSAEventSource VSAEventSourceName = "DocumentEvents" VSAEventSourceType = "EnvDTE.DocumentEvents" /> <VSAEventSource VSAEventSourceName = "WindowEvents" VSAEventSourceType = "EnvDTE.WindowEvents" /> <VSAEventSource VSAEventSourceName = "TaskListEvents" VSAEventSourceType = "EnvDTE.TaskListEvents" /> <VSAEventSource VSAEventSourceName = "FindEvents" VSAEventSourceType = "EnvDTE.FindEvents" /> <VSAEventSource VSAEventSourceName = "OutputWindowEvents" VSAEventSourceType = "EnvDTE.OutputWindowEvents" /> <VSAEventSource VSAEventSourceName = "SelectionEvents" VSAEventSourceType = "EnvDTE.SelectionEvents" /> <VSAEventSource VSAEventSourceName = "SolutionItemsEvents" VSAEventSourceType = "EnvDTE.ProjectItemsEvents" /> <VSAEventSource VSAEventSourceName = "MiscFilesEvents" VSAEventSourceType = "EnvDTE.ProjectItemsEvents" /> <VSAEventSource VSAEventSourceName = "DebuggerEvents" VSAEventSourceType = "EnvDTE.DebuggerEvents" /> </File> <File RelPath = "DevStudio6Editor" BuildAction = "Compile" ItemType = "2" /> <File RelPath = "MakeAddin" BuildAction = "Compile" ItemType = "2" /> <File RelPath = "Utilities" BuildAction = "Compile" ItemType = "2" /> <File RelPath = "VSDebugger" BuildAction = "Compile" ItemType = "2" /> <File RelPath = "VSEditor" BuildAction = "Compile" ItemType = "2" /> <File RelPath = "AddDirAsSlnFolder" BuildAction = "Compile" ItemType = "2" /> <File RelPath = "Accessibility" BuildAction = "Compile" ItemType = "2" /> </Include> </Files> <Folders> <Include/> </Folders> </VisualBasic> </VisualStudioProject> = vsCommandStatus.vsCommandStatusUnsupported If neededText = EnvDTE.vsCommandStatusTextWanted.vsCommandStatusTextWantedNone Then }Public Sub OnConnection(ByVal application As Object, ByVal connectMode As ext_ConnectMode, ByVal addInInst As Object, ByRef custom As System.Array) Implements IDTExtensibility2.OnConnection o_applicationObject = CType(Application, EnvDTE80.DTE2) a_addInInstance = CType(addInInst, EnvDTE.AddIn) kIf connectMode = ext_ConnectMode.ext_cm_UISetup Then aDim objAddIn As AddIn = CType(addInInst, AddIn) 5Dim CommandObj As Command CDim objCommandBar As CommandBar 'If your command no longer appears on the appropriate command bar, or if you would like to re-create the command, ' close all instances of Visual Studio .NET, open a command prompt (MS-DOS window), and run the command 'devenv /setup'. objCommandBar = CType(_applicationObject.Commands.AddCommandBar("", vsCommandBarType.vsCommandBarTypeMenu, _applicationObject.CommandBars.Item("Tools")), Microsoft.VisualStudio.CommandBars.CommandBar) M{7651A701-06E5-11D1-8EBD-00A0C90F26EA}TextDocument1Common Items\Code\Module.vb%Option Strict Off I public shared DTE as EnvDTE80.DTE2C public Dim DTE as EnvDTE80.DTE2.Connect.%If commandName = "" Then handled = True 5.DTE = _applicationObject () !Exit Sub End If "Then status = CType(vsCommandStatus.vsCommandStatusEnabled + vsCommandStatus.vsCommandStatusSupported, vsCommandStatus) End If CommandObj = _applicationObject.Commands.AddNamedCommand(objAddIn, " ", "", "TODO: Enter your command description", True, 59, Nothing, 1 + 2) '1+2 == vsCommandStatusSupported+vsCommandStatusEnabled KCommandObj.AddControl(objCommandBar) End If End Sub  End If End Sub Else 'If you are not using events, you may wish to remove some of these to increase performance. EnvironmentEvents.DTEEvents = CType(_applicationObject.Events.DTEEvents, EnvDTE.DTEEvents) EnvironmentEvents.DocumentEvents = CType(_applicationObject.Events.DocumentEvents(Nothing), EnvDTE.DocumentEvents) EnvironmentEvents.WindowEvents = CType(_applicationObject.Events.WindowEvents(Nothing), EnvDTE.WindowEvents) EnvironmentEvents.TaskListEvents = CType(_applicationObject.Events.TaskListEvents(""), EnvDTE.TaskListEvents) EnvironmentEvents.FindEvents = CType(_applicationObject.Events.FindEvents, EnvDTE.FindEvents) EnvironmentEvents.OutputWindowEvents = CType(_applicationObject.Events.OutputWindowEvents(""), EnvDTE.OutputWindowEvents) EnvironmentEvents.SelectionEvents = CType(_applicationObject.Events.SelectionEvents, EnvDTE.SelectionEvents) EnvironmentEvents.SolutionItemsEvents = CType(_applicationObject.Events.SolutionItemsEvents, EnvDTE.ProjectItemsEvents) EnvironmentEvents.MiscFilesEvents = CType(_applicationObject.Events.MiscFilesEvents, EnvDTE.ProjectItemsEvents) EnvironmentEvents.DebuggerEvents = CType(_applicationObject.Events.DebuggerEvents, EnvDTE.DebuggerEvents) End If End SubReferencesAdd1System.Windows.Forms.dll9Add-in generation complete To make sure your Add-in compiles, you need to perform two actions: 1) If you had any modules with an 'Option Explicit', a duplicate will appear in the generated module. You need to remove the duplicate. e2) Any calls to automation methods/properties not prepended with 'DTE.' will need to have these manually added (for example, change 'ActiveDocument()' to 'DTE.ActiveDocument()'). EnvDTEEnvDTE80EMicrosoft.VisualStudio.CommandBars;Could not add a reference to C Try adding a reference manually.Optional GEnter the name you want to save as:%Save window layoutCEmpty string, enter a valid name.WWhich window layout would you like to load?%Load Window LayoutQEmpty string, enter a window layout name BasicShowLineNumbersPlainText HTMLXMLWordWrapM{28836128-FC2C-11D2-A433-00C04F72D18A}List Project ClearOutputString \Type Libraries (*.tlb)|*.tlb|DLLs (*.dll)|*.dll|All files (*.*)|*.*+Open COM type librarydevenv.exe#PublicAssemblies\Asoftware\microsoft\.NetFramework%SDKInstallRootv2.0bin_Unable to get tlbimp.exe location from registry'cmd /c tlbimp.exe "" /out:"Please enter the project to add the reference to (entering nothing or canceling will default to the first project in the solution)AddComReferenceUWas unable to grab Macros solution projectCWas unable to create COM+ wrapper?Was unable to add the referenceEdit.Find%Modified Documents clear members itemDidn't find a type definition as first thing in file or find a namespace as the first thing with a type inside the namespace.'Insert Doc Comments<summary>Summary of </summary><param name=></param>M{07CD18B4-3BA1-11D2-890A-0060083196C6}Macros\SamplesList Macros.cs .cpp .idl .jsl-Unrecognized file type. You can add this file type by modifying the function Utilities.LineOrientedCommentStart to include the extension of this file.M{34E76E81-EE4A-11D0-AE2E-00A0C90FFFC3}SNo program is currently being debugged. #Current Program:  Thread ( ) , = : ) mainSetByMacro+Hit tagged breakpoint/Hit untagged breakpointProgram endedDebugger/No breakpoints were hit/No breakpoint was hit 1No breakpoints are set Break Mode Design Mode Run Mode 9No process is being debugged!Breakpoint hit No reason OException not handled by the debuggee %Exception thrown calc.exe/calc.exe is not runningENo processes are being debugged. Process: [] YDebugger supports the following languages: ICould not detach from all processes. = ! = Invalid valueIDebugger doesn't exist! Fatal error.Comment Region .bak8^ĉ\e,geNM{00000000-0000-0000-0000-000000000000}Selection InsertMembersActivePoint. #Enter a command: activepaneFillColumn-Enter the fill column:80-Fill Comment Paragraph* * 'List Matching LinesMatching Lines line /List Non-matching Lines%Non-matching Lines Passed#Count OccurrencesThere were  occurrences..c .rgs .txt LengthSelect one project within the Solution Explorer, then re-run this macro.M{7651A703-06E5-11D1-8EBD-00A0C90F26EA}=lGL,z\V4?_ :        0 ()- )   % ( 159===AAAEEEIIIMMMQQQUUUYYY]]]aaaeeeiiimmmqqquuuyyy=AEIMQUY]aeimquy}}9-1 Passed    MyTemplate8.0.0.0   My.Computer My.UserMy.WebServicesMy.Application  a4System.Web.Services.Protocols.SoapHttpClientProtocolCreate__Instance__Dispose__Instance__   !%                  !           5 9 1  }   A } 5} MQ  U 5}E Y9 1 a 1mq 99yy q qqqq m   qq  9q=AEIMQUY]aeimquy FindEventsSelectionEventsTaskListEventsSolutionEventsMiscFilesEventsDebuggerProcessEventsSolutionItemsEvents DTEEvents BuildEvents'"DebuggerExpressionEvaluationEventsProjectsEventsDocumentEvents WindowEventsOutputWindowEventsDebuggerEventsTextDocumentKeyPressEventsCodeModelEvents       } 1      q    T"}}}91qq           1 }1   %     @} q 91     (      1       1 5 = m A !%)- I IMQ EI EEIE U U YY ] U U e a   - - !- i q 1 m  qqq uq     q    y qq uq}   q       q   q1  q1qqqqy qyy  1} 9 TWrapNonExceptionThrows11 1_CorDllMainmscoree.dll% @0 2<VisualStudioProject> <VisualBasic Version = "9.0.20920.00" MVID = "{69CE0295-03A6-4402-A5C5-E35C0CFC95A8}" ProjectType = "Local" ProductVersion = "9.0.20920" SchemaVersion = "2.0" > <Build> <Settings DefaultNamespace = "Samples" OptionCompare = "0" OptionExplicit = "1" OptionStrict = "0" ProjectName = "Samples" ReferencePath = "" TreatWarningsAsErrors = "false" WarningLevel = "1" RootNamespace = "Samples" > <Config Name = "Debug" DefineConstants = "" DefineDebug = "true" DefineTrace = "true" DebugSymbols = "true" RemoveIntegerChecks = "false" /> </Settings> <References> <Reference Name = "EnvDTE80" AssemblyName = "EnvDTE80" /> <Reference Name = "System.Drawing" AssemblyName = "System.Drawing" /> </References> <Imports> <Import Namespace = "Microsoft.VisualBasic" /> </Imports> </Build> <Files> <Include> <VSAAppGlobal VSAAppGlobalName = "DTE" ItemType = "1" VSAAppGlobalType = "EnvDTE._DTE" /> <File RelPath = "EnvironmentEvents" BuildAction = "Compile" ItemType = "2" VSAESItemType = "2" > <VSAEventSource VSAEventSourceName = "DTEEvents" VSAEventSourceType = "EnvDTE.DTEEvents" /> <VSAEventSource VSAEventSourceName = "DocumentEvents" VSAEventSourceType = "EnvDTE.DocumentEvents" /> <VSAEventSource ally generated code #End Region End Module DirAsSlnFolder$#Samples.DevStudio6Editor$#Samples.EnvironmentEvents$#Samples.MakeAddin$#Samples.VSDebugger$#Samples.VSEditor $Samples$#Samples.My.MyProject$Microsoft.VisualBasic&$#Microsoft.VisualBasic.Constants&$#Microsoft.VisualBasic.Conversion&$#Microsoft.VisualBasic.DateAndTime&$#Microsoft.VisualBasic.FileSystem&$#Microsoft.VisualBasic.Finan VSAEventSourceName = "WindowEvents" VSAEventSourceType = "EnvDTE.WindowEvents" /> <VSAEventSource VSAEventSourceName = "TaskListEvents" VSAEventSourceType = "EnvDTE.TaskListEvents" /> <VSAEventSource VSAEventSourceName = "FindEvents" VSAEventSourceType = "EnvDTE.FindEvents" /> <VSAEventSource VSAEventSourceName = "OutputWindowEvents" VSAEventSourceType = "EnvDTE.OutputWindowEvents" /> <VSAEventSource VSAEventSourceName = "SelectionEvents" VSAEventSourceType = "EnvDTE.SelectionEvents" /> <VSAEventSource VSAEventSourceName = "SolutionItemsEvents" VSAEventSourceType = "EnvDTE.ProjectItemsEvents" /> <VSAEventSource VSAEventSourceName = "MiscFilesEvents" VSAEventSourceType = "EnvDTE.ProjectItemsEvents" /> <VSAEventSource VSAEventSourceName = "DebuggerEvents" VSAEventSourceType = "EnvDTE.DebuggerEvents" /> </File> <File RelPath = "DevStudio6Editor" BuildAction = "Compile" ItemType = "2" /> <File RelPath = "MakeAddin" BuildAction = "Compile" ItemType = "2" /> <File RelPath = "Utilities" BuildAction = "Compile" ItemType = "2" /> <File RelPath = "VSDebugger" BuildAction = "Compile" ItemType = "2" /> <File RelPath = "VSEditor" BuildAction = "Compile" ItemType = "2" /> <File RelPath = "AddDirAsSlnFolder" BuildAction = "Compile" ItemType = "2" /> <File RelPath = "Accessibility" BuildAction = "Compile" ItemType = "2" /> </Include> </Files> <Folders> <Include/> </Folders> </VisualBasic> </VisualStudioProject> H<8: ;=$G l+`BCD$E%F)G*HA0  < 0JK L,< 0RS T 0$WX 8,YZ [\]%^0_7`BaIbTc[dfemfxghijklmnop6(;-9+;-7)?1<.@2<.;- 6quw#x&y2z4{5}P~S_ab}14@BC^amopM#) R#. P#, R#. N#* V#2 S#/ W#3 S#/ R#. ) TH " +X<Tt,Ld|Ld|6*d StopDebugging` $#Samples._Utility"$#Samples._ApplicationObjects$#Samples.Utilities$#Samples.Accessibility$#Samples.AddDirAsSlnFolder$#Samples.DevStudio6Editor$#Samples.EnvironmentEvents$#Samples.MakeAddin$#Samples.VSDebugger$#Samples.VSEditor $Samples$#Samples.My.MyProject$Microsoft.VisualBasic&$#Microsoft.VisualBasic.Constants&$#Microsoft.VisualBasic.Conversion&$#Microsoft.VisualBasic.DateAndTime&$#Microsoft.VisualBasic.FileSystem&$#Microsoft.VisualBasic.Financial"$#Microsoft.VisualBasic.Globals&$#Microsoft.VisualBasic.Information&$#Microsoft.VisualBasic.Interaction"$#Microsoft.VisualBasic.VBMath"$#Microsoft.VisualBasic.Strings $Samples$Samples._ApplicationObjects:*'ReleaseIfComObjecth'$#Samples._Utility"$#Samples._ApplicationObjects$#Samples.Utilities$#Samples.Accessibility$#Samples.AddDirAsSlnFolder$#Samples.DevStudio6Editor$#Samples.EnvironmentEvents$#Samples.MakeAddin$#Samples.VSDebugger$#Samples.VSEditor $Samples$#Samples.My.MyProject$Microsoft.VisualBasic&$#Microsoft.VisualBasic.Constants&$#Microsoft.VisualBasic.Conversion&$#Microsoft.VisualBasic.DateAndTime&$#Microsoft.VisualBasic.FileSystem&$#Microsoft.VisualBasic.Financial"$#Microsoft.VisualBasic.Globals&$#Microsoft.VisualBasic.Information&$#Microsoft.VisualBasic.Interaction"$#Microsoft.VisualBasic.VBMath"$#Microsoft.VisualBasic.Strings $Samples$Samples._ApplicationObjects6*H !CReleaseObjectD !C$#Samples._Utility"$#Samples._ApplicationObjects$#Samples.Utilities$#Samples.Accessibility$#Samples.AddDirAsSlnFolder$#Samples.DevStudio6Editor$#Samples.EnvironmentEvents$#Samples.MakeAddin$#Samples.VSDebugger$#Samples.VSEditor $Samples$#Samples.My.MyProject$Microsoft.VisualBasic&$#Microsoft.VisualBasic.Constants&$#Microsoft.VisualBasic.Conversion&$#Microsoft.VisualBasic.DateAndTime&$#Microsoft.VisualBasic.FileSystem&$#Microsoft.VisualBasic.Financial"$#Microsoft.VisualBasic.Globals&$#Microsoft.VisualBasic.Information&$#Microsoft.VisualBasic.Interaction"$#Microsoft.VisualBasic.VBMath"$#Microsoft.VisualBasic.Strings $Samples$Samples._ApplicationObjects e< 0 0 T'H    -B>  lC!` '  +4P4P /01 Y U!1=1!y}  Q mmu 9I  Q  5)  u  a IQ AQ9% }]   e qM= eu q]  Q9  15 !  M)!% u q    I]e}q]9 - 99  ) 59a 1ea Q  =qumQyE u=%YI  u} }UI!u  9  UIAQ Ei)-e}]i%$  @  `!  B@  @ %B @ @  E ( @ @@ @  P@  @@@  @@  @P"  @@ @  $0<HT`lx ,8DP\ht(4LXdp| $0<HT`lx ,8DP\ht(4@LXdp| $0<HT`lx ,8DP\ht(4@LXd  $ 0 < H T ` l x   , 8 D P \ h t    ( 4 @ L X d p |  $ 0 <  $ 0 < & (0CRX+*e(0X*e(0ݒZX*e(0%X*e#(0A$X*#e(0 ؅X_*eY(0mlX*Ye(0&xVX3*e(0X*eS%.cctor)06000026%IsFileExcluded)06000027.%GenerateSlnFolderOnDirStructure2)06000028.%0 GenerateSlnFolderOnDirStructure)0 06000029%Equals)06000008%GetHashCode)06000009%@GetType)@0600000a% ToString) 0600000b"%|Create__Instance__)|0600000c"%D /)06000026%IsFileExcluded)06000027.%GenerateSlnFolderOnDirStructure2)06000028.%0 GenerateSlnFolderOnDirStructure)0 06000029%Equals)06000008%GetHashCode)06000009%@GetType)@0600000a% ToString) 0600000b"%|Create__Instance__)|,Dispose__Instance__),0600000d%.ctor)0600000e"% PrintAllOpenDocuments) 0600002a% MultiplePastes) 0600002b% CommentOut) 0600002c% FileType) 0600002d"%8 ToggleCommentStyle)8 0600002e% StripTabs) 0600002f%# CloseExceptActive)# 06000030%) AddRevisionMarks)) 06000031&%0 AddFunctionDescription)0 06000032%<7 ValidId)<7 06000033%,= PoundDefOut),= 06000034%C ifdefOut)C 06000035%I ifndefOut)I 06000036%tN OneTimeInclude)tN 06000037"%T AddToCompletionWords)T 06000038&%0Z ExtractNextCompletionWord)0Z 06000039"%_ FillCompletionWords)_ 0600003a&%e SuggestNextCompletionWord)e 0600003b"%k AutoCompleteFromFile)k 0600003c%.cctor)06000003%get_Computer)06000004%$get_Application)$06000005% get_User) 06000006%hget_WebServices)h06000007% StepOverAll) 06000077%d DumpStacks)d 06000078"% AddBreakpointToMain) 06000079"%\ RunToNextBreakpoint)\ 0600007a&% ListBreakpointsLastHit) 0600007b% BreakpointLastHit) 0600007c"%l# ListAllBreakpoints)l# 0600007d%X) DebuggerMode)X) 0600007e"%. ShowCurrentProcess). 0600007f%4 LastBreakReason)4 06000080%l: AttachToCalc)l: 06000081"%(@ ListDebuggedProcesses)(@ 06000082"%F SupportedLanguages)F 06000083%K DetachAll)K 06000084%Q RunToLine)Q 06000085%W DumpExpression)W 06000086%] IsDebugging)] 06000087&% MakeAddinFromMacroProj) 0600005f% CopyReferences) 06000060&% IsMacroCallableFunction) 06000061%CommentRegion)06000089% NewCommentLine) 0600008a% SaveBackup) 0600008b% OneFunctionView) 0600008c"%BeginningOfFunction)0600008d%LineToTop)0600008e"% #EmacsStyleIndentLine) #0600008f%(TopOfBlock)(06000090%.IndentLevel).06000091%\4SkipSpaceRight)\406000092%9OutlineCode)906000093%?CollapseElt)?06000094%TFCenterScreen)TF06000095"%KPrintNumberedLines)K06000096%QDoForWholeFile)Q06000097%4XLineEmUp)4X06000098%`FixLineEnds)`06000099%eSetFillColumn)e0600009a"%%UpdateTextEditorFontSizeToMatchDisplayProperties)06000021*%IncreaseTextEditorFontSize)06000022*%0 DecreaseTextEditorFontSize)0 06000023&%dToggleTextEditorGrayScale)d06000024.%MaximizeToolWindowsInEnvironment)06000025%SetSite)06000015%dSetTitle)d06000016%SetHandle)06000017"%$ PushVBHostIntoLibrary)$ 06000018% GetParentWindow) 06000019%GetWindowTitle)0600001a%get_Handle)0600001b% StartupHelper) 0600001c%ShutdownHelper)0600001d%Startup)0600001e%d"Shutdown)d"0600001f%StopDebugging)06000011"%hReleaseIfComObject)h06000012%ReleaseObject)0600001306000013r$#Samples.EnvironmentEvents$#Samples.MakeAddin$#Samples.Utilities$#Samples.VSDebugger$#Samples.VSEditor$#Samples._Utility"$#Samples._ApplicationObjects $Samples$#Samples.My.MyProject$Microsoft.VisualBasic&$#Microsoft.VisualBasic.Constants&$#Microsoft.VisualBasic.Conversion&$#Microsoft.VisualBasic.DateAndTime&$#Micw 1 !'"*TX,TSamples.My.MyComputer13D5DBCApSamples.My.MyProjectD96357D2XWSamples.My.MyProject.MyWebServices1AF645B1DhVSamples.My.MyProject.ThreadSafeObjectProvider`1F6D6B591L $Samples._UtilityC7E9E410%VSamples._Startup93FB01224HSamples.AccessibilityC20BB767Samples.AddDirAsSlnFolderF0E53C66qSamples.DevStudio6EditorFB596022( @Samples.MakeAddin5FC086A1QthSamples.UtilitiesAF9EDB74 `Samples.WinWrapperB01AD322bP :Samples.VSDebugger57D94EF4(\ xVSamples.VSEditor0B6646D7-.as  )2ccAesP.F_$esnes ldam6E$ onak$tiso .Dam.r.Vices $Ut'amonC!icd sm y.vVi.V.C+$.V ve$ uaeAicuateicass.s.alsoasK$.V ;or$ERuaericuauaso3L.S$$asm ppb Js*  om2amecam6liam~ln$5ud|nvenr!mes"ti$$ugam$es$5$Ap#'Jtsmpm'nesec'ofsi(Pso(.Vas) so1 .C$2 uah3J .V.D3P $.V4( eS$*5( uaanR6( icuaz7( so8 .IQ9r .V.I9w $.V:: atic =( as1=8 s.i=K je= mp> jA caB Cg esnC .VsoD .IecJ@2E)5VE/LinkInfo/names/src/headerblock/src/files/17d14f5c-a337-4978-8281-53493378c1071.vb/src/files/vsmacros:\\\\craigs2\c%24\dd\toolplat_1\src\redist\x86\retail\bin\i386\samples.vsmacros\_startup/src/files/vsmacros:\\\\craigs2\c%24\dd\toolplat_1\src\redist\x86\retail\bin\i386\samples.vsmacros\accessibility/src/files/vsmacros:\\\\craigs2\c%24\dd\toolplat_1\src\redist\x86\retail\bin\i386\samples.vsmacros\adddirasslnfolder/src/files/vsmacros:\\\\craigs2\c%24\dd\toolplat_1\src\redist\x86\retail\bin\i386\samples.vsmacros\devstudio6editor/src/files/vsmacros:\\\\craigs2\c%24\dd\toolplat_1\src\redist\x86\retail\bin\i386\samples.vsmacros\environmentevents/src/files/vsmacros:\\\\craigs2\c%24\dd\toolplat_1\src\redist\x86\retail\bin\i386\samples.vsmacros\makeaddin/src/files/vsmacros:\\\\craigs2\c%24\dd\toolplat_1\src\redist\x86\retail\bin\i386\samples.vsmacros\utilities/src/files/vsmacros:\\\\craigs2\c%24\dd\toolplat_1\src\redist\x86\retail\bin\i386\samples.vsmacros\vsdebugger/src/files/vsmacros:\\\\craigs2\c%24\dd\toolplat_1\src\redist\x86\retail\bin\i386\samples.vsmacros\vseditor 3     "k VVm.Diagnostics$EnvDTE80 $EnvDTE $Samples$#Samples.My.MyProject$Microsoft.VisualBasic&$#Microsoft.VisualBasic.Constants&$#Microsoft.VisualBasic.Conversion&$#Microsoft.VisualBasic.DateAndTime&$#Microsoft.VisualBasic.FileS#8 XXXXXXXXXX(ȍtoTxb8, ,,h  !"#$%&'()*+,-./0123456789:;<=>?@ABCDEFGHIJKLMNOPQRSTUVWXYZ[\]^_`abcdefghijklmnopqrstuvwxyz{|}~      !"#$%&'()*+,-./0123456789:;<=>?@ABCDEFGHIJKLMNOPQRSTUVWXYZ[\]^_`abcdefghijklmnopqrstuvwxyz{|}~win" VB$t_array$S0 _refVB$t_ref$L1  VB$t_ref$L2"  VB$t_array$S1"  VB$t_array$S22*42-FileType02$#Samples.DevStudio6Editor$#Samples.EnvironmentEvents$#Samples.MakeAddin$#Samples.Utilities$#Samples.VSDebugger$#Samples.VSEditor$#Samples._Utility"$#Samples._ApplicationObjects$#Samples.Accessibility$#Samples.AddDiMZ@ !L!This program cannot be run in DOS mode. $PEL+D!  8 @@ `@8K@  H.text  `.reloc @0@Bp8H&( **( *s s s s *0~o +*0~o +*0~o +*0~o +*0( ( +*0 ( +*0( +*0 ( +*0 - (+ ++ +*0 **( *0/ { o -(+ { o  +*V( s } *:( o *v( (! , ( (" &*0" ( (%(# ($ * 6&( **}**}*B| (& *Vs' } (( *0, | ~* 99o , ++ +*0 { +*0 {  +**0(=((>(?((@(A((B(C((D(E((F(G((H(I((J(O((P(Q((R(S((T~(*0o{rpr%po- ( ,t(> {rpr9po- ( ,t(@ {rprWpo- ( ,t(B {rprqpo- ( ,t(D {rprpo- ( ,t(F {rprpo- ( ,t(H {rprpo- ( ,t(J {rprpo- ( ,t(P {rprpo- ( ,t(R {rpr3po- ( ,t(T {rQpo. t*v{(}o*r (/ (/ *0L(0 o1 "@@Ykl(2 ~rYprwpo3 rpo4 @o5 *0<~rYprwpo3 rpo4 o6 @(7 o5 *0S~rYprwpo3 rpo4 o6 @(8 , o6 @(9 o5 *0~: ~o; o< rpo< -+rpo= &rpo< rp@o> rpo? (@ ~rYprwpo3 rpo4 oA tC 9 oB +aoC tDoD rp(E o? (F (G oH oD rp(E o? (F (G oI oJ -uK, uKoK rp@o> 8 oB +yoC tDoD rp(E oL   (M o> oD rp(E oN   (M o> ~ oH ~oI oJ :{uK, uKoK rp@o> *w@0~oO oP +SoC tL oQ -=oR ,oS %(# ($ oT (# ($ oJ -uK, uKoK *$)<6M W 6prZsU rp*0M(V oW (X oW ~oY , ++~oY , + + +*0(Z ([   +|  ('-fo\ o] o^ ,o_ ,o_ o` 2(# ~(sroprp(a ob ($     ?y   +?  ('-)(X oc od t ((    2* &2X260(e ,'rprprp(f (e ,8(g -rp(h &8~(soi (g - ~(srmpob 8nsU ~rpoj &~rpoj &~rpoj &~rpoj &~rpoj &~rpoj &~rpoj &~rpoj &~rpoj &~rpoj &~rpoj &~r%poj &~r/poj &~r9poj &~rCpoj &~rSpoj &~rcpoj &~rspoj &~rpoj &~ok tQ (X ol od t  ((*0K~om on +oC t oo oJ -uK, uKoK * 130rprprp(f (p  8~oq or rp(s &~oq or rp(s &~oq or rp(s &~oq or rpr p(t   >R*0 ~ou ov .rp(h &8~oq (-_,j~oq or rprp~oq or rp(w (x rp(x (t 8h3j~oq or rprp~oq or rp(w (x rp(x (t 8`93rp +rp ~oq or rp(w (y ~oq or rp(w (y  /    3\~oq or rp~oq or rp(w (x (t 8 @@@ (z 9~oq or rp(   [   (s & ,  ( ~oq or rp(s &~oq or rp  ~oq or rp(w (x  (t  ({ :+rp(h &*03o|  r<p(} 1-+ (~ ( r<p(} 3( r@p( rHp( `, 8o rRp( 3 8o r^p( 3 8o rhp( 3 +qo rxp( 3 +Yrp( 3 +Fo rp( 3 +.o rp( 3 +rp( 3 + *0rp ~oq or t^ o ~oq (-@ @( @( ( (@ 9=( &rp(} .`+8rp(} ( (E (~ rp(} ( rp(} 3rprp( 8rp(} ;(~ rp(} ( +9r p(} ( rp(a (~ r p(} ( r p(} 3rp( (a rp(} ( ~oq or t^ o o +rp(h &*07+(~ rHp(} ( rHp(} 0( *0 ~om o +e~om @o ~oq o o ( . (y o` + ~om o 1+-*0 rLp @  rp rprp~oq o rTp( @y~oq (-@ ~oq or r^p(s &~oq or rp(s &~oq or t^o (  @(  @( ( (@ 9][ rp rpr~po rp(} 3o o ( [ +++[( ,%~oq or rp(s &[( 9~oq or r^p(s &~oq or rp(s &~oq or rTp(w (F ~oq or rp(s &~oq or rp(s &( rp(} @8~oq or rp(s &o ( ~oq or rp(s &~oq or rp(s &  rp(} [ @( ( (@ :I @( , rp(h &8 @( 9rp rprprp(} @rp(} .*~oq or rp(s &8~oq or rp(s &~oq6789:;<=>?@ABCDEFGH or rTp(w (F (~ ( ~oq or t^r p(E o rp(} ,+8Z8 @( 9rp rprp~oq or t^o rp(} ( rp(} `,I~oq or rp(s &~oq or (F ( [ ++8e[( ,%~oq or rp(s &8 @( 9rp rprp~oq or t^o rp(} 3I~oq or rp(s &~oq or (F ( [ +++[( ,%~oq or rp(s & @( ,rp(h &8H @( 96~oq or rd p(s &~oq or t^r pr| p(a o o r p(a o I  o   r p  r p ( o  I  o   r p ( (  r p  r( p  rH p    r p ( o *0 }!~oq -8h~oq o rRp( ~oq o r p( `9~oq or t^  o ( &rp  o rp( . o ( (/(F rp( ;~oq o r p( 3(~ r~p(} ( r~p(} @ r p(} @ ( ,8@(9 (y (  (~ @ (9 (y (   r~p(} (  r p(} ڌ@r p(} @@( @( ( (@ 9(y ( (~ (~ ( ( &r~p(} .5 r~p(} ( (E  (~ r~p(} (  +#  (~ r p(} ( r p(} 3 >K   ֍I8~ r p(} ( ~ ښr p(} .f~ ~ ښ~ ښ(~ ~ ښ(~ ~ ښ(~ ~ ښr p(} ( ~ ( &(~ r p(} (  r p(} @3~ ~ ښr p(} .=~ ~ ښ~ ښr p(} ( ~ ښ( &8I(~ ( ( &~(/(F ~r p(} .8~~~r p(} ( ~( &~oq or rp(s &~oq or rp(s &~oq or rd p(s &~oq or t^ r pr p(a r p(E  r p(a @8~ښr p(} .o~~ښ~ښ(~ ~ښ(~ ~ښ(~ ~ښr p(} ( ~ښ( &~~ښ(/(F @( @( ( (@ ,+~~ښ~ښ(~ ( r6 p~ښr p( @r p(E ~oq or t^  o +rb p(h &+r p(h &*0n"[ rp( 3 [ 8H@(~ @@(z 9(y ( r p( (y ( r p( `9(y ( r p( (y ( r p( `,](y ( r p( (y ( r p( `,#(y ( r p( .[ ({ :( r p( ( r p( _,[ *0#[( ,r p +r p ~oq (-.r p(h &8rq p r p(E rp(f  (3[( , r,pr0p(a (h &~oq or t^@o (~ ڌ@@(z ,{o (y ( r p( 3Lo (y ( rHpo o (~ @(9 (y ( (a o ({ -rp( _9I  r p    rp o  rp  ( o o ( r p( .o r p(E o *>[(4*>[(4*06$~oq o| rp( 3rp(h 38rp ( r<p(} +#  (~ ( r<p(} 3 ( r<p(}  rp(  rp( `9p~oq or r^p[(s &Irp( r p (~ ( ( rp( rp(E rhp(f ~oq or t^(3[( 9Ir prpr p( o ~oq or rp[(s &rp(E o +rp(E (h &+rp(h &*0K~r~pr~p(a ( .+&r~p( .~r~p(a *0o%rp ~(~ 0+V~~(~ 1~~r~p( 3+ ~~~( ր*0&r~p~oq or t^rp(E  o +a,o o  +o o _,+;o o o ( (8o  o -*0Q'[ ~oq or t^ (9(F rp( .o o *0(~oq -8+o rTp( .+wor t^ o o o o o ( r~p( 3 o +& o (: o o (;&*0 )~ +*"*0 *~ +*"*0 +~ +*"*0 ,~ +*"*0 -~ +*"*0 .~ +*"*0 /~ +*"*0 0~ +*"*0 1~ +*"*0 2~ +*"*0 3~ +*"*0 4~  +*" *0 5~! +*"!*0 6~" +*""*0 7~# +*"#*0 8~$ +*"$*0 9~% +*"%*0:~o @( t  o] rpo o o r po tdo rpo r'po  r?po  *(# rYp0rp(h &($ T($ rp4rp(h 382rprprp(f (~ 3#~o ok o @o +i~o ok o o +&oC to ( 3oJ -uK, uKoK -r{p0rp(h &8frp rp(E rp(E r_p  rp(E   r^p(E  r prp(E rp(E rZp(E rp(E r(p(E r^p(E rp(E rp(E r~ po r!p( o] o 8oC t"  r"po oQ rf"po tbo o o o 9~o r"p o r"p(E o o_ rf"po tbo o o o  o rp( .r"po o o o  o o o o o o  o o @o o 3r"po +r,#po tdo o  8X oC t%o @;t (a[( 9 o rp#po (a  r#pr#p( r#p(E  o r#p(a I!! ! o !r<p!o !r$p!( r$p(E  r#pr:$p(   rH$p(E  I!!!r?%p!o !r%p!o !r%p!( r&p(E  oJ : uK,  uKoK oJ :uK, uKoK r'p(E tdo rpo o o o o  o  r?'p(E  tdo r'po   o o  o o  o r_'p(E rk'p(E r&(p(E r(p(E r)p(E r*p(E r+p(E rC,p(E r:-p(E r.p(E r /p(E r/p(E r0p(E r0p(E tdo r?po   o o  o o o  (` od r0p(w r0pr1p(s &o_ or t^o o o (# ($ r41p rn1p(E r1p(E r 3p(E @rp(h &*Ax*6Oklt!, 60;od r0p(w tl od r0p(w tno 8oC tm o rp( ;o rs4p( o r4p( _o r4p( _,;o o &*(# r4po r5p(a (h &($ oJ :KuK, uKoK **6"0<o 3 [ 8o o 3 [ 8o o +V oC to o o o o rY5po - [ E+o o . [ , oJ - uK, uKoK [ +* 3o0K=rm5pr5prp(f rp( 3r5p(h &+~o o &*0Q>r6prw6prp(f rp( 3r6p(h &+~o o o *0)~rwpr6po3 r6po4 [o5 ~rwpr7po3 r6po4 [o5 ~rwpr po3 r6po4 [o5 ~rwpr/7po3 r6po4 [o5 ~rwprRpo3 r6po4 [o5 ~rwpr97po3 r6po4 [o5 ~rwprU7po3 r6po4 [o5 *0)~rwpr6po3 r6po4 [o5 ~rwpr7po3 r6po4 [o5 ~rwpr po3 r6po4 [o5 ~rwpr/7po3 r6po4 [o5 ~rwprRpo3 r6po4 [o5 ~rwpr97po3 r6po4 [o5 ~rwprU7po3 r6po4 [o5 *0)~rwpr6po3 r]7po4 [o5 ~rwpr7po3 r]7po4 [o5 ~rwpr po3 r]7po4 [o5 ~rwpr/7po3 r]7po4 [o5 ~rwprRpo3 r]7po4 [o5 ~rwpr97po3 r]7po4 [o5 ~rwprU7po3 r]7po4 [o5 *0)~rwpr6po3 r]7po4 [o5 ~rwpr7po3 r]7po4 [o5 ~rwpr po3 r]7po4 [o5 ~rwpr/7po3 r]7po4 [o5 ~rwprRpo3 r]7po4 [o5 ~rwpr97po3 r]7po4 [o5 ~rwprU7po3 r]7po4 [o5 *0?~oO ro7po ~o t  3+~o @( t ~ou 3 o ( +$r7p(s r7p(s &o] ( (i*0s@o +E oC t" o 3.( (jo  -( (i oJ - uK, uKoK * Y[0xA +'r7p rp(s & 2r7p o (s &r7p r7p(s &*0Bsus ( r8p(} ( o r8po o r8po o @Ho o (~ ( (~ ( r<p(} ( rp(E ~o ~o r8p(} ( r8p(E ~ r8po ,"r89prpo r^9p(x (F r^9p( 3rf9p(h &ݘ( I  r9p o  r9p    r,p ( ( &r:pr;prp(f (~ 3-~o ok o @o od tv+r~o ok o o  +/ oC t  o ( 3 od tv oJ - uK,  uKoK -r';p(h &n (E o o -r};p(h &Go  (E o - r;p(h &%(#   o (h &($ *A0X36~r<prpo ~o o *09C~o o ~r<prpo ~o o *0LD~oq or t^ o ~r<prpo ~o o o *0 E~oO ro7po ~ou 3o ( +$r<p(s r;<p(s &~om on +Q oC t o -;r7po| rG<po r7p( (s & oJ - uK, uKoK * Wn0F~oq o o o @o u~,>rO<p(w r_<p  @ (w t% ud, td + ri<ps zo o (r o 3o ( r~p(a +-o 3$o ( o ( r~p( ~o rf=po o o  8{ oC t% o @`t  o o o  r7po o rHpr=p(a o r7po I  rHp  r=p o  r<p ( o r7po rHpr=p(a o r7po rHp(E o  o  +S oC t%to r=po r=p(a o r7po rHp(E o  oJ - uK,  uKoK  oJ :y uK,  uKoK ~o o *AHj0G~oO r=po o t rL>po  rj>p(s oi o  o  o  o  8oC t  o  r7p(E ob o  o  o  o  +,oC trG<po  r7p(a ob oJ -uK, uKoK oJ :buK, uKoK *GM0H- ~oq o| r>po r>po `rpo `r>po `r>po `, rp +&+#r"po , rp ++ r>ps z*0hI~oO r?po , o o t o o %(# o o ($ o  +* .=60J~o o ~o o ~o o ~o o ~o o ~o o ~o o rprp(f rp( .~o o  +*&( *0K~o o (&  +*~o o +~o o ~o o 3*0L~oO ro7po o t ~o o -r%@po  8cry@p~o o o! r7p(a o  ~o o o" o#  8 oC t I  r@p o$ @(%  r@p o&  r7p ( o  o' o(  8T oC t o) r8p(* o+ 1o) o) (~ ( + o) o, o-  +u oC t1 r@p(E I    o.  r~p o/  r@p o0  (  oJ - uK,  uKoK I  r@p  r@p  r p   r@p ( o   oJ : uK,  uKoK  oJ : uK,  uKoK *AH[uen0 M~o o1 r@prprprprprpo2 o3 +oC t r@po4 oJ -uK, uKoK * ;-h0N~o o5 ~o o 3Q~o o6 o7 o8 r@p( 3r@p(h &o9 +r#Ap(h &+rSAp(h &*0OroAp(s ~o o: o; 1U~o o: o3 + oC t o< ob oJ - uK, uKoK + rApob * ' @(% r@po? r7p( ob *0TroAp(s ~o o@ YE <<<<<<</ +:rBpob ++rBpob +rBpob + r#Cpob *0U ~o oA oB +4oC t o? ( rICp( 3 oC  + oJ -uK, uKoK - r[Cp(h &* VZ0VroAp(s ~o oD oE 3rCpob 8~o oD oB +ZoC t I rCp o> @(% rCp o? r7p ( ob oJ -uK, uKoK * 7|0xWroAp(s rCpob ~o oF oG +$oC t oH r7p(E ob oJ -uK, uKoK * F`0vX($  ~o oI QrGDp(h &A E u6__t6(# 3 (J z,($ * @U A0OY(K #.:~oq or t^ (K (2 oL ~o oM *0Z~oO ro7po o t ~o oN oO 9 rDpo0 r7p( o  +hI rHp oP @oQ o/ rDp oP @oQ o0 r7p ( o   oP oR 1+rDp(E o  *09[~o -rDp(h &++~o o  * *0\~oq or t^ oS oT oU (r ~o rEpo +. oV  o oW oX oY 3+-~o o * G5|0;]~ou oZ t^ o[ (ro r~po *0 ,^~oq o r#Ep(E ~oq -8~oq rpo tbo o o o o ~o r-EprprQEpo\ &~oq rf"po rEp(w rEp [(s &,( I( (] tI ~oq o^ &~oq o` *0_~ou oZ t^ o_ oT o_ oT o`  o o o o o oa o o`  o o oW o ob oa o *0I`~ou oZ t^ o_ oc ,o o (# ($ * "9 60*a~ou oZ t^ o_ ~d oe &*0;b~ou oZ t^ o_ oT o o o *0c~oq rf"po tbof o  o_ og oW ((h j3 (i +Y +<((h j3 (i +:+2oV 3+'+ o / oV oj o *0vd+noV j oX (oV j. o +*oj ok 3 o +ol @ +oV jj. @ +-*0neoV j +oj j om oj j3+DoV j@o r~p( @o rHp( `_-*0Kf~oq o o o o  + @o  (  1*0%g o o  o o on oo o  _,GrEp(w t&  o  + @o ( 1+Xo 3OrEp(w t&o +@o (1op ,?o 0(@o o o o on oq *09h~oq or rEp(w th ~d or &*0i~oq or t^ o os ~o r-EprprQEpo\ oZ t^ot o o ou o  +I~oq or t^ov (w rEp(E o ox  1~oq oo ~oq o` *0jrEprprp(f rp( ;~oq or t^oy oT o_ oT ~oq oz o rFp(w to{ o o ob ~rpo o o  ~d o| &*0;kj  ~oq or t^oS oT oU og oS og j 8[ ֍ ֍ ֍ ֍ jj oS og o} j j8oV j oX j1!j +( j  1+(oV j 1"jj j j+soj jol jj1+ o~ @o (- oj j ol j j.   / oW j> j j+aj.N[  .7 oS og jַo} o   o j1( (@ , j 9(*0|l~oq or t^ oS oT +Con o @o rp( 3o~ o oW oV oU og 2*0}mo 1"~o r)Fp(p @o +Nr?Fprprp(f rp( 3rmFp ~o r)Fp(p @o *0n  ~o rsFpo ~o r)Fpo - rp(~o r)Fpo (y ~oq rf"po tb~oq or t^o_ oT ( +o  (- oW + oV 08on o ol 1m+ (ol 0oj o 00oV o o} (oj ok 3+r7p (E o 8wol oW  (9WoX  o om oj  ol   oV  +oj (ol   oV _- oV /yoV  o oX  om ok  ڌ@o oX ok ֌@o o on r~p(E o +s 1doj o~  ڌ@o o  ڌ@o o on r~p(E o oW + oW  (:~o o *A0ooX ok @o o o ( rp( ( rFp( `,ao ( rp( ( rp( `_o ( rFp( _`, + + o o `, + *0poX ok @o o (~ (~ ( ( rp( 3rFp(E +N ( ( +,( (E o ( ( ( ( ( `- *0qPok j Poj j1&PoV PoW PoV 1PoX +b+ Pom Poj jP@o (_-+ Pom Poj jP@o (_-*0rPok j Poj 3&PoV Po PoV /Pon +Z+ Po~ Poj P@o (_-+ Po~ Poj P@o (_-*0so o 3 + *0,t ~oq rf"po tb o ~oq o @o rFp(t&rFp(s o o_ oT o oi ~o to ~o o +uoy og 0+go rFpoy og ( r@po ( ob oy og ov ~o o .o *0u ~ou oZ t^ o_ oT  o o oY o rFp(t&~o o r/Gp(s o oi o o oY +X o ~o o 3  o ob ~o o rUGp(}  o ox  o_ og `- o *0 v ~ou oZ t^ o_ oT  o rcGp(trp( 38~o to ~o o +h-%~ou oZ t^o_ oT +*~ou oZ t^o_ o ,+ ~o o . o rGp(w rGp(a (h &*0,w~oq or t^ ( ( o *0,x~oq or t^ ( ( o *0Cy~oq or t^ ( ( r~p( ( (a o *0zsU  Ir>prGprpr>prprGpr@pr>pr"p rp rGp r>p o o (V oW oY + *0t{~o rGp(w @( ,rGp(h &+5~o  @( t o] (*0|o +_oC t" (,=rvHpo ,o_ oo +!rvHpo oQ oo o` o (oJ -uK, uKoK * suBSJB v2.0.50727lX%#~%8(#StringsMH#US#GUIDЖ#BlobW 3&@ }>)  *( N$ d $h E> uN} Ne>>3>x>>>/ > > > >K > >! >f  $  U > >>P>>>#>/>I6f6 ~N B [ NJa">>}" (Np>>p N&bp>>1'`'>   ;>Q> N> Ng5 M U> }Hi>v>>J>>>>U>>>** +>9>i>u>>>}*}q}~}  3 > > > > > >2!>K!>!>!>!>!">@">]">>k">v">">"> "">#>!#>,#>H#>c#>#>#>$>H$>Q$>$>'%>%v%%> &>5&>N&T&>&>&'> 'H'>'6''( ()7B7 M7 W e      & * = &_ &b &u &w &1 1-1:1G!JQQXas B'6 EB T c r ^   0   :  QeP ^\ ^h   ( 5  B!FSc$!F\h $W] I$Y Q&Y 'PZ 'Z '[ ' ] 'X^ '_ 'L`#X'`\a*`as-pd-d-d-'?،9?N?_?<j?tu?ď?@@ZZZZLCR#################l {  /<Bg<B%*B>RHLQ ! %% ^9^I^Q^^Y^$^,^4^<^$,4<a^i^q^ySc\h)0uqL^^DLvL,L^^9DJO(T8^^Y^YhaA!sA1qI@QxpQv9v 2 < a19q v9*J4?)M!YqIi9uQw!} ! )Y!Quq!94i?a:aa 9a9a^q6ICqqKaWKyjVyyVi\a g:qnIiui|4Iy *1a79D|9[?qi9r9|:q9a 9rO&%=1qYqcNimWq w^qqq k k rrIixhqqqq " @ `Ii9u k kc9hh  h*4# ^9    1 ! 9 1& 9, 9?Yq ?2 qv!9 A0? @9 !ME 9dJ YqIwP X ^ )d m 9)u 1?Yq)d !!q? i"qiYqa7 D O 1hyd yd I^Ky  9 7  9i a4aa> ^#I 7LWgM qI 9q1U [  e  q9$ 98 A 9O q\ i qr q| ^!d I hI 9u 9  d ! ! )YqyYq  ! !9?YqI)!Ka?!9]! ! !7% s!|!9!> !E !9!9!L 9 "a"h9*"X A7"9AM"^ A"d QqYqq"j y?Y"h"YYqY"p ?a"q"v a"qa# ?iqiYqivqA8# 7 ?s#A{#9A~#  #q#9A# hYqA# #hYqA# A$ ?+$A2$ hA[$5 ?YqA*i$G |$S $X A$9A$^ i$i$ g h$z 0? $z !$h!$!%A$ha %I% 9% q4% 9%z !I% Y%h%9I% % % 0 $h9% %!%h!%h!%h!*!)%!%! !Y%A% & &&h%A 9uI $>&z q !9 %[ !4y !i !h& !y& &9& !&!&K!&vIqISKI&I& 9& )& )' q4as!9&'9@' uq 9R'AqA`'! h'qy'qa'E ''KI^hY^a^i^9,01p} #);. . o. x. @3@CCIm`#cciL3{Y33+>3{3{ 3 ##@3@C{`3`c{3{3{3{3{3#{C{#;++;+;+;!+!;A;A+a+a;;+;+;(+;+;+!+!;A;A+a+a;;A++;\#### #@#`##### # #@ #` # # # # # # #@ #` # # # # # # #@ #` # # # ###',162[gl{?P9e{*49>CHMRW\aafkpuz{ $ 1 C k   ,  S   ' ; N n    ( ; N f   009KV]   !& +0+5:?DINSX \!05D&afaakpuzp!!!+!!!!+&0!!&&!!!!!!++   O;TYG^y3x /    ! &. & +! 0f 5 :$ ? Dy   =>@?BACDEFHGIJKLMNP!O!R#Q#S%T%U'V'W)X)Z+Y+\-[-]/^/v1 2S 4W 6YYuu   ! *(   >}       //'mscorlibMicrosoft.VisualBasicMyApplicationSamples.MyMyComputerMyProjectMyWebServicesThreadSafeObjectProvider`1_UtilitySamples_ApplicationObjects_StartupAccessibilityAddDirAsSlnFolderDevStudio6EditorEnvironmentEventsMakeAddinUtilitiesWinWrapperVSDebuggerVSEditorMicrosoft.VisualBasic.ApplicationServicesApplicationBase.ctorMicrosoft.VisualBasic.DevicesComputerSystemObject.cctorget_Computerm_ComputerObjectProviderget_Applicationm_AppObjectProviderUserget_Userm_UserObjectProviderget_WebServicesm_MyWebServicesObjectProviderApplicationWebServicesEqualsoGetHashCodeTypeGetTypeToStringCreate__Instance__TinstanceDispose__Instance__get_GetInstanceMicrosoft.VisualBasic.MyServices.InternalContextValue`1m_ContextGetInstanceStopDebuggingReleaseIfComObjectReleaseObjectEnvDTE_DTEDTEMicrosoft.VisualBasic.CompilerServicesIVbHostSystem.Windows.FormsIWin32WindowMicrosoft.VsaIVsaSitem_pSitem_strTitlem_HandleHostServicesm_VBHostSetSiteSetTitlestrSetHandleintPushVBHostIntoLibraryGetParentWindowGetWindowTitleget_HandleStartupHelperShutdownHelperStartupShutdownHandlefontSizeIncrementminimumSupportedEditorSizewhiteColorblackColorUpdateTextEditorFontSizeToMatchDisplayPropertiesIncreaseTextEditorFontSizeDecreaseTextEditorFontSizeToggleTextEditorGrayScaleMaximizeToolWindowsInEnvironmentSystem.Collections.SpecializedStringCollectionexcludedExtensionsoutputWindowPaneTitleIsFileExcludedfilePathEnvDTE80SolutionFolderGenerateSlnFolderOnDirStructure2currentPathcurrentSlnFolderGenerateSlnFolderOnDirStructurestartFolderParamArrpreviousSelectioncompletionWordscompletionWordsIndexPrintAllOpenDocumentsMultiplePastesCommentOutDocumentFileTypedocToggleCommentStyleStripTabsMyStrCloseExceptActiveAddRevisionMarksAddFunctionDescriptionValidIdIdPoundDefOutifndefifdefOutifndefOutOneTimeIncludeAddToCompletionWordswordExtractNextCompletionWordFillCompletionWordsSuggestNextCompletionWordAutoCompleteFromFileDTEEvents_DTEEventsget_DTEEventsset_DTEEventsWithEventsValueDocumentEvents_DocumentEventsget_DocumentEventsset_DocumentEventsWindowEvents_WindowEventsget_WindowEventsset_WindowEventsTaskListEvents_TaskListEventsget_TaskListEventsset_TaskListEventsFindEvents_FindEventsget_FindEventsset_FindEventsOutputWindowEvents_OutputWindowEventsget_OutputWindowEventsset_OutputWindowEventsSelectionEvents_SelectionEventsget_SelectionEventsset_SelectionEventsBuildEvents_BuildEventsget_BuildEventsset_BuildEventsSolutionEvents_SolutionEventsget_SolutionEventsset_SolutionEventsProjectItemsEvents_SolutionItemsEventsget_SolutionItemsEventsset_SolutionItemsEvents_MiscFilesEventsget_MiscFilesEventsset_MiscFilesEventsDebuggerEvents_DebuggerEventsget_DebuggerEventsset_DebuggerEventsProjectsEvents_ProjectsEventsget_ProjectsEventsset_ProjectsEventsTextDocumentKeyPressEvents_TextDocumentKeyPressEventsget_TextDocumentKeyPressEventsset_TextDocumentKeyPressEventsCodeModelEvents_CodeModelEventsget_CodeModelEventsset_CodeModelEventsDebuggerProcessEvents_DebuggerProcessEventsget_DebuggerProcessEventsset_DebuggerProcessEventsDebuggerExpressionEvaluationEvents_DebuggerExpressionEvaluationEventsget_DebuggerExpressionEvaluationEventsset_DebuggerExpressionEvaluationEventsSolutionItemsEventsMiscFilesEventsMakeAddinFromMacroProjProjectCopyReferencesobjProjectDestobjProjectSrcCodeFunctionIsMacroCallableFunctioncodeFuncSaveViewLoadViewTurnOnLineNumbersTurnOffLineNumbersTurnOnWordWrapTurnOffWordWrapListProjProjectItemsListProjAuxprojectItemsleveloutputWinPaneProjectItemOutputItemprojectItemAddClassicComRefFindCaseFindLastTargetFindLineListModifiedDocumentsInsertDocCommentsListMacroSamplesLineOrientedCommentStartdocumentOutputWindowPaneGetOutputWindowPaneNameshowPrepareDefaultFindpromptStepOverAllDumpStacksAddBreakpointToMainRunToNextBreakpointListBreakpointsLastHitBreakpointLastHitListAllBreakpointsDebuggerModeShowCurrentProcessLastBreakReasonAttachToCalcListDebuggedProcessesSupportedLanguagesDetachAllRunToLinelineDumpExpressionexpStrIsDebuggingpassedStringCommentRegionNewCommentLior.ifdefOut Samples.DevStudio6Editor.ifndefOut Samples.DevStudio6Editor.MultiplePastes Samples.DevStudio6Editor.OneTimeInclude Samples.DevStudio6Editor.PrintAllOpenDocuments Samples.DevStudio6Editor.ToggleCommentStyle Samples.Utilities.AddClassicComRef Samples.Utilities.FindCase Samples.Utilities.FindLastTarget Samples.Utilities.FindLine Samples.Utilities.InsertDocComments Samples.Utilities.ListMacroSamples Samples.Utilities.ListModifiedDocuments Samples.Utilities.ListProj Samples.Utilities.LoadView Samples.Utilities.SaveView Samples.Utilities.TurnOffLineNumbers Samples.Utilities.TurnOffWordWrap Samples.Utilities.TurnOnLineNumbers Samples.Utilities.TurnOnWordWrap Samples.VSEditor.BeginningOfFunction Samples.VSEditor.CenterScreen Samples.VSEditor.CommentRegion Samples.VSEditor.CountOccurrences Samples.VSEditor.DoForWholeFile Samples.VSEditor.EmacsStyleIndentLine Samples.VSEditor.FillCommentParagraph Samples.VSEditor.FixLineEnds Samples.VSEditor.InsertDate Samples.VSEditor.InsertTime Samples.VSEditor.InsertTimeDate Samples.VSEditor.LineEmUp Samples.VSEditor.LineToTop Samples.VSEditor.ListMatchingLines Samples.VSEditor.ListNonMatchingLines Samples.VSEditor.NewCommentLine Samples.VSEditor.OneFunctionView Samples.VSEditor.OutlineCode Samples.VSEditor.PrintItemsInSelectedProject Samples.VSEditor.PrintNumberedLines Samples.VSEditor.SaveBackup Samples.VSEditor.SetFillColumn Samples.VSEditor.TopOfBlock Samples.MakeAddin.MakeAddinFromMacroProj Samples.VSDebugger.AddBreakpointToMain Samples.VSDebugger.AttachToCalc Samples.VSDebugger.BreakpointLastHit Samples.VSDebugger.DebuggerMode Samples.VSDebugger.DetachAll Samples.VSDebugger.DumpExpression Samples.VSDebugger.DumpStacks Samples.VSDebugger.LastBreakReason Samples.VSDebugger.ListAllBreakpoints Samples.VSDebugger.ListBreakpointsLastHit Samples.VSDebugger.ListDebuggedProcesses Samples.VSDebugger.RunToLine Samples.VSDebugger.RunToNextBreakpoint Samples.VSDebugger.ShowCurrentProcess Samples.VSDebugger.StepOverAll Samples.VSDebugger.SupportedLanguages Samples.AddDirAsSlnFolder.GenerateSlnFolderOnDirStructure Samples.Accessibility.DecreaseTextEditorFontSize Samples.Accessibility.IncreaseTextEditorFontSize Samples.Accessibility.MaximizeToolWindowsInEnvironment Samples.Accessibility.ToggleTextEditorGrayScale Samples.Accessibility.UpdateTextEditorFontSizeToMatchDisplayProperties Samples.DevStudio6Editor.AddFunctionDescription Samples.DevStudio6Editor.AddRevisionMarks Samples.DevStudio6Editor.AutoCompleteFromFile Samples.DevStudio6Editor.CloseExceptActive Samples.DevStudio6Editor.CommentOut Samples.DevStudio6Editor.ifdefOut Samples.DevStudio6Editor.ifndefOut Samples.DevStudio6Editor.MultiplePastes Samples.DevStudio6Editor.OneTimeInclude Samples.DevStudio6Editor.PrintAllOpenDocuments Samples.DevStudio6Editor.ToggleCommentStyle Samples.Utilities.AddClassicComRef Samples.Utilities.FindCase Samples.Utilities.FindLastTarget Samples.Utilities.FindLine Samples.Utilities.InsertDocComments Samples.Utilities.ListMacroSamples Samples.Utilities.ListModifiedDocuments Samples.Utilities.ListProj Samples.Utilities.LoadView Samples.Utilities.SaveView Samples.Utilities.TurnOffLineNumbers Samples.Utilities.TurnOffWordWrap Samples.Utilities.TurnOnLineNumbers Samples.Utilities.TurnOnWordWrap Samples.VSEditor.BeginningOfFunction Samples.VSEditor.CenterScreen Samples.VSEditor.CommentRegion Samples.VSEditor.CountOccurrences Samples.VSEditor.DoForWholeFile Samples.VSEditor.EmacsStyleIndentLine Samples.VSEditor.FillCommentParagraph Samples.VSEditor.FixLineEnds Samples.VSEditor.InsertDate Samples.VSEditor.InsertTime Samples.VSEditor.InsertTimeDate Samples.VSEditor.LineEmUp Samples.VSEditor.LineToTop Samples.VSEditor.ListMatchingLines Samples.VSEditor.ListNonMatchingLines Samples.VSEditor.NewCommentLine Samples.VSEditor.OneFunctionView Samples.VSEditor.OutlineCode Samples.VSEditor.PrintItemsInSelectedProject Samples.VSEditor.PrintNumberedLines Samples.VSEditor.SaveBackup Samples.VSEditor.SetFillColumn Samples.VSEditor.TopOfBlock Samples.MakeAddin.MakeAddinFromMacroProj Samples.VSDebugger.AddBreakpointToMain Samples.VSDebugger.AttachToCalc Samples.VSDebugger.BreakpointLastHit Samples.VSDebugger.DebuggerMode Samples.VSDebugger.DetachAll Samples.VSDebugger.DumpExpression Samples.VSDebugger.DumpStacks Samples.VSDebugger.LastBreakReason Samples.VSDebugger.ListAllBreakpoints Samples.VSDebugger.ListBreakpointsLastHit Samples.VSDebugger.ListDebuggedProcesses Samples.VSDebugger.RunToLine Samples.VSDebugger.RunToNextBreakpoint Samples.VSDebugger.ShowCurrentProcess Samples.VSDebugger.StepOverAll Samples.VSDebugger.SupportedLanguages Samples.AddDirAsSlnFolder.GenerateSlnFolderOnDirStructure Samples.Accessibility.DecreaseTextEditorFontSize Samples.Accessibility.IncreaseTextEditorFontSize Samples.Accessibility.MaximizeToolWindowsInEnvironment Samples.Accessibility.ToggleTextEditorGrayScale Samples.Accessibility.UpdateTextEditorFontSizeToMatchDisplayProperties Samples.DevStudio6Editor.AddFunctionDescription Samples.DevStudio6Editor.AddRevisionMarks Samples.DevStudio6Editor.AutoCompleteFromFile Samples.DevStudio6Editor.CloseExceptActive neSaveBackupOneFunctionViewBeginningOfFunctionLineToTopEmacsStyleIndentLineTopOfBlockEditPointIndentLeveleditPointSkipSpaceRightOutlineCodeCodeElementCodeElementsCollapseEltelteltslocCenterScreenPrintNumberedLinesDoForWholeFileLineEmUpFixLineEndsSetFillColumnfillColumnFillCommentParagraphIsOnNonEmptyCommentLinelinePrefixGetCommentLinePrefixMoveWordRightMoveWordLeftIsWhitespaceListMatchingLinesListNonMatchingLinesCountOccurrencesInsertTimeInsertDateInsertTimeDateIsPrintableFileprojItemPrintItemsInSelectedProjectprojItemsSystem.ComponentModelEditorBrowsableAttributeEditorBrowsableStateSystem.CodeDom.CompilerGeneratedCodeAttributeSystem.DiagnosticsDebuggerNonUserCodeAttributeDebuggerHiddenAttributeStandardModuleAttributeHideModuleNameAttributeSystem.ComponentModel.DesignHelpKeywordAttributeSystem.Runtime.CompilerServicesRuntimeHelpersGetObjectValueRuntimeTypeHandleGetTypeFromHandleActivatorCreateInstanceMyGroupCollectionAttributeget_Valueset_ValueSystem.Runtime.InteropServicesComVisibleAttributeSystem.ThreadingThreadget_CurrentThreadAbortMarshalIsComObjectReleaseComObjectExceptionProjectDataSetProjectErrorClearProjectErrorContextStaticAttributeIntPtrset_VBHostZeroGetEventSourceInstanceGetGlobalInstanceConvertToUInt32System.DrawingFontPropertyPropertiesSystemInformationget_MenuFontGetHeightMathRoundget_PropertiesItemInt32OperatorsAddObjectConditionalCompareObjectGreaterEqualSubtractObjectMicrosoft.Win32RegistryKeyFontsAndColorsItemsColorableItemsSystem.CollectionsIEnumeratorRegistryCurrentUserget_RegistryRootOpenSubKeyCreateSubKeySetValueGetValueConversionsToBooleanget_ObjectGetEnumeratorget_Currentget_NameStringConcatUInt32Parseset_Backgroundset_ForegroundMoveNextIDisposableDisposeget_Backgroundget_ForegroundWindowWindowsget_Windowsget_Documentget_AutoHidesset_AutoHidesset_LinkableSystem.IOPathGetExtensionToLowerGetFileNameContainsDirectoryGetDirectoriesGetFilesget_Parentget_ProjectItemsAddFromFilevsSaveChangesCloseOutputStringAddSolutionFolderSolution2IsNullOrEmptyInteractionInputBoxExistsMsgBoxResultMsgBoxStyleMsgBoxClearAddSolutionget_SolutionDocumentsget_DocumentsPrintOutToIntegerget_ActiveDocumentget_SelectionNewLateBindingLateCallLateSetComplexget_ActiveWindowvsWindowTypeget_TypeLateGetConcatenateObjectObjectFlowControlForLoopControlForLoopInitObjBooleanForNextCheckObjStringsCompareMethodInStrLenMidLCaseCompareStringget_LanguageTextSelectionget_TextCompareObjectGreaterCompareObjectLessAndObjectTrimLeftRightDeleteset_Textget_Countget_FullNameLTrimSelectLineConditionalCompareObjectEqualConditionalCompareObjectGreaterConditionalCompareObjectLessDateAndTimeDateTimeget_NowCompareObjectEqualCompareObjectNotEqualUCaseStartOfDocumentget_TopLineget_CurrentColumnWordRightWordLeftCancelFindTextget_CurrentLineCharRightMoveToLineAndOffsetAccessedThroughPropertyAttributeTextDocumentFileCodeModelget_ActiveSolutionProjectsLateIndexGetget_FileCodeModelget_CodeElementsCodeTypeget_Membersget_MacrosIDE_SolutionProjectsget_ProjectsOpenTextPointget_StartPointCreateEditPointget_EndPointGetTextItemOperationsget_ItemOperationsAddNewItemSelectAllInsertvsCMPartGetStartPointMoveToPointEndOfLinevsCMElementget_KindGetEndPointSmartFormatCollapseVSLangProjReferencesReferenceIEnumerableget_PathCodeParametervsCMAccessget_Accessget_ParametersStartsWithCodeTypeRefvsCMTypeRefget_TypeKindWindowConfigurationsget_WindowConfigurationsWindowConfigurationApplyget_Collectionget_FileNamesFileDialogVSProjectOpenFileDialogEnvironmentget_SystemDirectoryset_InitialDirectoryset_Filterset_FilterIndexset_TitleCommonDialogDialogResultShowDialogget_FileNameget_CurrentDirectoryLocalMachineFileSystemChDirAppWinStyleShellset_FileNameget_CheckFileExistsget_Referencesget_MessageExecuteCommandFindget_Findset_MatchCaseget_FindWhatset_FindWhatCharLeftget_Savedget_ProjectItemCodeNamespaceget_Lengthget_CharsUndoContextget_UndoContextLineUpUIHierarchyItemUIHierarchyGetItemUIHierarchyItemsget_UIHierarchyItemsset_ExpandedEndsWithOutputWindowset_VisibleOutputWindowPanesget_OutputWindowPanesActivateset_MatchWholeWordvsFindActionset_ActionvsFindTargetset_Targetset_Backwardsset_MatchInHiddenTextvsFindPatternSyntaxset_PatternSyntaxget_MainWindowget_HWndDebuggerget_DebuggerStepOverdbgDebugModeget_CurrentModeCommandWindowStackFrameExpressionProgramget_CurrentProgramThreadsget_Threadsget_IDConversionStrStackFramesget_StackFramesget_ModuleInStrRevget_FunctionNameExpressionsget_ArgumentsBreakpointBreakpointsget_BreakpointsdbgBreakpointConditionTypedbgHitCountTypeset_TagGoget_BreakpointLastHitget_Tagset_Enabledget_AllBreakpointsLastHitProcessget_CurrentProcessget_ProcessIDdbgEventReasonget_LastBreakReasonProcessesget_LocalProcessesAttachget_DebuggedProcessesLanguageLanguagesget_LanguagesCreateProjectErrorValGotoLineRunToCursorGetExpressionget_IsValidValueget_DataMembersVirtualPointget_TopPointget_BottomPointget_LineLineDownStartOfLineNewLineNewFileChangeTypevsSaveStatusSaveget_ActivePointget_CodeElementOutlineSectionEndOfDocumentSystem.ReflectionMissingValuevsPaneShowHowTryToShowToLongBeepget_LineCharOffsetget_LineLengthget_DisplayColumnget_IsCodeTypeLessThanCopyPasteget_BottomLinevsStartOfLineOptionsTextPaneget_AnchorPointInt64vsWhitespaceOptionsDeleteWhitespacePadToColumnNotObjectGlobalsget_Globalsset_VariableValueget_VariableExistsget_VariableValueIndexOfCharTrimStartToCharIsPunctuationIsWhiteSpacevsFindResultFind2set_WaitForFindToCompleteExecuteStatusBarget_StatusBarEqualToToLongTimeStringToLongDateStringAddRangeConditionalCompareObjectNotEqualget_IsOpenDebuggableAttributeDebuggingModesCompilationRelaxationsAttributeRuntimeCompatibilityAttributeVsaModuleVBAssembly#EnvironmentEventsDTEEventsDocumentEventsWindowEventsTaskListEventsFindEvents%OutputWindowEventsSelectionEvents'SolutionItemsEventsMiscFilesEventsDebuggerEventsDTEFontsAndColorsTextEditorFontSizeAccessibility+TextEditorInGrayScale'FontsAndColorsItems_BG_FGOAdd directory as solution folder reportThe item "U"may have not been added to the solution. ?Enter the folder path to importOThe specified folder could not be foundIThe path entered could not be found .obj .ilk .pch .pdb .exe .dll .sbr .lib .exp .bsc .tlb .ncb .sln .suo.vcproj.vbproj.csproj.vjsproj .msiEEnter the number of times to paste paste LineUpLineDown text This macro can only be run when a text editor window is active./**/ <!--  --> '  ; TopLineBottomLineGotoLineSelectLine+Unable to comment out the highlighted text because the file type was unrecognized. If the file has not yet been saved, please save it and try again...rc .rc2 C/C++ JavaODL/IDLHTML - IE 3.0 .xml'HTML 2.0 (RFC 1866)VBS Macro .def//]This macro does not work on this type of file. ... TextStartOfDocument KCould not find a closing comment mark <!----> 'Rem;iUnable to add revision marks. Unrecognized file typeStartOfLineI*********************************** ) REVISION LOG ENTRY  Revision By:  Revised on  Comments: ... G*********************************** CSharp(), (- // Function name : W// Description : // Return type : +// Argument : It is possible that the function you are trying to work with has a syntax error.You need to have an active C/C++ document open with the function prototype selected.azAZ09_#ifndef #ifdef This macro only works on .c, .cpp, .cxx, .h, .hpp, or .hxx filesWhat should the control variable be? Example: #ifdef ControlVariable- out a section of code"" is not a valid C identifier. please re-run the macro with a valid C identifier  #endif //The file you are working with does not have a file extension. Are you sure this is a C/C++ header file?#nofilenamegiven.h.h .hpp__mWhat should the control variable be? Example: #ifdef EOne time header include protection #define EndOfDocument is not a valid c identifier. please re-run the macro with a valid C identifier]This macro can only be run on .h or .hpp files[^a-zA-Z0-9]Connect.vbConnect ExecQueryStatusOnConnectionMCould not find the proper items in the project. To use this macro run the Add-in wizard, select VB as the programming language and select to create a Tools Menu item.+CreateAddinFromMacrosWarning: Running this macro will replace the Exec, QueryStatus, and OnConnection of your Add-in. Do you wish to continue?1Create Addin From Macros}Enter the name of the Macro Project to create an Add-in out ofUCould not find the specified macro project=Make Add-in From Macro ProjectPublic Sub Exec(ByVal commandName As String, ByVal executeOption As vsCommandExecOption, ByRef varIn As Object, ByRef varOut As Object, ByRef handled As Boolean) Implements IDTCommandTarget.Exec ' handled = False If (executeOption = vsCommandExecOption.vsCommandExecOptionDoDefault) Then Public Sub QueryStatus(ByVal commandName As String, ByVal neededText As vsCommandStatusTextWanted, ByRef status As vsCommandStatus, ByRef commandText As Object) Implements IDTCommandTarget.QueryStatus istatus = vsCommandStatus.vsCommandStatusUnsupported If neededText = EnvDTE.vsCommandStatusTextWanted.vsCommandStatusTextWantedNone Then }Public Sub OnConnection(ByVal application As Object, ByVal connectMode As ext_ConnectMode, ByVal addInInst As Object, ByRef custom As System.Array) Implements IDTExtensibility2.OnConnection o_applicationObject = CType(Application, EnvDTE80.DTE2) a_addInInstance = CType(addInInst, EnvDTE.AddIn) kIf connectMode = ext_ConnectMode.ext_cm_UISetup Then aDim objAddIn As AddIn = CType(addInInst, AddIn) 5Dim CommandObj As Command CDim objCommandBar As CommandBar 'If your command no longer appears on the appropriate command bar, or if you would like to re-create the command, ' close all instances of Visual Studio .NET, open a command prompt (MS-DOS window), and run the command 'devenv /setup'. objCommandBar = CType(_applicationObject.Commands.AddCommandBar("", vsCommandBarType.vsCommandBarTypeMenu, _applicationObject.CommandBars.Item("Tools")), Microsoft.VisualStudio.CommandBars.CommandBar) M{7651A701-06E5-11D1-8EBD-00A0C90F26EA}TextDocument3Visual Basic Items\Module.vb%Option Strict Off I public shared DTE as EnvDTE80.DTE2C public Dim DTE as EnvDTE80.DTE2.Connect.%If commandName = "" Then handled = True 5.DTE = _applicationObject () !Exit Sub End If "Then status = CType(vsCommandStatus.vsCommandStatusEnabled + vsCommandStatus.vsCommandStatusSupported, vsCommandStatus) End If CommandObj = _applicationObject.Commands.AddNamedCommand(objAddIn, " ", "", "TODO: Enter your command description", True, 59, Nothing, 1 + 2) '1+2 == vsCommandStatusSupported+vsCommandStatusEnabled KCommandObj.AddControl(objCommandBar) End If End Sub  End If End Sub Else 'If you are not using events, you may wish to remove some of these to increase performance. EnvironmentEvents.DTEEvents = CType(_applicationObject.Events.DTEEvents, EnvDTE.DTEEvents) EnvironmentEvents.DocumentEvents = CType(_applicationObject.Events.DocumentEvents(Nothing), EnvDTE.DocumentEvents) EnvironmentEvents.WindowEvents = CType(_applicationObject.Events.WindowEvents(Nothing), EnvDTE.WindowEvents) EnvironmentEvents.TaskListEvents = CType(_applicationObject.Events.TaskListEvents(""), EnvDTE.TaskListEvents) EnvironmentEvents.FindEvents = CType(_applicationObject.Events.FindEvents, EnvDTE.FindEvents) EnvironmentEvents.OutputWindowEvents = CType(_applicationObject.Events.OutputWindowEvents(""), EnvDTE.OutputWindowEvents) EnvironmentEvents.SelectionEvents = CType(_applicationObject.Events.SelectionEvents, EnvDTE.SelectionEvents) EnvironmentEvents.SolutionItemsEvents = CType(_applicationObject.Events.SolutionItemsEvents, EnvDTE.ProjectItemsEvents) EnvironmentEvents.MiscFilesEvents = CType(_applicationObject.Events.MiscFilesEvents, EnvDTE.ProjectItemsEvents) EnvironmentEvents.DebuggerEvents = CType(_applicationObject.Events.DebuggerEvents, EnvDTE.DebuggerEvents) End If End SubReferencesAdd1System.Windows.Forms.dll9Add-in generation complete To make sure your Add-in compiles, you need to perform two actions: 1) If you had any modules with an 'Option Explicit', a duplicate will appear in the generated module. You need to remove the duplicate. e2) Any calls to automation methods/properties not prepended with 'DTE.' will need to have these manually added (for example, change 'ActiveDocument()' to 'DTE.ActiveDocument()'). EnvDTEEnvDTE80EMicrosoft.VisualStudio.CommandBars;Could not add a reference to C Try adding a reference manually.Optional GEnter the name you want to save as:%Save window layoutCEmpty string, enter a valid name.WWhich window layout would you like to load?%Load Window LayoutQEmpty string, enter a window layout name BasicShowLineNumbersPlainText HTMLVisual JSharpXMLWordWrapM{28836128-FC2C-11D2-A433-00C04F72D18A}List Project ClearOutputString \Type Libraries (*.tlb)|*.tlb|DLLs (*.dll)|*.dll|All files (*.*)|*.*+Open COM type librarydevenv.exe#PublicAssemblies\Asoftware\microsoft\.NetFramework%SDKInstallRootv2.0bin_Unable to get tlbimp.exe location from registry'cmd /c tlbimp.exe "" /out:"Please enter the project to add the reference to (entering nothing or canceling will default to the first project in the solution)AddComReferenceUWas unable to grab Macros solution projectCWas unable to create COM+ wrapper?Was unable to add the referenceEdit.Find%Modified Documents clear members itemDidn't find a type definition as first thing in file or find a namespace as the first thing with a type inside the namespace.'Insert Doc Comments<summary>Summary of </summary><param name=></param>M{07CD18B4-3BA1-11D2-890A-0060083196C6}Macros\SamplesList Macros.cs .cpp .idl .jsl-Unrecognized file type. You can add this file type by modifying the function Utilities.LineOrientedCommentStart to include the extension of this file.M{34E76E81-EE4A-11D0-AE2E-00A0C90FFFC3}SNo program is currently being debugged. #Current Program:  Thread ( ) , = : ) mainSetByMacro+Hit tagged breakpoint/Hit untagged breakpointProgram endedDebugger/No breakpoints were hit/No breakpoint was hit 1No breakpoints are set Break Mode Design Mode Run Mode 9No process is being debugged!Breakpoint hit No reason OException not handled by the debuggee %Exception thrown calc.exe/calc.exe is not runningENo processes are being debugged. Process: [] YDebugger supports the following languages: ICould