/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

3 votes231 views3 answers
Import images angular
TypeScript
0 vote238 views1 answer
How to take multiple int inputs in the same line in C++
TypeScript
2 votes325 views1 answer
Error: failed to synchronize all databases (unable to lock database)
TypeScript
0 vote211 views1 answer
How to pass arguments to filter function in python
TypeScript
1 vote237 views1 answer
Two plots side by side r
TypeScript
3 votes226 views3 answers
Angular email regular expression
TypeScript
0 vote227 views1 answer
- laravel/ui[v3.2.0, ..., 3.x-dev] require illuminate/console ^8.0 -> found illuminate/console[v8.0.0, ..., 8.x-dev] but these were not loaded, likely because it conflicts with another require.
TypeScript
39 votes257 views5 answers
AppData\Roaming\npm\ng.ps1 cannot be loaded because running scripts is disabled on this system.
TypeScript
33 votes271 views4 answers
Typescript remove element from array
TypeScript
0 vote217 views1 answer
Typescript document.queryselector type
TypeScript