/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 vote171 views2 answers
Check if element exists in array golang
TypeScript
7 votes190 views3 answers
How to find how many commits i have done
TypeScript
1 vote171 views2 answers
Subplots matplotlib
TypeScript
0 vote186 views1 answer
Components of loadrunner
TypeScript
1 vote175 views1 answer
Typescript Error: Property 'files' does not exist on type 'HTMLElement'
TypeScript
4 votes167 views3 answers
Find iemts in object of array mongodb
TypeScript
0 vote186 views1 answer
Beautifulsoup search for elements with attributes
TypeScript
0 vote167 views1 answer
Path represents file or directory java
TypeScript
1 vote181 views1 answer
How to edit unity scripts in sublime text
TypeScript
0 vote171 views1 answer
Get_refreshed_fragments too long to load
TypeScript