/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 vote186 views1 answer
Hop shoots uses
TypeScript
0 vote185 views1 answer
Google sheets k format
TypeScript
3 votes208 views1 answer
Typescript default parameter
TypeScript
1 vote197 views1 answer
How to use mutliple layouts in recyclerview
TypeScript
0 vote185 views1 answer
Get database num hits django
TypeScript
1 vote195 views1 answer
Whats the biggest lesson to know if programming
TypeScript
1 vote194 views1 answer
Concat string typescript
TypeScript
2 votes179 views1 answer
How long does it take to learn typescript
TypeScript
0 vote193 views1 answer
Typescrpt add onject to window namespace
TypeScript
0 vote178 views1 answer
Find unique values between 2 lists R
TypeScript