Private Sub Liste28_KeyDown(KeyCode As Integer, Shift As Integer)
If KeyCode = vbKeyF10 Then DoCmd.OpenForm "Siparis1", , , ""
End Sub
Google den araştırınca buldum.
::::::......Can You Buy Freedom?.........::::::
::::::......Does Money Buy Freedom?....:::::
::::::......Does Money Buy Freedom?....:::::