Zakres rekordów formularza ciągłego zależny od zmiennej

Thread View: pl.comp.bazy-danych.msaccess

4 messages

[T] Back to Threads [V] Tree View [G] Group Articles

4 total messages Started by Stan Thu, 08 Oct 2020 19:20

#137731

Author: Stan
Date: Thu, 08 Oct 2020 19:20

12 lines
1907 bytes

PodFormularz ciągły wyświetla wszystkie 20 rekordów z tabeli "Sort", gdzie pole "SortID" ma kolejno wartość od 1 do 20. 
Do tabeli "Sort" nie będą dopisywane kolejne rekordy.
W nagłówku tego podformularza mam pole "Płeć" które pobiera sobie wartość z formularza głównego.

Chciałbym użyć funkcji "IF" w taki sposób:
gdy w nagłówku Formularza pole "Płeć" ma wartość "M" - wyświetlane są rekordy "SortID" = 1 do 18, (rekordy 19 i 20 nie są wyświetlane) 
w przeciwnym razie wszystkie.

Coś tam eksperymentowałem ale nie wyszło :/
Uprzejmie proszę o pomoc :)

Stanisław

Re: Zakres rekordów formularza ciągłego zależny od zmiennej

#137732

Author: Zbigniew Bratko
Date: Fri, 09 Oct 2020 16:40

26 lines
2326 bytes

W dniu 2020-10-08 o 21:20, Stan pisze:
> PodFormularz ciągły wyświetla wszystkie 20 rekordów z tabeli "Sort", gdzie pole "SortID" ma kolejno wartość od 1 do 20.
> Do tabeli "Sort" nie będą dopisywane kolejne rekordy.
> W nagłówku tego podformularza mam pole "Płeć" które pobiera sobie wartość z formularza głównego.
>
> Chciałbym użyć funkcji "IF" w taki sposób:
> gdy w nagłówku Formularza pole "Płeć" ma wartość "M" - wyświetlane są rekordy "SortID" = 1 do 18, (rekordy 19 i 20 nie są wyświetlane)
> w przeciwnym razie wszystkie.

[...]

Ot tak na szybko, bo jestem w Bieszczadach :-)

Private Sub btnShow_Click()
'subformSort to nazwa NADANA, widoczna w okienku "Arkusza właściwości"
'i nie ma nic wspólnego z nawą widoczną w oknie bazy danych

   ' nie są rozróżniane małe i duże litery
   If Me.txtPlec = "M" Then
     Me.subformSort.Form.Filter = "SortID < 19"
     Me.subformSort.Form.FilterOn = True
   Else
     Me.subformSort.Form.FilterOn = False
   End If

End Sub

Re: Zakres rekordów formularza ciągłego zależny od zmiennej

#137733

Author: Zbigniew Bratko
Date: Fri, 09 Oct 2020 16:47

50 lines
2790 bytes

W dniu 2020-10-09 o 18:40, Zbigniew Bratko pisze:
> W dniu 2020-10-08 o 21:20, Stan pisze:
>> PodFormularz ciągły wyświetla wszystkie 20 rekordów z tabeli "Sort",
>> gdzie pole "SortID" ma kolejno wartość od 1 do 20.
>> Do tabeli "Sort" nie będą dopisywane kolejne rekordy.
>> W nagłówku tego podformularza mam pole "Płeć" które pobiera sobie
>> wartość z formularza głównego.
>>
>> Chciałbym użyć funkcji "IF" w taki sposób:
>> gdy w nagłówku Formularza pole "Płeć" ma wartość "M" - wyświetlane są
>> rekordy "SortID" = 1 do 18, (rekordy 19 i 20 nie są wyświetlane)
>> w przeciwnym razie wszystkie.
>
> [...]
>
> Ot tak na szybko, bo jestem w Bieszczadach :-)
>
> Private Sub btnShow_Click()
> 'subformSort to nazwa NADANA, widoczna w okienku "Arkusza właściwości"
> 'i nie ma nic wspólnego z nawą widoczną w oknie bazy danych
>
>   ' nie są rozróżniane małe i duże litery
>   If Me.txtPlec = "M" Then
>     Me.subformSort.Form.Filter = "SortID < 19"
>     Me.subformSort.Form.FilterOn = True
>   Else
>     Me.subformSort.Form.FilterOn = False
>   End If
>
> End Sub
>


Rzeczywiście było na szybko.

 >> W nagłówku tego podformularza mam pole "Płeć" które pobiera sobie
 >> wartość z formularza głównego.

Ja założyłem, że w nagłówku formularza głównego.

Teraz powinno być dobrze:

Private Sub btnShow_Click()
   If Me.txtPlec = "M" Then
     Me.Filter = "SortID < 19"
     Me.FilterOn = True
   Else
     Me.FilterOn = False
   End If
End Sub

Re: Zakres rekordów formularza ciągłego zależny od zmiennej

#137734

Author: Stan
Date: Fri, 09 Oct 2020 17:10

6 lines
1948 bytes

Bieszczady o tej porze roku są naprawdę piękne. Życzę pogody i najlepszych wrażeń.

Za kod bardzo dziękuję, wykorzystałem właśnie ten "na szybko" , z poziomu formularza głównego :)

Pozdrawiam
Stan

Thread Navigation

This is a paginated view of messages in the thread with full content displayed inline.

Messages are displayed in chronological order, with the original post highlighted in green.

Use pagination controls to navigate through all messages in large threads.

Back to All Threads