/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 vote285 views1 answer
Material in angular 4
TypeScript
2 votes206 views1 answer
Prettier eslint typescript
TypeScript
2 votes226 views1 answer
Mat input formatter tel
TypeScript
0 vote192 views1 answer
Hong Kong Human Rights and Democracy Act opinion
TypeScript
0 vote190 views2 answers
Isnull or empty typescript
TypeScript
2 votes220 views5 answers
Plot multiple plots in r
TypeScript
1 vote150 views1 answer
Undefined string typescript
TypeScript
0 vote188 views1 answer
Java a program that converts letters to their corrosponding telephone digits
TypeScript
0 vote196 views2 answers
Giving arguments to main function in c
TypeScript
0 vote191 views1 answer
The softness of a spot lights edge is controlled by penumbra angle, value gives perfect hard edge:
TypeScript