none
[VB2010] 關於程式宣告的選項問題 問題 RRS feed

  • 問題

  • HI~

    如果我在製作了一個叫prfu的模組

       Public Function PrFu(ByVal ProcName As String)

    在主程式使用時,如果我打上prfu("ABC")時,

    (1)怎樣可以在輸入abc時作出額外提示?

    (2)如果ProcName限制是 String,能否限制只能輸入 "lesson1","lesson2"等等字眼?

    2013年6月1日 上午 10:42

解答

  • 您好,

    如果要限制某些值的話,建議您可使用 enum 哦!

    PrFu(Lessons.lesson2)

    Public Enum Lessons lesson1 = 1 lesson2 = 2 End Enum Public Sub PrFu(ByVal ProcName As Lessons) MsgBox(ProcName.ToString)

    '.... method other logic.... End Sub

    or .....

    Public Function PrFunEx(ByVal ProcName As Lessons) as String

    'Method Other logic......

    Return ProcName.ToString

    End Function



    亂馬客blog: http://www.dotblogs.com.tw/rainmaker/




    • 已提議為解答 KKBruceMVP 2013年6月1日 下午 06:26
    • 已標示為解答 CarbonDiarox 2013年6月3日 上午 11:31
    • 已編輯 亂馬客 2013年6月4日 上午 01:29
    2013年6月1日 上午 11:57
  • 你可以試著在 Public 上面一行 打入 ''' (三個單引號)按下 Enter

    VS2008 以後都會自動帶入註解輸入規格,把空格填進去,在其他副程式打的時候,就會自動提示。


    T.L. Cheng


    2013年6月1日 下午 12:52
    版主

所有回覆

  • 您好,

    如果要限制某些值的話,建議您可使用 enum 哦!

    PrFu(Lessons.lesson2)

    Public Enum Lessons lesson1 = 1 lesson2 = 2 End Enum Public Sub PrFu(ByVal ProcName As Lessons) MsgBox(ProcName.ToString)

    '.... method other logic.... End Sub

    or .....

    Public Function PrFunEx(ByVal ProcName As Lessons) as String

    'Method Other logic......

    Return ProcName.ToString

    End Function



    亂馬客blog: http://www.dotblogs.com.tw/rainmaker/




    • 已提議為解答 KKBruceMVP 2013年6月1日 下午 06:26
    • 已標示為解答 CarbonDiarox 2013年6月3日 上午 11:31
    • 已編輯 亂馬客 2013年6月4日 上午 01:29
    2013年6月1日 上午 11:57
  • 你可以試著在 Public 上面一行 打入 ''' (三個單引號)按下 Enter

    VS2008 以後都會自動帶入註解輸入規格,把空格填進去,在其他副程式打的時候,就會自動提示。


    T.L. Cheng


    2013年6月1日 下午 12:52
    版主
  • 宣告成 Function 卻沒宣告回傳型別還滿奇怪的.

    在現實生活中,你和誰在一起的確很重要,甚至能改變你的成長軌跡,決定你的人生成敗。 和什麼樣的人在一起,就會有什麼樣的人生。 和勤奮的人在一起,你不會懶惰; 和積極的人在一起,你不會消沈; 與智者同行,你會不同凡響; 與高人為伍,你能登上巔峰。

    2013年6月2日 上午 02:05
    版主
  • 所以,prfu如果沒傳回值,就不用funtion了?

    2013年6月3日 上午 11:31
  • Sorry,

    小弟只是示意,造成困擾,Sorry!

    在VB中有回傳值用function ,沒回傳值用 Sub!

    再次Sorry!


    亂馬客blog: http://www.dotblogs.com.tw/rainmaker/

    2013年6月3日 下午 01:15
  • 被毒害後,我個人無傳回值也喜歡用 function ...
    2013年6月3日 下午 02:28
  • 用sub 會比 function 快?
    2013年6月5日 下午 02:33
  • 因為我習慣用 option strict on , 所有啟用這個選項不允許的方式通常我都不用.

    在現實生活中,你和誰在一起的確很重要,甚至能改變你的成長軌跡,決定你的人生成敗。 和什麼樣的人在一起,就會有什麼樣的人生。 和勤奮的人在一起,你不會懶惰; 和積極的人在一起,你不會消沈; 與智者同行,你會不同凡響; 與高人為伍,你能登上巔峰。

    2013年6月6日 上午 03:42
    版主