18-04-13, 18:35
|
| Όνομα: Γιώργος Έκδοση λογισμικού Office: Ms-Office 2010 Γλώσσα λογισμικού Office: Ελληνική, Αγγλική | | Εγγραφή: 18-06-2010
Μηνύματα: 3.674
| |
Καλησπέρα
Στέλιο, καλωσόρισες στην παρέα μας.
Για το ζητούμενο, δοκίμασε τον παρακάτω κώδικα. Κώδικας: Private Sub lb1_Click()
DoCmd.OpenForm "Φόρμα1"
Forms("Φόρμα1").t1 = Me.t2.Text
End Sub
Φιλικά/Γιώργος
|