ホップアップヒントは、フォームに配置されたラベルやコマンドボタンに
カーソルを合わせてしばらくすると表示される説明文のことです。

　サンプルプロシージャでは、フォームとコマンドボタンを作成して、コマンドボタン
に表示される文字列にサイズを合わせ、ホップアップヒントを表示しています。

　標準モジュールに次のプロシージャを作成して下さい。

● サンプル　●

Sub Sample()
    Dim myForm As Form
    Dim myBtn  As Control
    
    Set myForm = CreateForm
    
    Set myBtn = CreateControl(myForm.Name, acCommandButton, , , , 200, 200)
    myBtn.Caption = "ホップアップヒントが出るよ"
    myBtn.SizeToFit
    myBtn.ControlTipText = "ホップアップヒントを利用しよう"
    
    DoCmd.Restore
    DoCmd.MoveSize 0, 0, 4000, 2000
    DoCmd.OpenForm myForm.Name
        
End Sub