/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

2 votes292 views1 answer
What are benefits of zip files
TypeScript
1 vote315 views1 answer
Angular reload component on route param change
TypeScript
-1 vote313 views1 answer
Importhtml google sheets multiple tables
TypeScript
13 votes289 views3 answers
Typescript integer
TypeScript
0 vote300 views1 answer
Check runnong ports ubuntu
TypeScript
14 votes312 views2 answers
How to remove elements from object in typescript
TypeScript
0 vote303 views1 answer
Avoid hitting multiple same api hits angular
TypeScript
13 votes295 views5 answers
Useref typescript
TypeScript
2 votes311 views1 answer
Where do scientists get their stem cells for research?
TypeScript
0 vote301 views1 answer
Typescript doesnt read .d.ts
TypeScript