<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 閱讀(235) 評論(0)  編輯  收藏 所屬分類: VBA

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


    網(wǎng)站導(dǎo)航:
     
    主站蜘蛛池模板: 久久精品国产亚洲Aⅴ蜜臀色欲| h视频在线免费看| 国产免费观看视频| 亚洲国产成人AV在线播放| 青苹果乐园免费高清在线| 亚洲av日韩av无码av| 免费毛片a在线观看67194| 亚洲中文字幕一二三四区苍井空 | 亚洲国产成人资源在线软件 | 另类专区另类专区亚洲| 免费高清小黄站在线观看 | 亚洲?v无码国产在丝袜线观看| 色噜噜噜噜亚洲第一| 免费人妻av无码专区| 一级毛片免费在线播放| 国产亚洲精品福利在线无卡一| 国产精品美女免费视频观看| 亚洲五月综合缴情在线观看| 另类免费视频一区二区在线观看| 色婷婷六月亚洲婷婷丁香| 久久精品免费一区二区| 中文字幕亚洲综合小综合在线| 日韩在线免费看网站| 人碰人碰人成人免费视频| 亚洲情综合五月天| 免费国产污网站在线观看15| 亚洲videos| 四虎免费久久影院| 免费黄网站在线看| 亚洲永久在线观看| 亚洲精品老司机在线观看| 野花香高清在线观看视频播放免费| 亚洲成人动漫在线观看| 日韩在线免费看网站| 中文在线观看国语高清免费| 亚洲精品国产情侣av在线| 在线免费观看中文字幕| 青青久在线视频免费观看 | 九九99热免费最新版| 亚洲国产精品婷婷久久| 日本高清免费网站|