Aracılığıyla paylaş

Nasıl yapılır: LINQ Kullanarak Sorgu Sonuçlarını Filtreleme (Visual Basic)

Language-Integrated Sorgusu (LINQ), veritabanı bilgilerine erişmeyi ve sorguları yürütmeyi kolaylaştırır.

Aşağıdaki örnek, SQL Server veritabanında sorgular gerçekleştiren ve Where yan tümcesini kullanarak sonuçları belirli bir değere göre filtreleyen yeni bir uygulamanın nasıl oluşturulacağını gösterir. Daha fazla bilgi için bkz. Where Koşulu.

Bu makaledeki örneklerde Northwind örnek veritabanı kullanılmıştır. Veritabanını edinmek için bkz. Örnek Veritabanlarını İndirme.

Not

Bilgisayarınız, aşağıdaki yönergelerde bazı Visual Studio kullanıcı arabirimi öğeleri için farklı adlar veya konumlar gösterebilir. Sahip olduğunuz Visual Studio sürümü ve kullandığınız ayarlar bu öğeleri belirler. Daha fazla bilgi için bkz. "IDE Kişiselleştirme".

Veritabanına bağlantı oluşturmak için

  1. Visual Studio'da, Görünüm menüsünde /Veritabanı Gezgini tıklayarak /Veritabanı Gezgini açın.

  2. Sunucu Gezgini/Veri Bağlantıları sağ tıklayın ve Bağlantı Ekleöğesine tıklayın.

  3. Northwind örnek veritabanı için geçerli bir bağlantı belirtin.

LINQ to SQL dosyası içeren bir proje eklemek için

  1. Visual Studio'da, Dosya menüsünde Yeni üzerine gelin ve Projeöğesine tıklayın. Proje türü olarak Visual Basic Windows Forms Uygulaması'ni seçin.

  2. Project menüsünde Yeni Öğe Ekle'ye tıklayın. LINQ to SQL Sınıfları öğe şablonunu seçin.

  3. dosyayı northwind.dbmlolarak adlandırın. Ekle'tıklayın. Nesne İlişkisel Tasarımcısı (O/R Tasarımcısı) northwind.dbml dosyası için açılır.

O/R Tasarımcısı'na sorguya tablo eklemek için

  1. Sunucu Gezgini/Veritabanı Gezginiiçinde, Northwind veritabanı bağlantısını genişletin. Tablolar klasörünü genişletin.

    O/R Tasarımcısı'nı kapattıysanız, daha önce eklediğiniz northwind.dbml dosyasına çift tıklayarak yeniden açabilirsiniz.

  2. Müşteriler tablosuna tıklayın ve tasarımcının sol bölmesine sürükleyin. Siparişler tablosuna tıklayın ve tasarımcının sol bölmesine sürükleyin.

    Tasarımcı, projeniz için yeni Customer ve Order nesneleri oluşturur. Tasarımcının tablolar arasındaki ilişkileri otomatik olarak algılayıp ilgili nesneler için alt özellikler oluşturduğuna dikkat edin. Örneğin IntelliSense, Customer nesnesinin bu müşteriyle ilgili tüm siparişler için bir Orders özelliği olduğunu gösterir.

  3. Değişikliklerinizi kaydedin ve tasarımcıyı kapatın.

  4. Projenizi kaydedin.

Veritabanını sorgulamak ve sonuçları görüntülemek için kod eklemek için

  1. Araç Kutusu'den bir DataGridView denetimini projeniz için varsayılan Windows Formu olan Form1'e sürükleyin.

  2. Formun Load olayına kod eklemek için Form1'e çift tıklayın.

  3. O/R Tasarımcısı'na tablo eklediğinizde tasarımcı projeniz için bir DataContext nesnesi ekledi. Bu nesne, her tablo için ayrı ayrı nesnelere ve koleksiyonlara ek olarak bu tablolara erişmek için ihtiyacınız olan kodu içerir. Projenizin DataContext nesnesi, .dbml dosyanızın adına göre adlandırılır. Bu proje için DataContext nesnesi northwindDataContextolarak adlandırılır.

    Kodunuzda bir DataContext örneği oluşturabilir ve O/R Tasarımcısı tarafından belirtilen tabloları sorgulayabilirsiniz.

    Veri bağlamınızın özellikleri olarak sunulan tabloları sorgulamak için aşağıdaki kodu Load olayına ekleyin. Sorgu sonuçları filtreler ve yalnızca Londonkonumunda bulunan müşterileri döndürür.

    Dim db As New northwindDataContext

Dim customers_London = From cust In db.Customers
                       Where cust.City = "London"
                       Select cust.CustomerID, cust.CompanyName,
                              OrderCount = cust.Orders.Count,
                              cust.City, cust.Country

DataGridView1.DataSource = customers_London

  4. Projenizi çalıştırmak ve sonuçları görüntülemek için F5 tuşuna basın.

  5. Aşağıda deneyebileceğiniz diğer bazı filtreler yer alır.

    Dim companies_H = From cust In db.Customers
                  Where cust.Orders.Count > 0 And
                        cust.CompanyName.StartsWith("H")
                  Select cust.CustomerID, cust.CompanyName,
                         OrderCount = cust.Orders.Count,
                         cust.Country

Dim customers_USA = From cust In db.Customers
                    Where cust.Orders.Count > 15 And
                          cust.Country = "USA"
                    Select cust.CustomerID, cust.CompanyName,
                           OrderCount = cust.Orders.Count,
                           cust.Country

Ayrıca bkz.

  • Last updated on