/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

1 vote250 views1 answer
Wordpress have_posts not working
TypeScript
1 vote242 views1 answer
Python headers requests fake
TypeScript
2 votes246 views1 answer
What type of radiation is 5g
TypeScript
3 votes248 views2 answers
MySQL update if exists else insert
TypeScript
9 votes253 views4 answers
Error TS2564: Property 'description' has no initializer and is not definitely assigned in the constructor. in angular class
TypeScript
1 vote246 views1 answer
Tepescript loop object
TypeScript
6 votes258 views2 answers
Typescript how to create an array instance
TypeScript
1 vote237 views1 answer
How to print the results of a command in a fil in linux
TypeScript
0 vote310 views1 answer
How to disable piecelabel on certian charts and keep on other chartjs
TypeScript
0 vote240 views1 answer
Prolog check if element in different lists are same
TypeScript