Как я могу передать значение из одной формы в другую форму в MS Access - PullRequest
0 голосов
/ 13 ноября 2018

Я просто пересматриваю свой запрос с подробным кодом.У меня есть основная форма ввода данных.Давайте назовем это form1.В form1 у меня есть имя текстового поля allow_number и кнопка get_permit_no.Чтобы получить номера разрешений, я сравнил две таблицы и извлек все возможные числа в запросе.Когда я нажимаю get_permit_no, появляется форма form2 со всеми возможными номерами разрешений.Форма 2 использует запрос в качестве источника записи.

this is form2

Затем пользователь может выбрать любое число, установив флажок.Затем, когда пользователь нажимает кнопку выбора номера разрешения, я хочу передать это значение в form1.permit_number.Например, если пользователь выбрал 79959901,77994803, то я хочу передать всю строку в form1.permit_number.

Вот мой код.

Public Sub CmdInsertPermitno_Click()
    DoCmd.RunCommand acCmdSaveRecord

    Dim rs As DAO.Recordset
    Dim strSQL
    strSQL = "Select permitno from query3 where check =" & -1

    Set rs = CurrentDb.OpenRecordset(strSQL)
    Dim pno As String
    Dim getpno As String

    getpno = ""

    With rs
        If Not .BOF And Not .EOF Then
            .MoveLast
            .MoveFirst

            While (Not .EOF)
                pno = rs.Fields("[permitno]")
                 .MoveNext
                getpno = getpno & "," & pno

            Wend
        End If
    End With

    Set rs = Nothing
            getpermitno = Right(getpno, Len(getpno) - 1)

    DoCmd.OpenForm "Data Entry", acNormal, , , , acWindowNormal, OpenArgs:="getpermitno"

End Sub

Сначала мне нужно вернуться к форме1 какпоследнее открытие рекордного места.Тогда я хочу передать значение.

Спасибо, Htet

Добро пожаловать на сайт PullRequest, где вы можете задавать вопросы и получать ответы от других членов сообщества.
...