| 28行目: | 28行目: | ||
' ...略 | ' ...略 | ||
End Sub | End Sub | ||
</syntaxhighlight> | |||
<br><br> | |||
== Private / Public == | |||
==== Private ==== | |||
* そのモジュール内でのみアクセス可能 | |||
* 他のモジュールからは参照不可 | |||
* コードの安全性とカプセル化を高める。 | |||
<br> | |||
<syntaxhighlight lang="vb"> | |||
' このモジュール内でのみ使用可 | |||
Private Sub InternalProcess() | |||
'処理 | |||
End Sub | |||
</syntaxhighlight> | |||
<br> | |||
==== Public ==== | |||
* どのモジュールからもアクセス可能 | |||
* プロジェクト内のどこからでも参照可能 | |||
* モジュール間で共有する必要がある変数やメソッドに使用する。 | |||
<br> | |||
<syntaxhighlight lang="vb"> | |||
' 他モジュールから呼び出し可 | |||
Public Function Calculate() As Integer | |||
'処理 | |||
End Function | |||
</syntaxhighlight> | </syntaxhighlight> | ||
<br><br> | <br><br> | ||