Ustawienie pola w formularzu na podstawie nazwy pola jako string

0

Witam;

Mam problem z kodem. Sprawa wydaje się banalna, ale nie jestem w stanie tego ogarnąć. Program, w dużym uproszczeniu, wygląda następująco:

  • Formularz o nazwie KOSZTY posiada dwa pola o nazwach: TEKST4 i TEKST6.
  • W zależności od wartości parametru PARAM jednemu z tych pól nadawana jest wartość 123.

Skrypt wykłada się na poleceniu Forms![KOSZTY].pole = 123. Chodzi o nieprawidłową składnię polecenia.

Sub ccc(param)
Dim pole As String
    If param = 1 Then
        pole = "Tekst6"
    ElseIf param = 2 Then
        pole = "Tekst4"
    End If
Forms![KOSZTY].pole = 123
End Sub

Formularz nie jest skojarzony z żadną tabelą więc operowanie na danych (za pomocą np. polecenia RecordSet) nie wchodzi w grę.

Wiem, że można polecenie Forms![KOSZTY].nazwapola umieścić w każdym segmencie polecenia IF..ENDIF, ale to jest ostateczność - w rzeczywistości formularz posiada około 600 pól.

Z góry dziękuję za pomoc.

0

VBA for MS Access

0

BINGO !!!

Polecenie Controls załatwiło problem. Poprawna składnia to Forms![KOSZTY].Controls(pole) = 123

Bardzo dziękuję za pomoc.

1 użytkowników online, w tym zalogowanych: 0, gości: 1