Metin kutularını çok sütunlu Birleşik Giriş Kutusu seçimleri ile doldurma

Orta: Temel makro, kodlama ve birlikte çalışabilirlik becerileri gerektirir.

Bu makale bir Microsoft Access veritabanı (.mdb) ve bir Microsoft Access projesi (.adp) için geçerlidir.

Özet

Bu makalede, birden çok metin kutusunu çok sütunlu birleşik giriş kutusunda yapılan seçimlerle doldurma ve ardından metin kutularının içeriğini tabloda tek bir kayıt olarak kaydetme işlemleri açıklanmaktadır.

Daha fazla bilgi

Dikkat

Bu örnekteki adımları izlerseniz örnek veritabanı Northwind.mdb değiştirirsiniz. Northwind.mdb dosyasını yedeklemek ve veritabanının bir kopyasında bu adımları izlemek isteyebilirsiniz.

Microsoft, programlama örneklerini yalnızca gösterim amacıyla sağlar; örtülü veya açık garanti vermez. Buna zımni garantiler, satılabilirlik veya belirli bir amaca uygunluk da dahildir, ancak bunlarla sınırlı değildir. Bu makale, gösterilen programlama dilini ve yordamları oluşturmak ve hata ayıklamak amacıyla kullanılan araçları kullanmayı bildiğinizi varsayar. Microsoft destek mühendisleri, belirli bir yordamın işlevselliğinin açıklanmasına yardımcı olabilir, ancak gereksinimlerinizi karşılamaya yönelik olarak ek işlevsellik sağlamak veya yordamlar geliştirmek amacıyla bu örnekleri değiştirmezler. Metin kutularını çok sütunlu birleşik giriş kutusunda yapılan seçimlerle güncelleştirmek için aşağıdaki adımları kullanın:

  1. Örnek veritabanı Northwind.mdb açın.

  2. Northwind.mdb'de aşağıdaki alanları içeren yeni bir tablo oluşturun:

    Table: Table1
    ----------------------
    Field Name: ID
    Data Type: Autonumber
    Primary Key
    ---
    Field Name: FirstName
    Data Type: Text
    ---
    Field Name: LastName
    Data Type: Text
    ---
    Field Name: Title
    Data Type: Text
    
  3. Northwind.mdb'da aşağıdaki denetimleri içeren yeni bir form oluşturun:

    Form: Form1
    ----------------------
    RecordSource: Table1
    ---
    Control Type: Text Box
    Name: txtFirstName
    ControlSource: FirstName
    ---
    Control Type: Text Box
    Name: txtLastName
    ControlSource: LastName
    ---
    Control Type: Text Box
    Name: txtTitle
    ControlSource: Title
    
  4. Form1'e birleşik giriş kutusu ekleyin. Birleşik Giriş Kutusu sihirbazında şu adımları izleyin:

    1. Birleşik giriş kutusunun tablo veya sorgudaki değerleri aramasını istiyorum'a tıklayın ve ardından İleri'ye tıklayın.
    2. Tablo: Çalışanlar'a ve ardından İleri'ye tıklayın.
    3. Her alanı seçip düğmeye tıklayarak > , Kullanılabilir Alanlar listesinden LastName, FirstName ve Title alanlarını Seçili Alanlar listesine taşıyın. İleri'yi tıklatın.
    4. İleri'ye tıklayın, Değeri daha sonra kullanmak üzere anımsa'ya ve ardından İleri'ye tıklayın.
    5. Birleşik giriş kutunuz için hangi etiketi istersiniz kutusuna Seçim Yap yazın ve Son'a tıklayın.
  5. 4. adımda oluşturduğunuz birleşik giriş kutusuna sağ tıklayın ve ardından Özellikler'e tıklayın.

  6. Diğer sekmesine tıklayın ve ad kutusuna cboNames yazın.

  7. Olay sekmesine tıklayın, Güncelleştirmeden Sonra olay kutusuna tıklayın ve ardından Oluştur (...) düğmesine tıklayın.

  8. Kod Oluşturucusu'na ve ardından Tamam'a tıklayın.

  9. Visual Basic Düzenleyici aşağıdaki kodu yazın:

Private Sub cboNames_AfterUpdate()
   Me.txtFirstName = Me![cboNames].column(1)
   Me.txtLastName = Me![cboNames].column(2)
   Me.txtTitle = Me![cboNames].column(3)
End Sub

  1. Visual Basic Düzenleyici çıkın ve Form1 formunu Form görünümünde açın.
  2. Birleşik giriş kutusunda bir öğeye tıklayın ve ardından Sonraki Kayıt'a tıklayın. Kaydetmek istediğiniz her kayıt için bu adımı yineleyin.
  3. Yeni kayıtların kaydedildiğini onaylamak için Tablo1'i Tablo görünümünde açın. Birleşik giriş kutusundaki bir öğeye tıkladıktan sonra AfterUpdate özelliğinin formdaki üç metin kutusunu dolduran olay yordamını çalıştırdığını ve Tablo1'e yeni bir kayıt eklendiğini unutmayın.