Preview:
DoCmd.OpenForm stDocName, , , stLinkCriteria, stSerial
 
Private Sub Form_Open(Cancel As Integer)
    If Not IsNull(Me.OpenArgs) Then
        Dim stSerial As String
        stSerial = Me.OpenArgs
        Me.txtSerial = stSerial
    End If
End Sub
downloadDownload PNG downloadDownload JPEG downloadDownload SVG

Tip: You can change the style, width & colours of the snippet with the inspect tool before clicking Download!

Click to optimize width for Twitter