Private Sub Command1_Click() Dim score As Integer score = 0 Label1.Caption = score End Sub Private Sub Command2_Click() |
変数scoreはそれぞれのプロシージャの中でのみ有効 |
Dim score As Integer Private Sub
Command1_Click() Private Sub Command2_Click() |
変数scoreはモジュール(このフォーム全体)内で有効 |
|
標準モジュールのモジュール レベル (宣言セクション) でPublic ステートメント を使って変数を明示的にパブリックとして 宣言します。 このように宣言された変数は Option Private Module が有効でない 限りすべてのアプリケーションの全モジュ ールの全プロシージャから使うことができ ます。 |