コード上でBorderStyleを変更するには？

解決

Engle 2008-04-24 10:14:04 No: 100615

VB6.0で開発しています。

プロパティからではなく、コード上でFormのBorderStyleを変更したいのですが、どうしたら良ろしいでしょうか？

    If flag = True Then
        タイトルバーなしのForm
    Else
        タイトルバーありのForm
    End If

の様な感じで使いたいです。

通ってみた 2008-04-24 12:46:06 No: 100616

タイトルバーの着脱であればAPIを使うのが一般的かと思います

matsu 2008-04-24 18:49:42 No: 100617

>プロパティからではなく、コード上でFormのBorderStyleを変更したいのですが、どうしたら良ろしいでしょうか？

Captionの値を変更する必要がありますが、BorderStyleプロパティで変更できます。
If flag = True Then
    Me.BorderStyle = 0
    Me.Caption = ""
Else
    Me.BorderStyle = 2
    Me.Caption = " "
End If

特攻隊長まるるう 2008-04-24 19:05:46 No: 100618

>Captionの値を変更する必要がありますが
ホントだｗｗ

[BorderStyle プロパティ](MSDNライブラリ2001年10月)より抜粋
>Form オブジェクトおよびテキストボックス (TextBox) コントロールについては、
>実行時には値の取得のみ可能です。

VB6.0(SP5)でテストしました。
vbSizable と vbSizableToolWindow を切り替えるとバーが2重に表示されました。
バグっぽい動きですね。動作保障できない内容では？

matsu 2008-04-24 20:13:22 No: 100619

>vbSizable と vbSizableToolWindow を切り替えるとバーが2重に表示されました。
>バグっぽい動きですね。動作保障できない内容では？

確かに変な動作をしますね。
APIを使う方法を調べてみたら、花ちゃんさんのサイトにサンプルがありました。
http://hanatyan.sakura.ne.jp/patio/read.cgi?no=8

Engle 2008-04-26 05:09:21 No: 100620

自分がしたい処理をする事が出来ました。

通ってみた様、matsu様、特攻隊長まるるう様
ありがとうございました。