/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 vote301 views2 answers
Check if element exists in array golang
TypeScript
20 votes310 views2 answers
Typescript how to color your console loggers
TypeScript
0 vote349 views1 answer
Already included file name react tsconfig
TypeScript
0 vote323 views1 answer
How to show account related contacts on click of a button using lightnig components
TypeScript
2 votes896 views2 answers
Laravel custom exists rule
TypeScript
0 vote317 views1 answer
.htaccess Preventing requests with invalid characters
TypeScript
0 vote309 views2 answers
Get only parent child elements beautiful soup
TypeScript
0 vote310 views1 answer
Typescript class validator validate enum array
TypeScript
3 votes363 views1 answer
/C:/flutter/packages/flutter/lib/src/widgets/localizations.dart:413:17: Context: Found this candidate, but the arguments don't match.
TypeScript
1 vote356 views1 answer
Luxon react ts install
TypeScript