フォーム＆コントロールプロパティ活用辞典-107 Picture

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

  With Me
    Select Case Me!fraProperty
      Case 1
        'ピクチャをACBLUPRT.GIFに
        .Picture = "C:\Program Files\Microsoft Office\" & _
                    "OFFICE11\BITMAPS\STYLES\ACBLUPRT.GIF"
      Case 2
        'ピクチャをGLOBE.WMFに
        .Picture = "C:\Program Files\Microsoft Office\" & _
                    "OFFICE11\BITMAPS\STYLES\GLOBE.WMF"
    End Select
  End With

End Sub


#107		Picture
"Picture/ピクチャ" プロパティフォームやコントロールの背景に表示するピクチャを取得または取得または設定します。プロパティには、その元となる画像ファイルのパスを指定します。フォーム、コマンドボタン、トグルボタン、イメージ Private Sub fraProperty_AfterUpdate() '[プロパティの設定]オプショングループの更新後処理 With Me Select Case Me!fraProperty Case 1 'ピクチャをACBLUPRT.GIFに .Picture = "C:\Program Files\Microsoft Office\" & _ "OFFICE11\BITMAPS\STYLES\ACBLUPRT.GIF" Case 2 'ピクチャをGLOBE.WMFに .Picture = "C:\Program Files\Microsoft Office\" & _ "OFFICE11\BITMAPS\STYLES\GLOBE.WMF" End Select End With End Sub ピクチャをACBLUPRT.GIFにしたときピクチャをGLOBE.WMFにしたとき
\| Index \| Prev \| Next \|