/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 vote234 views1 answer
Take commits from main and move to a new branch
TypeScript
2 votes251 views2 answers
Lua operators
TypeScript
0 vote313 views2 answers
Eslint absolute imports error
TypeScript
0 vote275 views1 answer
Kingthings tryperwriter fonts premier
TypeScript
0 vote287 views2 answers
_swapbatch.foreach multiple statements c#
TypeScript
8 votes260 views1 answer
How to divide a list into sublists python
TypeScript
0 vote254 views1 answer
Java delete contents of file
TypeScript
6 votes298 views2 answers
Check all running ports ubuntu
TypeScript
0 vote256 views1 answer
The Android Gradle plugin supports only Kotlin Gradle plugin version 1.3.40 and higher. The following dependencies do not satisfy the required version: project ':video_compress' -> org.jetbrains.kotlin:kotlin-gradle-plugin:1.3.31
TypeScript
0 vote260 views1 answer
How to Write a program that accepts three decimal numbers as input and outputs their sum on python
TypeScript