/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 vote191 views1 answer
User acceptance testing vs system testing
TypeScript
0 vote140 views2 answers
Localstorage.getitem angular
TypeScript
0 vote351 views1 answer
How to print selected elements from a list
TypeScript
1 vote198 views2 answers
Typescript formik useFormik
TypeScript
0 vote191 views1 answer
Execute script when c# code gets executed
TypeScript
0 vote194 views1 answer
Pass generic type to arow function typescript
TypeScript
5 votes254 views1 answer
Heroku database error unknow attribute first_name for user
TypeScript
1 vote164 views2 answers
Extends multiple class typescript
TypeScript
-1 vote203 views1 answer
What was in Rome that helped Renaissance artists achieve their goal of Humanism?
TypeScript
-1 vote211 views3 answers
Merge two arrays of objects lodash
TypeScript