<dfn id="is4kg"></dfn>
  • <ul id="is4kg"></ul>
  • <abbr id="is4kg"></abbr>
  • <ul id="is4kg"></ul>
    <bdo id="is4kg"></bdo>

    曙海教育集團論壇開發語言培訓專區VB語言 → 如何將Option Strict的設置保持為On(Add-In技術)-.NET教程,VB.Net語言


      共有7391人關注過本帖樹形打印

    主題:如何將Option Strict的設置保持為On(Add-In技術)-.NET教程,VB.Net語言

    美女呀,離線,留言給我吧!
    wangxinxin
      1樓 個性首頁 | 博客 | 信息 | 搜索 | 郵箱 | 主頁 | UC


    加好友 發短信
    等級:青蜂俠 帖子:1393 積分:14038 威望:0 精華:0 注冊:2010-11-12 11:08:23
    如何將Option Strict的設置保持為On(Add-In技術)-.NET教程,VB.Net語言  發帖心情 Post By:2010-12-14 12:21:55

    在一次vsm的專訪中,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

    然后,在solution explorer中選擇vboptionstricton項目,并通過在add reference 對話框的.net tab里選擇vslangproj assembly來添加一個reference。同時,在connect.vb模塊的代碼頂部加上imports vslangproj語句。 vslangproj assembly提供了名為prjoptionstrict的列舉(enumeration),其中包含optionstrict的可能值(on, off)。

    現在你可以開始將option strict設置成on了。整個add-in 過程包括四個加入到connect類的小的vb.net子過程。add-in過程不需要用戶進行干涉因而無需使用用戶界面。前兩個過程是同一個方法的重載(overload):public sub setoptionstricton()
       dim proj as project
        check and set optionstrict for each project in
        the open solution by calling an overloaded
        version of this sub.
       for each proj in ctype(_app.getobject("vbprojects") _
          , projects)
          call setoptionstricton(proj)
       next
    end sub

    public sub setoptionstricton(byref proj as project)
       dim propoptionstrict as [property]
       with proj
          propoptionstrict = _
             .properties.item("optionstrict")
           if optionstrict not "on"...
          if ctype(propoptionstrict.value, _
             prjoptionstrict) <> _
             prjoptionstrict.prjoptionstricton then

              set opti.
             propoptionstrict.value = _
                prjoptionstrict.prjoptionstricton
             .save() save changes to the project.
          end if
       end with proj
    end sub

    通過使用上述重載,你可以得到兩種方法(用最少的重復代碼):一個將open solution中所有項目的option strict設置成on的不帶參數的方法和另一個將單獨指定項目中的option strict設置成on的帶proj參數的方法。

    接下來建后兩個過程。每個過程各調用一個setoptionstricton方法:private sub _solutionevents_opened() _
       handles _solutionevents.opened
          call setoptionstricton()
       end sub

       private sub _solutionevents_projectadded( _
          byval project as envdte.project) handles _
          _solutionevents.projectadded

          call setoptionstricton(project)
       end sub

    打開visual studio中的一個solution將會觸發第一個事件處理(_solutionevents_opened),激活add-in會確保當前vb項目中的option strict被設置成on。這些項目可能是在你安裝add-in之前就建好的,也可能是從一個沒有裝這個add-in的其他開發者那里拿來的。在將一個新的或是以前建好的項目加入到當前的solution中后會觸發另一個事件處理(_solutionevents_projectadded),當你用項目向導在新建的solution中加入一個項目模板時也會觸發這一事件。這一處理確保在所有新建vb項目中的option strict是on的狀態。

    支持(0中立(0反對(0單帖管理 | 引用 | 回復 回到頂部

    返回版面帖子列表

    如何將Option Strict的設置保持為On(Add-In技術)-.NET教程,VB.Net語言








    簽名
    主站蜘蛛池模板: 大尺度无遮挡h彩漫| 欧美野外多人交3| 国产精品69白浆在线观看免费| 亚洲av永久无码精品古装片| 狠狠亚洲婷婷综合色香五月排名 | 亚洲综合在线视频| 精品综合久久久久久8888| 国产福利一区二区三区在线观看 | 久久亚洲国产成人精品无码区| 法国女人与动zozoz0z0| 国产一区二三区| 97欧美精品激情在线观看最新| 无码人妻精品一区二区三区夜夜嗨| 亚洲视频在线一区二区三区| 精品国产一区在线观看| 国产婷婷成人久久av免费高清| re99热久久这里只有精品| 成人男女网18免费视频| 亚洲av无码片区一区二区三区| 男Ji大巴进入女人的视频| 国产欧美va欧美va香蕉在线| japanese日本熟妇多毛| 无码人妻一区二区三区在线| 亚洲精品乱码久久久久久蜜桃不卡| 羞羞视频在线观看入口| 国产精品福利自产拍在线观看 | 国产白丝丝高跟在线观看| chinese国产在线视频| 小次郎收藏最新地址| 久久久精品中文字幕麻豆发布 | 欧美日在线观看| 免费播看30分钟大片| 精品少妇一区二区三区视频| 国产在线观看免费视频播放器| aa级黄色毛片| 女人18毛片a级毛片| 中文字幕电影资源网站大全| 日本一在线中文字幕天堂| 亚洲av无码片一区二区三区| 欧美xxxx极品| 伊人情人综合网|