Groups > it.comp.lang.visual-basic > #19467

E' cambiato Shift?

Path	csiph.com!news.mixmin.net!weretis.net!feeder4.news.weretis.net!feeder5.news.weretis.net!news.solani.org!.POSTED!not-for-mail
From	Greg <greg@alicie.com>
Newsgroups	it.comp.lang.visual-basic
Subject	E' cambiato Shift?
Date	Mon, 26 Nov 2018 10:24:01 +0100
Organization	solani.org
Lines	20
Message-ID	<ptge3j$2m2$1@solani.org> (permalink)
Mime-Version	1.0
Content-Type	text/plain; charset="iso-8859-15"; format=flowed
Content-Transfer-Encoding	8bit
X-Trace	solani.org 1543224243 2754 127.0.0.43 (26 Nov 2018 09:24:03 GMT)
X-Complaints-To	abuse@news.solani.org
NNTP-Posting-Date	Mon, 26 Nov 2018 09:24:03 +0000 (UTC)
X-Newsreader	MesNews/1.08.06.00-it
Cancel-Lock	sha1:i2kv3GTXFJMDeCKXaVa7l1Pe/ns=
X-User-ID	eJwFwQERACAIA8BKKBsecQBd/wj+02PFHAQDFBX9QKyTpAyVKG9MtTavvyMiCaMy59pWfxTKEQs=
Xref	csiph.com it.comp.lang.visual-basic:19467

Show key headers only | View raw

Avevo empiricamente trovato un modo per sapere quando Control Shift sono premuti contemporaneamente: il valore di Shift 
era 1, ed è stato cosi per anni, adesso da qualche giorno deve essere cambiato qualcosa perchè Shift vale 3.

Tasto shift premuto da solo vale 1
Tasto Control premuto da solo vale 2
Premuti insieme il valore è 3.
Ha anche una sua logica, come mi ero adeguato prima mi sono riadeguato anche adesso, corretto e ricompilato ma mi 
chiedo cosa sia successo.



Private Sub ListAnno_KeyUp(KeyCode As Integer, Shift As Integer)

If Shift = 3 Then
    ST = ST & Chr(KeyCode)
End If
Me.Caption = "Shift:" & Shift & "-" & ST

-- 
Greg

Back to it.comp.lang.visual-basic | Previous | Next — Next in thread | Find similar

Thread

E' cambiato Shift? Greg <greg@alicie.com> - 2018-11-26 10:24 +0100
  Re: E' cambiato Shift? Luca D <antaniserse@yahoo.it> - 2018-11-26 06:31 -0800
    Re: E' cambiato Shift? Greg <greg@alicie.com> - 2018-11-27 07:32 +0100

csiph-web