![]() |
|
|
#1 (permalink) |
|
CSI USLANMAM
![]() ![]() |
Dizi (Array)
Dizi, bellekte aynı isim altında toplamış değişkenler kümesine verilen isimdir. Dizinin kullanım alanlarına gelince ise, aynı türe ait bilgileri bellekte tutmak istediğimizde örneğin bir veri gurubunu sıralamak istediğimizde ya da verilere ait bazı istatiksel bilgilerin hesaplanmasında bize yardımcı olur. VB'de diziler; DiziAdi(ElemanSayisi) Şeklinde gösterilir. Bir örnek verecek olursak Sayilar(20) Ucgen(2) Kare(3) Yukardaki örneklerde Sayilar isminde 0 dan 20 ye kadar toplam 21 elemanlı bir dizi tanımlanmıştır. VB'de iki farklı dizi türü vardır bunlar; 1.) Statik Diziler: Bu tip dizilerde dizinin eleman sayısı önceden belirlenir ve eleman sayısı sabittir. Örneğin programımızda Dim Sayilar(20) as Integer diye bir kod yazarsanız projenizde toplam 21 elamanlı ve sayısal bir veri türünü tutacak bir dizi tanımlamış olursunuz. Eğer dizimizin 20 elamanlı yani Sayilar(1) 'den başlamasını istiyorsak Form 'un veya Modülün General/Declarations kısmına Option Base 1 deyimini kullanmamız gerekecekti Option Base 0 ise dizinin ilk elemanının 0 'dan başlayacağını bildirir ki zaten bu da standart(default) biçimidir dolaysıyla kullanmaya gerek yoktur. Bu arada küçük birde not vermek gerekirse Option Base deyimi VB 6.0 sonrasında bulunmayacak yani bütün diziler 0 'dan başlayacak onun için bu deyimi kullanıp alışkanlık yaratmaya hiç gerek yok. 2.) Dinamik Diziler: Bu tip dizilerde ise dizinin eleman sayısını program akışı içerisinde kontrol edebiliyoruz bunu ise diziyi Dim Sayilar() as Integer şeklinde dizinin eleman sayısı hakkında herhangi bir değer vermeden belirttikten sonra ReDim Sayilar(10) as Integer şeklinde dizinin eleman sayısını program akışı esnasında tanımlıyoruz. Ancak diziyi yeniden boyutlandırırken unutulmaması gereken nokta dizinin içindeki verilerin silineceğidir. Eğer verilerin silinmemesini istiyorsak diziyi yeninden boyutlandırırken ReDim Preserve Sayilar(10) As Integer şeklinde belirtmemiz gerekir.Şimdi buraya kadar öğrendiklerimizi bir örnekle pekiştirelim. Örnek 1:Girilen 10 tane sayının toplamını ve ortalamasını veren örnek program ![]() ![]() ![]() ![]() Birden Fazla Boyutlu Diziler : VB 'de istenirse birden fazla boyutta dizilerde tanımlanabilir. Örneğin; Dim Tablo(4,3) As Integer Dim DersSonuçları(3,3,1) As Integer Yukarda ki tanımlama ile çok boyutlu diziler yaratmış olduk Dikkat ettiyseniz her boyuta ait index numarası birbirinden virgülle ayrılarak diziler boyutlandırılabiliyor. Bu konuyu her zaman yaptığımız gibi bir örnekle açıklayalım ![]() Bileşenleri formumuza yukarda ki gibi yerleştirdikten sonra Matematik dersi için koyduğumuz 3 tane "Text Box" 'ın adını VB 'nin sol tarafındaki "Properties" Penceresinde ki "(Name)" değerini değiştirerek sırası ile "Matematik1", "Matematik2" ve "Matematik3" yapalım bu işlemi diğer dersler içinde tekrarlayalım daha sonra "Ortalaması" başlıklı Labellerimizin hepsinede "Ortalama" adını verelim bu sırada VB bize "You have already a control named 'Ortalama'. Do you want to create a control array?" diyerek bir kontrol dizisi oluşmak isteyip istemediğimizi soracak bu soruyu "Evet" diye cevaplandırarak bir kontrol dizisi oluşturalım(*) "Ortalama" başlıklı düğmemize çift tıklayarak aşağıda ki kodları yazalım ![]() Dizi İçin Sınırlar : VB'de dizi için alt ve üst sınırlar belirleyebiliriz bu sınır 0 ve pozitif sayılar olabileceği gibi negatif sayılarda olabilir. Örneğin Dim Dizi1(1 To 20) As Integer style='font-size:8.0pt;font-family:Tahoma; color:black'>LBOUND ve UBOUND Fonksiyonları : Dim Dizi2(0 To 5) As String Dim Dizi2(-10 To 10) As Byte İstenilen bir dizinin belirtilen boyutunun alt ve üst sınırlarının ne olduğunu öğrenmemize yarar örneğin; Private Sub Command1_Click() Dim Dizi(-5 To 15, -10 To 20) AsInteger Print "Dizinin ;" Print "-------------------------------------------" Print "1. Boyutunun Alt Sınırı : " & LBound(Dizi, 1) Print "1. Boyutunun Üst Sınırı : " & UBound(Dizi, 1) Print "-------------------------------------------" Print "2. Boyutunun Alt Sınırı : " & LBound(Dizi, 2) Print "2. Boyutunun Üst Sınırı : " & UBound(Dizi, 2) End Sub ![]()
__________________
[Linkleri üyelerimiz görebilir.Üyeyseniz Mailinizi OnaylayınBurayı tıklayarak üyemiz olabilirsiniz.]
Benim yaradılışımda bir fevkalâdelik varsa, o da Türk olarak dünyaya gelmemdir. Mustafa Kemal Atatürk Tarihini bilmeyenin coğrafyasını başkaları ÇİZER... |
|
|
|
|
|
#2 (permalink) |
|
Onursal
![]() |
Resimler problemli malesef konudan faydalanamıyorum ![]()
__________________
Gün batar usul usul kararır gece Bardaktan boşanır yağmur sel olur gider. Gündüzler geceler ne zaman biter? Şu batan güneş nereye gider? Buharlaşır yeniden dökülen su, Bulutları sil pencerenden sevgi devrialemi bu, Yeniden doğar herşey, 'Herşey bitti' dediğin anda bir gül kök salar damarlarında, Herşey biter bir şey bitmez.. Herşey biter SEN bitmezsin ne ömrümde ne de gönlümde..
|
|
|
|
![]() |
| Konuyu Toplam 1 Üye okuyor. (0 Kayıtlı üye ve 1 Misafir) | |
| Seçenekler | |
| Stil | |
|
|
Benzer Konular
|
||||
| Konu | Konuyu Başlatan | UslanmaM | Cevaplar | Son Mesaj |
| FTP Nedir? Nasıl Kullanılır? | ABYSS | İnternet | 5 | 02-22-2008 02:02 AM |
| bu WC nasıl kullanılır ? | EXiR | İlginç Bilgiler | 9 | 09-17-2007 07:04 PM |
| Ertesi gün hapı nedir? Nasıl kullanılır? | ÇiÇEK | Cinsel Sağlık Bilgisi | 0 | 07-30-2007 09:28 PM |
| Döküman: FTP Nedir? Nasıl Kullanılır? | BoDyGuArD | İnternet | 1 | 01-10-2007 09:29 AM |
| HDD nedir nasıl çalışır para nasıl kazandırır | BoDyGuArD | Donanım | 1 | 01-06-2007 08:22 AM |