次の方法で共有


CommandButton.Tag プロパティ (Access)

Microsoft Access アプリケーションで必要なフォーム、レポート、セクション、またはコントロールに関する追加情報を格納します。 読み取り/書き込みが可能な String です。

構文

タグ

CommandButton オブジェクトを表す変数。

注釈

設定値は、2,048 バイト以内の文字列式です。 既定値は長さ 0 の文字列 ("") です。

他のプロパティとは異なり、" Tag /タグ" プロパティの設定値は、オブジェクトの属性には影響しません。

他のプロパティ設定に影響を与えたり、他の副作用を引き起こしたりすることなく、オブジェクトに識別文字列を割り当てるには、このプロパティを使用します。 プロシージャに変数としてフォーム、レポート、セクション、またはコントロールの名前を渡すときに "Tag/タグ" プロパティを使うと、そのオブジェクトの同一性を確認できます。

次の使用例では、" Tag /タグ" プロパティを使用して、フォームのコントロールに関するカスタム メッセージを表示します。 コントロールにフォーカスが与えられると、そのコントロールに関する説明文が lblMessage というラベルに表示されます。 各コントロールの " Tag /タグ" プロパティにメッセージとして短いテキストを指定します。 コントロールにフォーカスが移動すると、その " Tag /タグ" プロパティの値がラベル コントロールの " Caption /標題" プロパティに割り当てられます。

フォームには txtDescription というテキスト ボックスと cmdButton というコマンド ボタンの説明文が表示されます。

Sub Form_Load() 
 Dim frmMessageForm As Form 
 
 Set frmMessageForm = Forms!Form1 
 
 frmMessageForm!lblMessage.Caption = "" ' Clear text. 
 frmMessageForm!txtDescription.Tag = "Help text for the text box." 
 frmMessageForm!cmdButton.Tag = "Help text for the command button." 
End Sub 
 
Sub txtDescription_GotFocus() 
 ' Tag property setting as caption. 
 Me!lblMessage.Caption = Me!txtDescription.Tag 
End Sub 
 
Sub txtDescription_LostFocus() 
 Me!lblMessage.Caption = "" 
End Sub 
 
Sub cmdButton_GotFocus() 
 ' Tag property setting as caption. 
 Me!lblMessage.Caption = Me!cmdButton.Tag 
End Sub 
 
Sub cmdButton_LostFocus() 
 Me.lblMessage.Caption = " " 
End Sub

サポートとフィードバック

Office VBA またはこの説明書に関するご質問やフィードバックがありますか? サポートの受け方およびフィードバックをお寄せいただく方法のガイダンスについては、Office VBA のサポートおよびフィードバックを参照してください。