<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)航:
     
    主站蜘蛛池模板: 狼色精品人妻在线视频免费| 免费在线观看亚洲| 久久狠狠躁免费观看| 永久免费精品影视网站| 国产亚洲午夜精品| 理论秋霞在线看免费| 日本一区二区三区免费高清在线| 日韩色日韩视频亚洲网站| 久久久久久久久无码精品亚洲日韩 | 国产天堂亚洲精品| 99亚洲乱人伦aⅴ精品| 黄色免费网址在线观看| 一级A毛片免费观看久久精品| 特级aa**毛片免费观看| 九九综合VA免费看| 国产大片免费天天看| 成在线人视频免费视频| 嫩草在线视频www免费观看| 久久久久久国产精品免费免费男同| 日本中文字幕免费高清视频| 日韩人妻一区二区三区免费| 精品无码人妻一区二区免费蜜桃| 最近免费中文字幕大全免费版视频 | 在线精品自拍亚洲第一区| 免费播放美女一级毛片| 窝窝影视午夜看片免费| 99re6在线视频精品免费| 久久永久免费人妻精品下载| 精品熟女少妇a∨免费久久| 无遮免费网站在线入口| 四虎影视免费在线| 亚洲七七久久精品中文国产| 亚洲精品无码成人片久久 | 日韩a级毛片免费观看| 亚洲日韩人妻第一页| 亚洲AV无码久久精品蜜桃| 亚洲午夜国产精品无卡| 国产精品亚洲综合| 在线成人精品国产区免费| 免费观看AV片在线播放| 免费一级大黄特色大片|