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

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


          網站導航:
           
          主站蜘蛛池模板: 新野县| 宝丰县| 北碚区| 鹿泉市| 余庆县| 岳西县| 洛扎县| 怀远县| 江门市| 温宿县| 合水县| 中宁县| 海伦市| 佛教| 罗城| 丰宁| 阿鲁科尔沁旗| 潼关县| 公安县| 丹江口市| 尉氏县| 芜湖县| 伽师县| 日照市| 日土县| 牙克石市| 凉山| 永春县| 渝中区| 阿拉善右旗| 湛江市| 凤庆县| 阳原县| 沙洋县| 水城县| 拉萨市| 佛坪县| 兰州市| 象州县| 易门县| 衡阳市|