Article View: fj.lang.visualbasic
Article #874Re: [Q]テキストコントロールでの上書 きモードの方法
From: Koji Kubo
Date: Sat, 31 Jan 1998 00:00
Date: Sat, 31 Jan 1998 00:00
22 lines
1395 bytes
1395 bytes
よろずや kin-chan さん、レスありがとうございます。 >Private Sub Text1_KeyDown(KeyCode As Integer, Shift As Integer) > Select Case KeyCode > Case vbKeyBack, vbKeyDelete > MyLength = 0 > Case vbKeyInsert > MyLength = 1 - MyLength > End Select >End Sub > >Private Sub Text1_KeyUp(KeyCode As Integer, Shift As Integer) > Text1.SelLength = MyLength >End Sub > >こんな感じかな? 試してないけど 参考になりました。あと、矢印キーや、MultiLineでの、行末制 御など、細かいところはいくつかあるのですが、色々やってみ ます。ありがとうございました。
Technical Details
Message-ID:
<6auha3$9bm$1@ptop03.ptop.ad.jp>Path:
arc1-ca.pugleaf.net!unknown!not-for-mailReferences:
<6aphci$o53$1@ptop03.ptop.ad.jp> <6ar4lc$sa6$1@cad10.bpr.oki.co.jp> <6arl36$q56$1@ptop03.ptop.ad.jp> <6aslqt$g6t$1@horse.fsinet.or.jp>Show Full Headers
Complete Article Headers
X-Google-Language: Japanese,JIS X-Google-Thread: 105c2e,56898ba6684a3fb9 X-Google-Attributes: gid105c2e,public From: "Koji Kubo" <koji@micras.ne.jp> Subject: Re: [Q]テキストコントロールでの上書 きモードの方法 Date: 1998/01/31 Message-ID: <6auha3$9bm$1@ptop03.ptop.ad.jp> X-Deja-AN: 320787089 Content-Transfer-Encoding: 7bit References: <6aphci$o53$1@ptop03.ptop.ad.jp> <6ar4lc$sa6$1@cad10.bpr.oki.co.jp> <6arl36$q56$1@ptop03.ptop.ad.jp> <6aslqt$g6t$1@horse.fsinet.or.jp> Content-Type: text/plain; charset="iso-2022-jp" X-MimeOLE: Produced By Microsoft MimeOLE V4.72.2106.4 Organization: OKI Internet Service PTOP Mime-Version: 1.0 Newsgroups: fj.lang.visualbasic