跳轉至內容

Gambas/子例程

來自 Wikibooks,一個開放世界的開放圖書

Gambas 中的子例程是一段作為塊儲存的程式碼,可在程式中的很多部分使用。您不必重複編寫它。例程可以根據其返回型別返回一個值。例如,我們可以返回一個字串或整數。讓我們檢查下面的示例

 Public Sub Multiplying() As String
   Dim n, v1, v2 As Integer 
   Dim res As String
   n = 4 'multiplied by 9
   v1 = (n - 1) '3
   v2 = (10 - n) '6
   res = v1 & v2 'result 36
   Print res '4*9=36
   Return "9*" & n & "=" & res
 End

稍後我們可以在主程式中使用該子例程,如下所示

 Public Sub Form_Open()
   Message.Info(Multiplying())
 End

正如我們在上面的例子中看到,我們在寫 close 之後的 AS 後宣告子例程的返回型別,這與子例程的名稱緊密相關。有一些與視窗程式的事件相連線的內建子例程。例如,當表單開啟時觸發的 Form_Open()。在基於面向物件原理的類中使用的子例程的特殊名稱是方法。簡單地說:子例程是可重複使用的程式碼部分。我們程式碼中的另一個示例可能是

 Public Sub sayHello()
   Message.Info("Hello Maria")    
 End

建立子例程後,我們可以用類似的方式使用它

 Public Sub Form_Open()
  sayHello()
  Message.Info(Multiplying())
 End
華夏公益教科書