<< 前へ        次へ >>

ID : 325

Function...End Function

機能

Functionプロシージャを宣言します。

構文

Function プロシージャ名(引数) As データ型
	'Statements
End Function

指定項目

プロシージャ名
プロシージャ名を指定します。命名規則にしたがって名前を指定します。
引数
プロシージャの引数を宣言します。命名規則に従ってローカル変数を宣言します。","で区切って複数指定できます。また引数のないFunctionプロシージャも作成できます。
データ型
宣言する関数の戻り値のデータ型を指定します。

解説

Functionプロシージャを宣言します。

関連項目

Sub...End Sub

注意事項

-

用例

'!TITLE "関数の呼び出し"
' FucnProc関数を呼び出し、計算結果をaaaに代入
Sub Sample_FuctionEndFunction

  Dim aaa As Integer

  aaa = 10

  ' メッセージ出力ウィンドウにaaaを表示
  PrintDbg aaa

  aaa = FuncProc( aaa )

  'メッセージ出力ウィンドウにFuncProc関数の結果を表示
  PrintDbg aaa

End Sub

Function FuncProc( bbb As Integer ) As Integer

  Dim ccc As Integer

  ccc = 10

  ' 計算結果100を戻り値として代入
  FuncProc = bbb * ccc

End Function

ID : 325

<< 前へ        次へ >>