#080 フォームに定義された変数を他のフォームから使うには? フォーム、VBA

ある変数を複数のフォーム間で共有したい場合には、標準モジュールにその変数を定義するのが一般的ですが、特定のフォームだけに関連のある変数(そのフォームの属性のような変数)については、そのフォーム上に定義した上で他のフォームからも参照できるようにする、という手段もあります。

他のフォームからもその変数を見られるようにするには、モジュールの"Declarations"セクションにPublicキーワードを使ってその変数を宣言します。
Public pintZaikoSu  As Integer

こうすることによって、この変数はあたかもそのフォームの1つのプロパティのように作用しますので、他のフォームからはちょうどフォームのプロパティを参照するように".(ドット)"を使うことによって参照することができます。それには次のような構文を使います。
Forms!フォーム名.変数名

例えば、"フォーム1"に"pintZaikoSu"という変数が定義されているとします。この変数を別のフォームのモジュールでメッセージボックスを使って表示するには次のようにします。
Private Sub コマンド0_Click()
  MsgBox Forms!フォーム1.pintZaikoSu

End Sub

※"フォーム1"の変数を参照するときには、"フォーム1"は非表示でも構いませんが開いていなければなりません。
| Index | Prev | Next |

この情報は参考になりましたか?、問題は解決しましたか?、もしまだなら......
T'sWareのワンポイトテクニカルアドバイスをご利用ください。3000円/件〜でご支援します。
スタンドアロンからSQL Server対応まで、オーダーメイドのシステムを短納期・安価でお届けします
 

Copyright © T'sWare All rights reserved