Microsoft Access - загрузка формы записи

Мне любопытно, возможно ли, когда я загружаю запись в одну из своих форм, и я хочу добавить цитату для выбранной записи, поэтому я выбираю добавить цитату (кнопку), которая приведет меня к моей странице цитаты. я бы хотел, чтобы форма автоматически загружала запись, которую я ранее выбрал в другой форме.

Форма клиента:

введите описание изображения здесь

Форма запроса: введите описание изображения здесь Вот поток данных: Record Selected («Добавить задание»)> Нажмите кнопку «Добавить элементы»> «Список элементов» загружает> затем автоматически загружается запись, которую я ранее выбрал в «Добавить задание».

фельд, который потребуется загрузить, - это «ИД проекта» и «Имя клиента»,

ms-access,access-vba,

2

Ответов: 1


1 принят

Использовать OpenArgsаргумент DoCmd.OpenFormметода

введите описание изображения здесь


  • Когда вы нажимаете Add Quotesкнопку, чтобы открыть форму Котировки, отправьте информацию / связанный идентификатор с помощью параметра openArgs.
  • В событии загрузки формы «Котировки» вы можете получить информацию, переданную с использованием Me.OpenArgs

См. Ниже пример кода


На кнопке Добавить котировки нажмите кнопку

Private Sub AddQuotes_Click()

    DoCmd.OpenForm "frmQuotes", OpenArgs:=me.ClientID

End Sub

Форма котировок

Private Sub Form_Load()
    Dim varArgs

    varArgs = Me.OpenArgs

    'Fill the controls with recordset data
    If Not IsNull(varArgs) Then
        With CurrentDb.OpenRecordset("SELECT * FROM tblClients WHERE ClientID = " & varArgs, dbOpenForwardOnly )
                Me.ClientID = !ClientID
                Me.ClientName = !ClientName
                Me.ClientAddress = !ClientAddress
                Me.ClientPhone = !ClientPhone
                Me.ClientEmail = !ClientEmail
            .Close
        End With
    End If

End Sub
мс-доступ, доступ VBA,
Похожие вопросы
Яндекс.Метрика