トップ > 逆引きで学ぶ ユーザーフォーム&コントロール > 1-24 枠のスタイルを設定する

1-24 枠のスタイルを設定するユーザーフォーム   2021.11.16

次の書籍の第1章~5章を公開しています。
「Excel VBA 逆引きで学ぶ ユーザーフォーム&コントロール」

目次  前頁   次頁  索引

SpecialEffectプロパティは、フォームの枠のスタイルを取得・設定します。
設定できる値は次の5つです。既定値は「0-fmSpecialEffectFlat」です。



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

リストから選択します。


サンプルコード

フォームをクリックすると、フレームのスタイルがランダムに変更する

Private Sub UserForm_Click()
    Randomize
    Dim i As Long
    Do
        i = Int(Rnd() * 5)           'ランダムの値(0~4)を取得
        If i = 4 Then i = 6          '4の場合は6に変更
    Loop Until Me.SpecialEffect <> i '現スタイルと異なる値の場合はループを抜ける
    Me.SpecialEffect = i
End Sub

書籍紹介140以上のサンプルファイル付き!

知りたいがすぐわかる! やりたいがすぐできる!
「Excel VBA 逆引きで学ぶ ユーザーフォーム&コントロール」(Kindle版)
ユーザーフォームを扱えると、VBAでできることが大きく広がります!
本書では、知りたいこと、やりたいことから、逆引きで学びを深められます。

■ 購入:amazon

ページトップへ戻る
Copyright(C) 2009- 坂江 保 All Rights Reserved.