/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 vote106 views1 answer
Dart exit loop
TypeScript
0 vote113 views1 answer
Wordpress number of posts by user
TypeScript
0 vote112 views1 answer
Typeorm data array from relation
TypeScript
0 vote97 views1 answer
Compare two lists and remove duplicates java
TypeScript
0 vote112 views1 answer
Typescript object destructuring
TypeScript
4 votes119 views3 answers
Show timestamp as yyyy mm dd html angular
TypeScript
0 vote99 views1 answer
Hide elements using DOM in TypeScript
TypeScript
1 vote125 views1 answer
Typescript jest types not found
TypeScript
5 votes110 views3 answers
Add space between subplots matplotlib
TypeScript
1 vote110 views1 answer
Wordpress robots txt file
TypeScript