Dim str As String str = txtValue.Value DoCmd.Close DoCmd.OpenForm "frmTwo", acNormal, , , , acWindowNormal, "Value=" + str
Quote: VB ' Invoked by some Button on the first form ' Sub GoToSecondPage() DoCmd.OpenForm "MySecondPage", acNormal, , , , , txtEmployee.Value End Sub ' Second form ' Sub Form_Open(Cancel As Integer) If Not IsNull(Me.OpenArgs) Then lblShowEmployeeName.Value = Me.OpenArgs End If End Sub
' Invoked by some Button on the first form ' Sub GoToSecondPage() DoCmd.OpenForm "MySecondPage", acNormal, , , , , txtEmployee.Value End Sub ' Second form ' Sub Form_Open(Cancel As Integer) If Not IsNull(Me.OpenArgs) Then lblShowEmployeeName.Value = Me.OpenArgs End If End Sub
var
This content, along with any associated source code and files, is licensed under The Code Project Open License (CPOL)