Srodne teme

14.04.2024. Re: Gde je Kejt? (samo pogrešni odgovori)
24.10.2003. <input type="checkbox" name="....
25.01.2004. Blokiranje attachmenta u Outlooku 2003: REŠENJE
12.11.2004. "Adult" sponzori
18.10.2004. Mozilla Firefox "open in new tab" short..
16.11.2004. Pretraživač koji "priča"!
15.04.2008. Jel neko "probao" izvesnu ASrock plocu ..
15.07.2005. Konvertiranje "mod" u "xm" fa..
16.03.2006. Modifikacija JS-a "Click-To-Expand Menu"..
17.03.2006. "Enter" dugme sa raznim funkcijama?

Navigacija

Brisanje liste

Lista poslednjih: 16, 32, 64, 128 poruka.

Enter kao "Click" u ListBox-u

[es] :: Office :: Excel :: Enter kao "Click" u ListBox-u

[ Pregleda: 1652 | Odgovora: 3 ] > FB > Twit

Autor

neptuncokg
Predrag M
racunovodja
Kragujevac

Član broj: 230353
Poruke: 326
*.dynamic.isp.telekom.rs.

+9 Profil

Enter kao "Click" u ListBox-u

^{26.02.2011. u 21:39 - pre 160 meseci}

U ListBoxu na formi izbor stavke se vrsi u dogadjaju "Click" ili "DblClick" (klikom ili duplim klikom). Pokusavao sam na razne nacine da isti efekat postignem pritiskom na "Enter", ali bez uspeha. ListBox ima svoj gogadjaj "Enter", ali on nema taj efekat. Moze li se uopste ovo izvesti u VBA? Hvala unapred i pozdrav.

Odgovor na temu

Jpeca
Predrag Jovanović
poslovni analitičar
Gowi
Pančevo

Moderator
Član broj: 25683
Poruke: 2268
*.wimax.verat.net.

Sajt: www.gowi.rs

+109 Profil

Re: Enter kao "Click" u ListBox-u

^{02.03.2011. u 07:42 - pre 160 meseci}

Pretpostavljam da se radi o Listbox-u sa višestrukom selekcijom, jer u suprotnom ne znam kakav bi bio smisao.
Da bi obradio i prepoznao pritisak na Enter koristiš događaj KeyDown forme. KeyCode parametar za Enter je 13.

Code:
Private Sub ListBox1_KeyDown(ByVal KeyCode As MSForms.ReturnInteger, ByVal Shift As Integer)
  If KeyCode = 13 Then   ' Da li je pritisnuto Enter
      KeyCode = 0 ' Ukida Enter
      ListBox1.Selected(ListBox1.ListIndex) = True 'Selektuje tekucu stavku
  End If
End Sub

Nije to loše Rembrante, samo što ne bi dodao još malo boje?

Prikačeni fajlovi

ListBoxTest.xlsm - 18.54k

Odgovor na temu

neptuncokg
Predrag M
racunovodja
Kragujevac

Član broj: 230353
Poruke: 326
*.dynamic.isp.telekom.rs.

+9 Profil

Re: Enter kao "Click" u ListBox-u

^{02.03.2011. u 10:19 - pre 160 meseci}

Da, to je upravo resenje koje mi je trebalo. Kao sto je kod za "Enter" - 13, pretpostavljam da i druge tipke imaju svoj, ali ja to u helpu ne nadjoh. Hvala i pozdrav.

Odgovor na temu

Jpeca
Predrag Jovanović
poslovni analitičar
Gowi
Pančevo

Moderator
Član broj: 25683
Poruke: 2268
*.wimax.verat.net.

Sajt: www.gowi.rs

+109 Profil

Re: Enter kao "Click" u ListBox-u

^{02.03.2011. u 18:55 - pre 160 meseci}

Uvek možeš ispitati tako što napraviš breakpoint i prekineš izvršavanje unutar rutine KeyPress i onda u Immediate window proveriš šta je u KeyCode. Lakša varijanta Key Code Constants for Visual Basic 6.0 Users . Znači umesto 13 može se koristiti vbKeyReturn konstanta, čitljivilje i preglednije.

Obrati pažnju da KeyDown može detektovati Ctrl Alt i Shift u kombinaciji sa nekim tasterom http://www.elitesecurity.org/t408205-0#2681491

Nije to loše Rembrante, samo što ne bi dodao još malo boje?

Odgovor na temu

[es] :: Office :: Excel :: Enter kao "Click" u ListBox-u

[ Pregleda: 1652 | Odgovora: 3 ] > FB > Twit

Srodne teme

05.03.2007. Materijal za "Kompleskne brojeve" i &qu..
21.11.2007. C i tipka "Enter" & "Clipboard..
29.07.2008. Polje tipa YesNo u ListBox-u
20.11.2008. "Mračna konzola"
29.09.2008. Dukserice "Starter", "Head", ..
13.06.2017. Vip prepaid tarifne opcije ("besplatno u mre..
12.03.2010. Problem sa instalacijom Catia-e "Runtime ex..
19.04.2010. JAVLJA MI "Please enter Built-in hdd user pa..
14.06.2015. Crtac iz 50-ih koji je promovise "demokratij..

Navigacija

Brisanje liste

Lista poslednjih: 16, 32, 64, 128 poruka.