🚀 go-pugleaf

RetroBBS NetNews Server

Inspired by RockSolid Light RIP Retro Guy

Article View: pl.comp.lang.vbasic
Article #92719

Re: [VB6] Jak rozpoznać w któym textBox był kursor

#92719
From: Blue
Date: Wed, 09 Nov 2005 07:31
22 lines
1410 bytes
Może w ten sposób (też działa).

Dim zmienna as Integer ' dla przykładu - na początku kodu formy lub jako 
Global zmienna as Integer w module

W zdarzeniu Click textboxa ustawiamy zmienną:

Private Sub Text1_Click()
zmienna = 1
End Sub
Private Sub Text2_Click()
zmienna = 2
End Sub

I tak dalej...
W zdarzeniu Command1_Click() odczytujemy zawartość zmiennej, która została 
ustawiona przez kliknięcie w textbox.

Druga metoda to zabawa w lostfocus.

Pozdrawiam,
Mariusz 
Technical Details
Message-ID: <dks8la$nhg$1@news.onet.pl>
Path: mbox-mo1.pugleaf.net!news-archive.icm.edu.pl!newsfeed.gazeta.pl!news.onet.pl!not-for-mail
References: <dkrbsf$41m$1@inews.gazeta.pl>

Show Full Headers
Complete Article Headers
Path: mbox-mo1.pugleaf.net!news-archive.icm.edu.pl!newsfeed.gazeta.pl!news.onet.pl!not-for-mail
From: "Blue" <bluetest@op.pl>
Newsgroups: pl.comp.lang.vbasic
Subject: Re: [VB6] Jak rozpoznać w któym
 textBox był kursor
Date: Wed, 9 Nov 2005 08:31:52 +0100
Organization: Onet.pl
Lines: 23
Message-ID: <dks8la$nhg$1@news.onet.pl>
References: <dkrbsf$41m$1@inews.gazeta.pl>
NNTP-Posting-Host: arena.21.pl
Mime-Version: 1.0
X-Trace: news.onet.pl 1131521514 24112 213.199.204.5 (9 Nov 2005 07:31:54 GMT)
X-Complaints-To: usenet@news.onet.pl
NNTP-Posting-Date: Wed, 9 Nov 2005 07:31:54 +0000 (UTC)
X-MimeOLE: Produced By Microsoft MimeOLE V6.00.2900.2180
X-Sender: EuVGQ8ybM3L8iq1lfpQWPw==
X-Newsreader: Microsoft Outlook Express 6.00.2900.2180
X-Priority: 3
X-MSMail-Priority: Normal
Content-Type: text/plain; charset=UTF-8
Content-Transfer-Encoding: 8bit