uygulamalar-fatura hesabı

program bir program yazmak isteyip, aklına birşey gelmeyip te acaba ne yazsam ne yazsam diye düşünenlere bir önbilgi olması amacıyla verilmiştir…

bu programda adı geçen operatör isimleri tamamıyla gerçektir, ancak fiyatlar ve hesaplamalar tamamıyla kafadan sallamadır, ayrıca bizi yoldukları su götürmez bir GERÇEKTİR !!!

uygulamalar-restoran takip

program bir program yazmak isteyip, aklına birşey gelmeyip te acaba ne yazsam ne yazsam diye düşünenlere bir önbilgi olması amacıyla verilmiştir…

öğrendiklerimizi gerçek hayatta nerede uygulayacağız diye merak edenler olabilir, işte küçük bir örnekcik : )

programın nasıl çalıştığını yazmayacağım, ekrana bakıp nasıl çalışması gerektiği de programcılık bilgisi içine girmektedir…

VS2008 IDE bileşenleri

önemli not: alıntıdır (bazı yerlerini kendime uyarladım)

biraz başa dönüş yapalım, bazen başa dönmek gerekir, tıpkı hayatta olduğu gibi : )

VS. NET kod geliştirme ortamı başlıca şu bileşenlerden oluşmuştur:

1) Menü Penceresi:

İki bölümden oluşur:

a) Menü Çubuğu

b) Standart Araç Çubuğu

2)Solution Explorer:

Projede yüklü olan form, modül gibi proje bileşenlerini görüntüler.

Kod görünümüne geçiş yapmak için ise şu yöntemler kullanılabilir:

a)Solution Explorer penceresindeki   düğmesi tıklanarak,

b)View menüsünden Code seçeneği tıklanarak,

c)F7 kısayol tuşu ile.

Form görünümüne geçiş yapmak için ise şu yöntemler kullanılabilir:

a)Solution Explorer penceresindeki düğmesi tıklanarak,

b)View menüsünden Designer seçeneği tıklanarak,

c)Shift+F7 kısayol tuşu ile.

3) Properties Window:

Seçili olan nesnenin özelliklerini kod yazmadan değiştirmek amacı ile kullanılır.

Bu pencere üzerinde bulunan butonlar yardımı ile Properties penceresi üzerinde çeşitli işlemler yapılabilir. Bu butonlar ve anlamları şu şekildedir:

 (Categorized) : Properties penceresindeki özelliklerin benzer özelliklerine göre gruplandırılarak listelenmesini sağlar.

 (Alphabetical) :  Properties penceresindeki özelliklerin alfabetik sıraya göre gruplandırılarak listelenmesini sağlar.

 (Properties) : Properties penceresinde seçili olan nesneye ait özelliklerin listelenmesini sağlar.

 (Events) : Properties penceresinde seçili olan nesneye ait olayların listelenmesini sağlar.

4) Server Explorer:

Yeni bir veri tabanı oluşturmak, oluşturulmuş olan veri tabanları içerisinde düzenlemeler yapmak amacı ile kullanılır.       

5) Error List:

Proje süreci içerisinde oluşan hata ve uyarı mesajlarının görüntülendiği penceredir. Programın çalışmasını kesintiye uğratacak hatalar (X) işareti ile, programın çalışmasını kesintiye uğratmayıp programcıya yol gösterme amaçlı uyarılar ise (!) işareti ile gösterilir.

6) ToolBox :

Visual Studio arabirim ekranının sol tarafında bulunan ve projemize ekleyebileceğimiz nesneleri barındıran bölümdür.

Toolbox içerisine yeni bir nesne eklemek için toolbox’a farenin sağ tuşu ile tıklanarak gelen menüden Choose Items seçeneği tıklanır. Karşımıza gelen pencerede istenilen nesne adı seçilerek ya da Browse seçeneği ile nesnenin adit olduğu dosya adı seçilerek Toolbox içerisine istenilen nesneler eklenebilir.

çok güzel bir dökümandı, görünce yayınlamadan edemedim, hazırlayan http://www.vbnetnedir.com a çok teşekkürler…

Switch yapısı

sanırım bu kod daha sonra Select-Case halini almıştır, artık kullanılmıyor. tek satırda birden fazla şart ve o şartın sonucunu yazabilmemizi sağlıyor. MAtık olarak Select-Case gibi ancak Select-Case de altalta yazıyorduk.

degisken=SWITCH (şart1, doğruise1,şart2,doğruise2,…………..,şartN,doğruiseN)

güzel bir kullanımı var ama artık kullnaılmıyor işte…bakın onun yerine;

Select Case değişken
       case Durum1: komutlar
       case Durum2,Durum3: komutlar     
       case Durum4 to Durum10: komutlar
       case is < Durum11: komutlar
       case is > Durum12: komutlar
       case is = Durum13: komutlar
….
       case DurumN: komutlar
       case Else: komutlar
End Select

ÖRNEK: Textboxa girilen ortalamaya göre Harf karşılığını getiren program.

        Dim ort, sonuc
        ort = Val(TextBox1.Text)
        sonuc = Microsoft.VisualBasic.Switch(ort < 50, "E derece", ort >= 50 And ort < 65, "D derece", ort >= 65 And ort < 85, "C derece", ort > 85, "B derece")
        MsgBox("SONUÇ=" & sonuc)

Switch yapısı için tıklayınız

For…Next uygulama

Örnek: Kullanıcının gireceği iki aralık arasındaki tek, çift veya bütün sayıları toplayacak bir programı yapalım. Örneğimiz için aşağıdaki formu oluşturalım.

 

Dim Bas, Son, top, i

Bas = Val(TextBox1.Text)

Son = Val(TextBox2.Text)

If CheckBox1.checked And CheckBox2. checked Then ‘ her ikiside işaretli ise bütün sayıları

    For i = Bas To Son

        Top = top + i

    Next

End If

 

If CheckBox1. checked And Not CheckBox2. checked Then

        If Bas Mod 2 = 0 Then ‘Başlangıç Çift ise tek yap

                          Bas = Bas + 1

        End If

  

       For i = Bas To son Step 2

                             Top = top + i

       Next

End If

 

If Not CheckBox1. checked And CheckBox2. checked Then

                      ‘Check2 işaretli Check1 değilse çift sayıları

         If Bas Mod 2 <> 0 Then ‘Başlangıç tekse çift yap

                             Bas = Bas + 1

         End If

 

        For i = Bas To son Step 2

                              Top = top + i

        Next

End If

 

LabelBox3.text = top

 

 

 

FOR – NEXT DÖNGÜSÜ

İşlemleri belirli bir sayıda yapılması için kullanılır.

For sayaç=Başlangıç değeri To Bitiş_değeri Step Artış_miktarı

     Komutlar

Next sayaç

* Sayaç belirtilen aralıkta olana kadar işlem yapılır. Step ifadesi sayacın artacağı ya da azalacağı miktarı belirler. Next ifadesi sayacı otomatik olarak azaltır ya da arttırır. Next ifadesinden sonra sayaç yazmya gerek yoktur.

içiçe döngüler sıklıkla kullanılırlar !!!

For sayaç1=Başlangıç değeri To Bitiş_değeri Step Artış_miktarı

          For sayaç2=Başlangıç değeri To Bitiş_değeri Step Artış_miktarı

                    For sayaç3=Başlangıç değeri To Bitiş_değeri Step Artış_miktarı

                             Komutlar

                    Next sayaç3

          Next sayaç2

Next sayaç1

sayaç1 li olan en dış döngüyü, sayaç3 lü olan en içi döngüyü belirtir.

Örnek: ekrana Visual Basic.NET yazan 4 tane mesaj kutusu getir.

Dim i As Integer
For i = 1 To 4
     MsgBox("Visual Basic.NET")
Next

Örnek: 1’den 100’e kadar olan sayıların toplamını hesaplayalım. Yapılan örnekte 1’den 100’e kadar olan sayılar dediğimiz için döngünün başlangıç değeri 1 olarak bitiş değeri ise 100 olarak belirlendi. Bu aralıkta yer alan tüm sayıların toplamı ise Toplam isimli değişkene aktarıldı.

Dim i, Toplam As Integer
For i = 1 To 100
          Toplam = Toplam + i
Next
MsgBox("Toplam Sonucu :" & Toplam)

 

Select Case yapısı

Çok sayıda ihtimaliniz varsa ve hepsini “IF” komutu ile yaparsınız, ama programımız karmaşıklaşabilir ve takip edilmesi zorlaşır. Daha derli toplu işlemler için CASE komutunu kullanırız. Bir değerin birden fazla değer ile karşılaştırmasını yaparak, bu eşitliğin bulunması durumunda belli program parçalarının işlenmesini sağlamak için kullanılır.

Select Case Değişken
       case Durum1: komutlar
       case Durum2,Durum3: komutlar     
       case Durum4 to Durum10: komutlar
       case is < Durum11: komutlar
       case is > Durum12: komutlar
       case is = Durum13: komutlar
….
       case DurumN: komutlar
       case Else: komutlar
End Select

tüm gerekli karşılatırmalar ( = < > to , ) yukarda verilmiştir. eğer değişkenin değeri hiçbirine uymuyorsa case else kısmı devreye girer.

Select Case sec
      Case 1,2,3: x=x+2  ‘sec=1,2,3 ten birisi ise x’i 2 arttır.
      Case 4 to 8: x=x-2  ‘sec 4 ile 8 arasında ise x’i 2 azalt.
      Case 9,12 to 18: x=x*2  ‘sec değeri 9 ise veya 12 ile 18 arasında ise x’i 2 ile çarp
      Case is>18: x=x/2  ‘sec 18’den büyük ise x’i 2 ile böl
      Case Else    x=0     ‘hiçbir durum uygun değilse x’i sıfırla
End Select