/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 views3 answers
Get local storage data in angular
TypeScript
0 vote166 views1 answer
How can you run your test in different environments
TypeScript
3 votes190 views2 answers
Adonis load relationship
TypeScript
1 vote208 views1 answer
Node fetch exports is not defined
TypeScript
4 votes191 views3 answers
Cors npm typescript
TypeScript
0 vote185 views1 answer
Nestjs get request header in guard
TypeScript
0 vote174 views3 answers
Node rts stream
TypeScript
1 vote197 views1 answer
Type 'MutableRefObject<undefined>' is not assignable to type 'RefObject<HTMLInputElement>'. Types of property 'current' are incompatible. Type 'undefined' is not assignable to type 'HTMLInputElement | null'. TS2322
TypeScript
-1 vote195 views1 answer
Laws of UX: Using Psychology to Design Better Products & Services pdf
TypeScript
1 vote273 views2 answers
Typescript \!
TypeScript