Εμφάνιση ενός μόνο μηνύματος
  #2  
Παλιά 06-07-14, 21:40
kapetang Ο χρήστης kapetang δεν είναι συνδεδεμένος
Όνομα: Γιώργος
Έκδοση λογισμικού Office: Ms-Office 2010
Γλώσσα λογισμικού Office: Ελληνική, Αγγλική
 
Εγγραφή: 18-06-2010
Μηνύματα: 3.674
Προεπιλογή

Καλησπέρα

Γιώργο, θα μπορούσες να προσαρμόσεις στα δεδομένα σου τον κώδικα:

Κώδικας:
Private Sub cboCustomers_Click()
    If Nz(Me.cboCustomers, "") <> "" Then
        DoCmd.OpenForm "frmCustomer", acNormal, , "CustomerNo=" & Me.cboCustomers
    End If
End Sub
Φιλικά/Γιώργος