<rt id="bn8ez"></rt>
<label id="bn8ez"></label>

  • <span id="bn8ez"></span>

    <label id="bn8ez"><meter id="bn8ez"></meter></label>

    Jcat
    寵辱不驚,閑看庭前花開花落~~
    posts - 173,comments - 67,trackbacks - 0
    Options
    Option Explicit

    You must explicitly define each variable that you use.

    Option Private Module
    You can force all procedures in a module to be private - even those declared with the Public keyword.
    You can omit the Private keyword from your Sub declarations.

    Option Base [01]
    The lower bound of an array, created using the Array function, is determined by Option Base statement at the top of the module. The default lower bound is 0


    Declaring Variables
    Dim ?變量? As ? String
    變量?
    = ? " initialization "

    Const ?常量? As ? String ? = ? " initialization "

    Dim ?定長字符串? As ? String ? * ? 10
    定長字符串?
    = ? " 超過ten個無效(中文英文都算1個,看來編碼用的unicode) "



    Executing Sub from another Procedure
    Option ? Explicit


    Sub ?executingWay()
    ??? add?
    " flame " ,? 1 ,? 2

    ??? Call ?add( " call " ,? 1 ,? 2 )

    ??? Dim ?subName? As ? String :?subName? = ? " add "
    ??? Run?subName,?
    " run " ,? 1 ,? 2
    End?Sub


    Sub ?add(exeBy? As ? String ,?x? As ? Integer ,?y? As ? Integer )
    ??? MsgBox ?exeBy? & ? " :? " ? & ?(x? + ?y)
    End?Sub


    Executing Function from another Procedure
    Option ? Explicit

    Function ?executingWay()
    ??? Debug.Print?add(
    " flame " ,? 1 ,? 2 )

    ??? Dim ?funcName??? As ? String :?funcName? = ? " add "
    ??? Debug.Print?Run(funcName,?
    " run " ,? 1 ,? 2 )
    End?Function


    Function ?add(exeBy? As ? String ,?x? As ? Integer ,?y? As ? Integer )? As ? String
    ??? add?
    = ?exeBy? & ? " :? " ? & ?(x? + ?y)
    End?Function

    posted on 2008-03-20 11:16 Jcat 閱讀(227) 評論(0)  編輯  收藏 所屬分類: VBA

    只有注冊用戶登錄后才能發表評論。


    網站導航:
     
    主站蜘蛛池模板: 日韩亚洲AV无码一区二区不卡| 亚洲人成网站免费播放| 亚洲国产精品成人| 国产产在线精品亚洲AAVV| 免费大黄网站在线看| 日韩精品免费一线在线观看| 国产99视频精品免费视频7| 黄网站在线播放视频免费观看| 免费在线观看你懂的| 好男人资源在线WWW免费| 亚洲av午夜福利精品一区人妖| 久久午夜羞羞影院免费观看| 中文字幕在线观看亚洲| 久久久久国色AV免费看图片| 亚洲综合成人婷婷五月网址| 色播在线永久免费视频| 一个人看的在线免费视频| 亚洲AV无码乱码国产麻豆穿越| 人妻无码一区二区三区免费| 亚洲最大成人网色香蕉| 国产三级免费观看| 国产特黄一级一片免费 | 亚洲人成网站在线观看青青| 插鸡网站在线播放免费观看| 亚洲男人第一av网站| 成人午夜大片免费7777| 特级毛片aaaa免费观看| 午夜亚洲www湿好大| 免费黄网在线观看| 中国一级特黄的片子免费| 亚洲精品无码久久久久久久| 青青草国产免费久久久91| 99视频在线观看免费| 国产精品亚洲自在线播放页码| 亚洲精品国产精品乱码不卡| 99re免费99re在线视频手机版| 亚洲日本成本人观看| 亚洲成av人在线视| 国产精品极品美女免费观看| 日本中文字幕免费高清视频| 久久精品亚洲日本波多野结衣|