すみません。先程の、ツールバーのボタンの説明を
ステータスバーに表示するという件について質問です。
Toolbar1_MouseMoveプロシージャで、ポインタが
今どのボタンの上にあるかを

Select Case Button

Case （ボタンのキー）
StatusBar1.Panels(1).Text = "あいうえお"
：
：
End Select

というふうに書いてみました。
一つ目のボタンはうまく表示されたのですが、
残りでも一つ目のボタンと同じ文が表示されてしまいました。
(それぞれのボタンについて異なる文章を書いています）
どのようにしたら他のボタンでも正しく表示されるでしょうか？
↑ものすごく間違ったコードを
書いているかもしれませんがよろしくお願いします。