トップ > 逆引きで学ぶ ユーザーフォーム&コントロール > 1-18　背景画像を敷き詰める

PictureTilingプロパティは、背景画像がフォームより小さな場合、画像を連続して敷き詰めます。
※　画像のサイズモード設定がストレッチだと表示に変化は見られません

プロパティウィンドウでの設定

PictureTilingプロパティの設定は「True」か「False」です。
「True」にすると、画像が敷き詰められます。
※　敷き詰める基準位置を変更する場合はPictureAlignmentプロパティを用います

サンプルコード

PictureAlignmentプロパティで画像の位置基準を左上隅にし、PictureTilingプロパティで敷き詰めます。

Private Sub UserForm_Click() 'クリックすると画像を敷き詰める
    '画像の位置基準を左上隅にする
    Me.PictureAlignment = fmPictureAlignmentTopLeft
    '画像を敷き詰める
    Me.PictureTiling = True
End Sub