top of page
Private Sub cmdPoste_Click() 'Exécution d'un premier code. MsgBox "Ceci est mon premier code" 'Exécution du second code MsgBox "Ceci est le second code" '....et ouverture tu Formulaire "Résultat" DoCmd.OpenForm "Resultat" < بالزر< فتح نمودج
Private Sub AjouterTache_Click() DoCmd.OpenForm "frmAjouter", acNormal, , acFormAdd End Sub إضافة تسجيلة
Private Sub AjouterTache_Click() DoCmd.OpenForm "frmAjouter", acNormal, , "[EmployeID] = Me.(Nom du contrôle dans lequel tu as ton EmployeID)" End Sub
مجموعة من الاكواد
شرح access
bottom of page