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

Setfocus na tab control sa glavne forme

[es] :: Access :: Setfocus na tab control sa glavne forme

[ Pregleda: 1767 | Odgovora: 9 ] > FB > Twit

Postavi temu Odgovori

Autor

Pretraga teme: Traži
Markiranje Štampanje RSS

xl_kid
Knjaževac

Član broj: 82420
Poruke: 157
77.243.16.*



Profil

icon Setfocus na tab control sa glavne forme05.04.2012. u 14:04 - pre 119 meseci
Napravio sam formu za unos aneksa ugovora kupcima. Pošto imam dva aneksa napravio sam tab control sa dve strane. Sve radi ok ali pokušavam skratiti klikove tj da na osnovu izbora iz combobox-a sa glavne forme da fokus na odredjenu stranu. I to sam nekako uradio ali me nervira što to polje na glevnoj formi mora biti poslednje jer posle izbora aneksa odmah prebacuje na odredjenu stranu. Hteo bih da polje za izbor vrste aneksa bude prvo (pre ostalih podataka, datumi, uslovi, kupac...) a ne poslednje. evo i koda koji koristim na formi:

Private Sub Vrsta_AfterUpdate()
If Me.Vrsta = (1) Then
Me.TabCtl22.Pages!strJedan.SetFocus
Else
If Me.Vrsta = (2) Then
Me.TabCtl22.Pages!strDva.SetFocus
End If
End If
Me.Recalc
End Sub

INTRUDER
 
Odgovor na temu

FOX028
Visoka tehnicka skola strukovnih studija
Kosovska Mitrovica

Član broj: 258986
Poruke: 848

Sajt: https://www.zile028.com


+47 Profil

icon Re: Setfocus na tab control sa glavne forme05.04.2012. u 18:31 - pre 119 meseci
Okaci tu bazu pa da vidimo u cemu je problem.
 
Odgovor na temu

xl_kid
Knjaževac

Član broj: 82420
Poruke: 157
77.243.20.*



Profil

icon Re: Setfocus na tab control sa glavne forme05.04.2012. u 21:14 - pre 119 meseci
evo i primera.
INTRUDER
Prikačeni fajlovi
 
Odgovor na temu

TiestoX
Kragujevac

Član broj: 271245
Poruke: 89
*.dynamic.isp.telekom.rs.



+1 Profil

icon Re: Setfocus na tab control sa glavne forme05.04.2012. u 22:45 - pre 119 meseci
Ako sam dobro razumeo, hoces da prilikom upisivanja Vrste ugovora fokus ostane na polju Vrste glavne forme a ne pod forme?

Ako je tako, onda samo dodajes:

Code:
Forms!F_ugovori!Vrsta.SetFocus


nakon Me.Recalc.


Code:

Private Sub Form_Current()
If Me.Vrsta = (1) Then
Me.TabCtl22.Pages!pgeOne.SetFocus
Else
If Me.Vrsta = (2) Then
Me.TabCtl22.Pages!pgeTwo.SetFocus
End If
End If
Me.Recalc
Forms!F_ugovori!Vrsta.SetFocus
End Sub
 
Odgovor na temu

xl_kid
Knjaževac

Član broj: 82420
Poruke: 157
77.243.16.*



Profil

icon Re: Setfocus na tab control sa glavne forme06.04.2012. u 06:48 - pre 119 meseci
Ne bas. Hteo bih da prilikom upisivanja, posle izbora vrste ugovora, u pod formi prebaci na odabranu stranu ali da nastavim unos sa ostalim podacima na glavnoj formi pa tek onda nastavi u pod formi. Sada mi je polje vrsta na početku i tu mi pravi "problem" jer hocu da prvo odaberem vrstu ugovora (automatski da promeni stranu u pod formi) a potom nastavim sa unosom na glavnoj formi pa tek onda u pod formi nastavim sa unosom. Ako vrstu ugovora stavim kao poslednje polje u glavnoj formi sve radi ok ali kao sto rekoh hteo bih da mi odabir vrste bude kao prvo polje.
INTRUDER
 
Odgovor na temu

xl_kid
Knjaževac

Član broj: 82420
Poruke: 157
77.243.16.*



Profil

icon Re: Setfocus na tab control sa glavne forme06.04.2012. u 07:01 - pre 119 meseci
Da li može ovako nešto:

Private Sub Vrsta_AfterUpdate()
If Me.Vrsta = (1) Then
Me.TabCtl22.Pages!pgeOne.SetFocus
Forms!F_ugovori!OdDatuma.SetFocus
Else
If Me.Vrsta = (2) Then
Me.TabCtl22.Pages!pgeTwo.SetFocus
Forms!F_ugovori!OdDatuma.SetFocus
End If
End If
Me.Recalc
End Sub
INTRUDER
 
Odgovor na temu

TiestoX
Kragujevac

Član broj: 271245
Poruke: 89
*.medf.kg.ac.rs.



+1 Profil

icon Re: Setfocus na tab control sa glavne forme06.04.2012. u 07:09 - pre 119 meseci
Aha, hoces da nastavis sa daljim unosom.

KOD je isti kao sto sam i napisao samo je fokus na polju OdDatuma.

Code:
Private Sub Form_Current()
If Me.Vrsta = (1) Then
Me.TabCtl22.Pages!pgeOne.SetFocus
Else
If Me.Vrsta = (2) Then
Me.TabCtl22.Pages!pgeTwo.SetFocus
End If
End If
Me.Recalc
Forms!F_ugovori!OdDatuma.SetFocus
End Sub
 
Odgovor na temu

xl_kid
Knjaževac

Član broj: 82420
Poruke: 157
77.243.16.*



Profil

icon Re: Setfocus na tab control sa glavne forme06.04.2012. u 07:20 - pre 119 meseci
Ovim kodom na menja stranu u pod formi. Napravio sam još jedan dodatak i tako dobijam šta hoću samo me brine da nije previše.


Private Sub Vrsta_AfterUpdate()
If Me.Vrsta = (1) Then
Me.TabCtl22.Pages!pgeOne.SetFocus
Forms!F_ugovori!OdDatuma.SetFocus
Else
If Me.Vrsta = (2) Then
Me.TabCtl22.Pages!pgeTwo.SetFocus
Forms!F_ugovori!OdDatuma.SetFocus
End If
End If
Me.Recalc
End Sub

Private Sub Rabat_AfterUpdate()
If Me.Vrsta = (1) Then
Me.TabCtl22.Pages!pgeOne.SetFocus
Forms!F_ugovori!qry_UgovorDetalji_subform!ProizvodID.SetFocus
Else
If Me.Vrsta = (2) Then
Me.TabCtl22.Pages!pgeTwo.SetFocus
Forms!F_ugovori!qry_UgovorDetalji1_subform1!ProizvodID.SetFocus
End If
End If
Me.Recalc
End Sub

INTRUDER
 
Odgovor na temu

izonic
ishab zonic
Tuzla

Član broj: 38128
Poruke: 591
89.146.182.*

Sajt: www.icentar.ba


+2 Profil

icon Re: Setfocus na tab control sa glavne forme06.04.2012. u 10:27 - pre 119 meseci
Private Sub Form_Current()
Dim I As Integer

I = Me.Vrsta - 1
Me.TabCtl22.Pages(I).SetFocus
End Sub

Private Sub Rabat_Exit(Cancel As Integer)
Form_Current
End Sub
zxz
 
Odgovor na temu

xl_kid
Knjaževac

Član broj: 82420
Poruke: 157
77.243.16.*



Profil

icon Re: Setfocus na tab control sa glavne forme07.04.2012. u 09:42 - pre 119 meseci
izonic, ovaj kod mi pravi problem prilikom novog upisa a takodje prilikom unosa vrste ne menja stranu u pod formi.
INTRUDER
 
Odgovor na temu

[es] :: Access :: Setfocus na tab control sa glavne forme

[ Pregleda: 1767 | Odgovora: 9 ] > FB > Twit

Postavi temu Odgovori

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