#154 WhatsThisButton

"WhatsThisButton/?ボタン" プロパティ

フォームのタイトルバーに[?]ボタンを表示するかどうかを設定します。Trueで表示されます。
このボタンが表示されている場合、[?]ボタンをクリックすると、マウスのカーソルが「?」アイコンに変わります。その状態で適当なコントロールをクリックすると、そのコントロールの「ヘルプコンテキストID」プロパティに指定されているヘルプトピックを表示させることができます。ただし、別途、オリジナルのヘルプファイルの作成やヘルプファイルプロパティへの設定が必要です。
なお、このプロパティをTrueに設定する場合には、フォームの"MinMaxButtons/最小化/最大化ボタン"プロパティが"なし"に設定されている必要があります。

フォーム

Private Sub fraProperty_AfterUpdate()
'[プロパティの設定]オプショングループの更新後処理

  Const cstrForm As String = "フォーム154View"

  '対象フォームをデザインビュー&非表示で開く
  DoCmd.OpenForm cstrForm, acDesign, , , , acHidden

  '対象フォームのプロパティを設定
  With Forms(cstrForm)
    Select Case Me!fraProperty
      Case 1
        '?ボタンを表示する(事前に最小化/最大化ボタンをなしに設定)
        .MinMaxButtons = 0
        .WhatsThisButton = True
      Case 2
        '?ボタンを表示しない
        .WhatsThisButton = False
    End Select
  End With

  '対象フォームを保存したあと表示する
  DoCmd.Close acForm, cstrForm, acSaveYes
  DoCmd.OpenForm cstrForm

End Sub
  • タイトルバーに[?]ボタンを表示させた場合
  • タイトルバーに[?]ボタンを表示させない場合
| Index | Prev | Next |

 

Copyright © T'sWare All rights reserved