如何将Option Strict的设置保持为On(Add-In技术)

如何将Option Strict的设置保持为On(Add-In技术)

SM的专访中，Dan Appleman提到：“我希望Visual Studio 项目能够在缺省状态下将Option Strict设置为On，而无需用手工编辑向导模板。”可能很多程序员都会认同Dan的观点-- 在VB.NET实现中，将Option Strict off设置成缺省状态是Mircosoft一大错举。但事实上你不必非得按照Microsoft的这一设定。在以下这个技巧中，我会介绍如何建立一个自动将Option Strict设置为On的add-in方法（用这个方法你可能都会忘记如何使用手动添加了）。

第一步是通过使用Add-in Wizard来建立一个新的Visual Studio add-in 项目，并将其命名为VBOptionStrictOn。当向导建好了这个add-in 并打开了Connect.vb模块的代码窗口之后，你可以在这个Connect类中声明两个类级（class-level） 变量。你需要将向导定义的这两个变量：Dim applicationObject As EnvDTE.DTE

Dim addInInstance as EnvDTE.AddIn

用以下两个变量声明来取代：Private _app As EnvDTE.DTE

Private WithEvents _SolutionEvents As SolutionEvents

接下来，在public OnConnection 的事件处理（event handler）中将向导生成的代码：applicationObject = CType(application, EnvDTE.DTE)

addInInstance = CType(addInInst, EnvDTE.AddIn)

用以下两个给变量赋值的语句来取代：_app = CType(application, EnvDTE.DTE)

_SolutionEvents = _app.Events.SolutionEvents