/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 vote114 views1 answer
In grunt cannot be loaded because running scripts is disabled on this system
TypeScript
2 votes117 views2 answers
Date format in typescript
TypeScript
0 vote129 views1 answer
Pointer vers dépots distants git hub
TypeScript
21 votes136 views4 answers
Can't bind to 'ngmodeloptions' since it isn't a known property of 'input'
TypeScript
4 votes120 views2 answers
When to do manual testing
TypeScript
0 vote116 views1 answer
Flutter real device ios vscode
TypeScript
1 vote141 views1 answer
Gets ents within range gmod lua
TypeScript
7 votes127 views3 answers
If temp table exists drop
TypeScript
0 vote127 views1 answer
Angular 6 checkbox checked dynamically
TypeScript
2 votes132 views10 answers
Javascript
TypeScript