VB如何寫函式(重大錯誤修正)

今天要敎大家的是如何自己寫函式

首先大家必須要先知道函式的語法規格,另外你必須把自製函式放在程式最下方

語法格式:

Function 函式名稱(Byval 參數 As 參數型別,Byval 參數 As 參數型別)

函式名稱=執行的內容

End Function

簡單的講解一下吧,函式名稱那裡隨便你定,不需要用雙引號框住

而參數那裡可以有也可以沒有,看你的函式性質,如果是需要傳入值的就要設定

至於可以設定幾個參數偶也不知,不過每個參數中間都要用, 隔開

還有你的執行內容不一定要=函式名稱

只是每個函式都必須要有傳回值

沒有傳回值的函式會錯誤

———————舉例———————-

以下是一個可以判斷輸入數字是否大於20的函式

 Public Function linroex(Byval x as object)as object

if x > 20 then

linroex = true

else

linroex = false

end if

End Function

再來是敎各位如何引用自己做好的函式

引用格式如下:

變數名稱=函式名稱(參數1,參數2)

當然你也可以直接引用,變成“函式名稱(參數1,參數2)”

或是將它放進其他函式中

 

例如放進msgbox函式的話是

msgbox(函式名稱(參數1,參數2))

以剛剛舉例的那個函式來講

——————————————-

dim x

x = linroex(11)

msgbox(x)

——————————————-

則x=false

或是直接放進msgbox裡的話會變成

msgbox(linroex(12))

這樣大家看的懂了嗎?

覺得文章不錯就按一下推吧,不懂的話可以留言問我

在〈VB如何寫函式(重大錯誤修正)〉中有 6 則留言

  1. As Object最好定義清楚,程式比較不會出錯
    例如:
    As Integer 或 As String

  2. Public Function linroex(Byval x As Integer)As Boolean
    If Val(x) > 20 Then
    Return True
    Else
    Return False
    End If
    End Function

    俗話說 入境隨俗嘛!
    Do in Rome as the Romans do.

發佈留言

發佈留言必須填寫的電子郵件地址不會公開。 必填欄位標示為 *

這個網站採用 Akismet 服務減少垃圾留言。進一步了解 Akismet 如何處理網站訪客的留言資料