/TypeScript/Access - Open form non data entry mode

Access - Open form non data entry mode

Private Sub openRecBtn_Click()
    Dim numID As Long

    numID = InputBox("Please enter the ID : ")

    If DCount("*", "yourTable", "numberID = " & numID) <> 0 Then
        DoCmd.OpenForm "tmpFrmName", WhereCondition:="numberID = " & numID
    Else
        MsgBox "The numberID : " & numID & " does not exist, please try again !"
    End If
End Sub

Source: stackoverflow.com

Similar codes

0 vote129 views2 answers
Rails precompile assets in a directory
TypeScript
0 vote136 views1 answer
Error: postfix operator toArray needs to be enabled
TypeScript
0 vote129 views1 answer
Disable sonar rule in code
TypeScript
1 vote124 views1 answer
Macos fonts download for linux ubuntu
TypeScript
7 votes122 views5 answers
How to multiply two lists in python
TypeScript
9 votes135 views2 answers
Delete all child elements jquery
TypeScript
0 vote126 views1 answer
Check if email exists firebase
TypeScript
7 votes192 views3 answers
Module was compiled with an incompatible version of kotlin. the binary version of its metadata is 1.5.1, expected version is 1.1.16.
TypeScript
1 vote132 views2 answers
Passport serializeUser
TypeScript
0 vote150 views1 answer
Subscripts list c#
TypeScript