Re: formResizeを使うとエラーになりますどうすれば？

Article View: fj.lang.visualbasic

Article #515

Back to fj.lang.visualbasic Previous Next

#515

From: 市崎大介
Date: Sat, 07 Mar 1998 00:00

21 lines
1454 bytes

Masaru Kumakawa wrote in message <34FDFF23.B207120D@ny.airnet.ne.jp>...
>こんにちは、熊川です。
>> はじめまして、VB歴１５日です。
>> Private Sub form_resize()
>>   text1.Width = Me.ScaleWidth
>>   text1.Height = Me.ScaleHeight - 440 - sbStatusBar.Height
>> End Sub
>> これって間違いでしょうか？
>> それとも何かプロパティを設定しなければならないのですか？
>　HeightやWidthプロパティにマイナスの値を入れるとエラーになります。
>　計算式が０以下の場合も想定したほうがいいのでは。

たとえば、
If Me.WindowState <> vbMinimized
    'サイズ変更処理
End If
なんて具合にすればいいかも。

あとは、強引に
On Error Resume Nextとか・・・

Technical Details

Message-ID: <6dp5at$6ti$1@nn-tk003.ocn.ad.jp>

Path: arc1-ca.pugleaf.net!unknown!not-for-mail

References: <6djnol$7j3@wa1.seikyou.or.jp> <34FDFF23.B207120D@ny.airnet.ne.jp>

Show Full Headers

Complete Article Headers

X-Google-Language: Japanese,JIS
X-Google-Thread: 105c2e,7eb3b14d5a455ac5
X-Google-Attributes: gid105c2e,public
From: "市崎 大介" <ichizaki@triad.ne.jp>
Subject: Re: formResizeを使うとエラーになりますどうすれば？
Date: 1998/03/07
Message-ID: <6dp5at$6ti$1@nn-tk003.ocn.ad.jp>
X-Deja-AN: 331428225
Content-Transfer-Encoding: 7bit
References: <6djnol$7j3@wa1.seikyou.or.jp> <34FDFF23.B207120D@ny.airnet.ne.jp>
Content-Type: text/plain; charset="iso-2022-jp"
X-MimeOLE: Produced By Microsoft MimeOLE V4.71.1712.3
Organization: NTT Open Computer Network
Mime-Version: 1.0
Newsgroups: fj.lang.visualbasic

Reply to Parent Message