- "Transparent/透明" プロパティ
- コマンドボタンを透明にするかどうかを設定します。
一般的なコマンドボタンはこのプロパティがFalseの状態で、不透明になっています。一方、このプロパティをTrueにするとボタンが透明となります。使用不可状態ではありませんので、透明でもクリックすると動作することがポイントです。
- コマンドボタン
-
Private Sub cmdテスト_Click()
'[テスト]ボタンクリック時
MsgBox "テストです！", vbOKOnly + vbInformation
End Sub
Private Sub fraProperty_AfterUpdate()
'[プロパティの設定]オプショングループの更新後処理
With Me!cmdテスト
Select Case Me!fraProperty
Case 1
'コマンドボタンを不透明に
.Transparent = False
Case 2
'コマンドボタンを透明に
.Transparent = True
End Select
End With
End Sub
- フォームのデザイン上、イメージコントロールとコマンドボタンを同じ位置とサイズで重ねておきます（下図は説明のために意図的にずらしています）
- 「不透明」の状態でコマンドボタンをクリックすると、そのクリック時イベントプロシージャが実行されます。
一方、コマンドボタンを「透明」の状態にするとイメージコントロールだけが表示されます。それでもやはりクリックすると同様の結果となり、イメージコントロールのクリック時イベントのような動作に見えます。
 
|
#147
