Centar za edukaciju-BiH



#11 16.07.2012 09:27
zxz Van mreze
Administrator
Registrovan od:03.02.2009
Postovi:10,642


Predmet:Re: Key preview
Private Sub Form_KeyDown(KeyCode As Integer, Shift As Integer)
Select Case KeyCode
Case vbKeyF8
Call Command41_Click
Case vbKeyTab
Call Command111_Click
Na tab on poziva proceduru koja se nalazi na command111 na klik
nije potreban komandni taster.
Proceduru mozes i ovdje napisati.
Napr.
docmd.openform "nekaforma"
Case vbKeyEnd
Call Command123_Click
End Select
End Sub
Podrska samo putem foruma, jer samo tako i ostali imaju koristi od toga.
↑  ↓

#12 16.07.2012 09:36
pmiroslav Van mreze
Clan
Registrovan od:02.02.2009
Postovi:1,458


Predmet:Re: Key preview
Napravio sam nešto. Nije radilo zato što sam kod stavio na glavnu formu, a treba biti na subformi
PreuzmiIzvorni kôd (vbnet):
  1. Private Sub Form_KeyDown(KeyCode As Integer, Shift As Integer)
  2. Select Case KeyCode
  3. Case vbKeyF2  
  4.            Call VidiProces
  5. Case vbKeyTab          
  6.            Forms!frmEvidencija!frmRealizacijaSub.SetFocus
  7. End Select
  8. End Sub

mislim da treba i ovo:

PreuzmiIzvorni kôd (vbnet):
  1. Private Sub Form_Load()
  2.     Me.KeyPreview = True
  3. End Sub

Pozdrav
↑  ↓

#13 16.07.2012 09:44
zxz Van mreze
Administrator
Registrovan od:03.02.2009
Postovi:10,642


Predmet:Re: Key preview
Private Sub Form_Load()
Me.KeyPreview = True
End Sub

Ukoliko je na false ne radi uopste.
Znaci ako hoces kontroolisati tastazuru mora biti KeyPreview na true i posto si ovdje stavio na otvaranj forme da se to promijeni mogao si jenostavno promijeniti tu opciju i netreba ti onda na on load.
Podrska samo putem foruma, jer samo tako i ostali imaju koristi od toga.
↑  ↓

#14 16.07.2012 10:35
pmiroslav Van mreze
Clan
Registrovan od:02.02.2009
Postovi:1,458


Predmet:Re: Key preview
Ovo sa programiranjem tastera je interesantna svar i ja za to do sada nisam znao. Našao sam na netu popis za sve tipke pa ako nekom treba

Prilozi:
Informacije o tipu datoteke za:txt  KeyCodes.txt
Preuzimanja:335
Velicina datoteke:2.83 KB


Pozdrav
↑  ↓

#15 16.07.2012 10:45
zxz Van mreze
Administrator
Registrovan od:03.02.2009
Postovi:10,642


Predmet:Re: Key preview
Da to su VB Konstante i iamo ih u objek browseru alim svakako je dobro da imaju ovdje.
Mozda da stavis i ucionca forum kao nova tema.
Podrska samo putem foruma, jer samo tako i ostali imaju koristi od toga.
↑  ↓

#16 16.07.2012 13:32
miro35 Van mreze
Clan
Registrovan od:05.01.2009
Postovi:608


Predmet:Re: Key preview
Sad vidim ovo kako sam ja u nekoj gužvi pa nevidim.
Isto zakačit ću za kombinaciju tipaka to ja imam u jednoj aplikaciji.
Npr Ctrl E ; Ctrl F itd..
Kod mene je ovaj primjer Tab Količina ,ali planiram staviti da ne zatvaram Tab-om nego Esc.
Znači kad na kasi pritisne tipku Tab i želi je zatvoriti, da to ne čini tipkom Tab nego sa Esc.
Miro
↑  ↓

#17 07.08.2012 21:12
nevsad Van mreze
Clan
Registrovan od:01.09.2010
Postovi:231


Predmet:Re: Key preview
Me.KeyPreview = True

Case vbKeyPageDown
DoCmd.OpenForm "Epromjena", acNormal, , , , acDialog
SendKeys "{Esc}", True 'zatvara formu Epromjena
KeyCode = 0
↑  ↓

Stranice (2):1,2


Sva vremena su GMT +01:00. Trenutno vrijeme: 12: 15 am.