ArrayList ya da yapıları topluluğu için bir Windows Form'u Visual Basic .NET veya Visual Basic 2005 kullanarak bağlamak hakkında

ÖNEMLİ: Bu makale, bir kişi tarafından çevrilmek yerine, Microsoft makine-çevirisi yazılımı ile çevrilmiştir. Microsoft size hem kişiler tarafından çevrilmiş, hem de makine-çevrisi ile çevrilmiş makaleler sunar. Böylelikle, bilgi bankamızdaki tüm makalelere, kendi dilinizde ulaşmış olursunuz. Bununla birlikte, makine tarafından çevrilmiş makaleler mükemmel değildir. Bir yabancının sizin dilinizde konuşurken yapabileceği hatalar gibi, makale; kelime dağarcığı, söz dizim kuralları veya dil bilgisi açısından yanlışlar içerebilir. Microsoft, içeriğin yanlış çevrimi veya onun müşteri tarafından kullanımından doğan; kusur, hata veya zarardan sorumlu değildir. Microsoft ayrıca makine çevirisi yazılımını sıkça güncellemektedir.

313638
Bu makale arşivlenmiştir. "Olduğu gibi" sunulmaktadır ve bundan sonra güncelleştirilmeyecektir.
Özet
Bu adım adım makalede, Windows forma bir ArrayList yapıları bağlamak gösterilmiştir. Örnek, üç metin kutusu ile Windows ArrayList taşımak için yapı üyeleri ve dört komut düğmeleri görüntülemek için form içerir.

Gereksinimler

Microsoft Visual Basic .NET'i veya Microsoft Visual Basic 2005

back to the top

Tartışma kodu

Bu bölüm, bu görevi tamamlamak için gerekli olan önemli kodlama kavramlarını açıklar.

Yapısını tasarlama

Bir forma bağlı olan BIR yapı üye erişenleri olmalıdır. Yapı üye erişimcileri neredeyse Özellik kümesi gösterilenlerle aynı / Al, yapı bir sınıfta bulunamadı. Bu makaledeki örnek için kullanılan yapı (yalnızca biri gösterilir) üç üye yok. Bir parametreli hale getirilmiş bir kurucu sağlanan ancak gerekli değildir.
Private Structure guitar    Friend mmake As String    Friend mmodel As String    Friend myear As Short    Public Sub New(ByVal make, ByVal model, ByVal year)        Me.mmake = make        Me.mmodel = model        Me.myear = year    End Sub    Public Property make() As String        Get            make = mmake        End Get        Set(ByVal Value As String)            mmake = Value        End Set    End PropertyEnd Structure				

back to the top

Için bir ekleme yapı örnekleri

T örneği oluşturmak ve bunları için ArrayList eklemek için şu adımları izleyin:
  1. Yapısının türünde değişken bildirir.
  2. Bir ArrayList bildirin.
  3. Yapısı yaratmak ve ArrayList için bunları ekleyin.
Private myStruct As guitarDim al As New ArrayList()myStruct = New guitar("Gibson", "Les Paul", 1958)al.Add(myStruct) myStruct = New guitar("Fender", "Jazz Bass", 1964)al.Add(myStruct)myStruct = New guitar("Guild", "Bluesbird", 1971)al.Add(myStruct)				

back to the top

Yapı üyeleri, form denetimleri için bağlama

ArrayList doldurulur sonra Windows Forms denetimleri için tek tek üyelere yapısının bağlayabilirsiniz. Bunu yapmak için <a0></a0>, Metin kutusu DataBindings özelliği <a1>Ekle</a1> yöntemini arayın ve bağlanacak özelliği, ArrayList adını ve yapısını üyesi geçirmek gerekir.
TextBox1.DataBindings.Add("Text", al, "make")TextBox2.DataBindings.Add("Text", al, "model")TextBox3.DataBindings.Add("Text", al, "year")				

back to the top

ArrayList arası taşıma için bir yol sağlar.

Işleminde son adım, ArrayList taşımak için bir yol sağlamaktır. Bunu yapmak için <a0></a0>, bir CurrencyManager kullanmanız gerekir. CurrencyManager formun BindingContext ile bu durumda, yapıları ArrayList ilişkilendirin.
Private cMan As CurrencyManagercMan = CType(Me.BindingContext(al), CurrencyManager)				
CurrencyManager nesnesi'ı ArrayList üyeleri üzerinde yineleme için kullanılabilirler bir Konum özelliğine sahiptir. Ekleme veya konumu, geçerli değerini çıkararak, formda ArrayList farklı üyeleri de görüntüleyebilirsiniz.
'Move forward one element. cMan.Position += 1'Move back one element.cMan.Position -= 1'Move to the beginning.cMan.Position = 0'Move to the end.cMan.Position = al.Count - 1				

back to the top

Adım adım örnek

  1. Yeni bir Windows uygulaması projesi, Visual Basic 2005 veya Visual Basic. NET'te açın.
  2. Form1'e üç metin kutusu ekleyin ve sonra bu denetimleri yatay yerleştir.
  3. Form1'e dört komut düğmesi ekleyin ve sonra bu denetimleri yatay yerleştir.
  4. Metin özellik Button1 ileri için değiştirin.
  5. BUTTON2 metin özelliği, önceki için değiştirin.
  6. Metin özellik Button3 ilk için değiştirin.
  7. Button4 metin özelliği, son için değiştirin.
  8. Aşağıdaki kodu, Beyanname bölüm Form1 ekleyin:
    Private Structure guitar    Friend mmake As String    Friend mmodel As String    Friend myear As Short    Public Sub New(ByVal make, ByVal model, ByVal year)        Me.mmake = make        Me.mmodel = model        Me.myear = year    End Sub    Public Property make() As String        Get            make = mmake        End Get        Set(ByVal Value As String)            mmake = Value        End Set    End Property    Public Property model() As String        Get            model = mmodel        End Get        Set(ByVal Value As String)            mmodel = Value        End Set    End Property    Public Property year() As Short        Get            year = myear        End Get        Set(ByVal Value As Short)        myear = Value        End Set    End PropertyEnd StructurePrivate myStruct As guitarPrivate al As New ArrayList()Private cMan As CurrencyManager					
  9. Form_Load olay için aşağıdaki kodu ekleyin:
    myStruct = New guitar("Gibson", "Les Paul", 1958)al.Add(myStruct)myStruct = New guitar("Fender", "Jazz Bass", 1964)al.Add(myStruct)myStruct = New guitar("Guild", "Bluesbird", 1971)al.Add(myStruct)cMan = CType(Me.BindingContext(al), CurrencyManager)TextBox1.DataBindings.Add("Text", al, "make")TextBox2.DataBindings.Add("Text", al, "model")TextBox3.DataBindings.Add("Text", al, "year")					
  10. Form_Load olayından sonra aşağıdaki kodu ekleyin:
    Private Sub Button1_Click(ByVal sender As System.Object, ByVal e AsSystem.EventArgs) Handles Button1.Click        cMan.Position += 1End SubPrivate Sub Button2_Click(ByVal sender As System.Object, ByVal e AsSystem.EventArgs) Handles Button2.Click        cMan.Position -= 1End SubPrivate Sub Button3_Click(ByVal sender As System.Object, ByVal e AsSystem.EventArgs) Handles Button3.Click        cMan.Position = 0End SubPrivate Sub Button4_Click(ByVal sender As System.Object, ByVal e AsSystem.EventArgs) Handles Button4.Click        cMan.Position = al.Count - 1End Sub					
  11. Oluşturup projeyi çalıştırın.
  12. Farklı ArrayList öğeleri görüntülemek için düğmeleri tıklatın. Not nesnelerin değerlerini düzenleyebilirsiniz.
back to the top

Topluluk kullanma

Bir koleksiyon nesnesi, yapıların depolamak için kullanabilirsiniz. Koleksiyonu kullanımını sınamak için <a0></a0>, Form_Load olay yordamında aşağıdaki kod satırını bulun:
Private al As New ArrayList()
önceki satırın kodu aşağıdaki kodla değiştir ve örnek'ı yeniden çalıştırın:
Private al As New Collection()

back to the top

Başvurular

Visual Studio .NET veya Visual Studio 2005 çevrimiçi Yardım'ın belgelerinde aşağıdaki konuya bakın:
Tüketici Windows formlarda veri
back to the top

Uyarı: Bu makalenin çevirisi otomatik olarak yapılmıştır

Özellikler

Makale No: 313638 - Son İnceleme: 02/24/2014 20:25:13 - Düzeltme: 3.3

  • Microsoft Visual Basic .NET 2002 Standard Edition
  • Microsoft Visual Basic .NET 2003 Standard Edition
  • Microsoft Visual Basic 2005
  • kbnosurvey kbarchive kbmt kbvs2005swept kbvs2005applies kbhowtomaster KB313638 KbMttr
Geri bildirim