728x90 AdSpace

  • Latest News

    3/15/2009

    Vb.NET For Next Döngüsü Örnek Uygulama

    Aşağıdaki kodları vb.net te bir formun üzerine buton ekleyip kod kısmına ekleyin...
    Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click

    Dim gunler(6) As String
    Dim i As Integer
    gunler(0) = "Pazartesi"
    gunler(1) = "Salı"
    gunler(2) = "çarşamba"
    gunler(3) = "Perşembe"
    gunler(4) = "Cuma"
    gunler(5) = "Cumartesi"
    gunler(6) = "Pazar"
    For i = 0 To 6
    MsgBox(i & ". gün" & vbTab & gunler(i))
    Next

    End Sub
    Şimdi öncelikle burada gunler(6) yapmamızın nedeni dizinllerde ilk indisin 0(sıfır) olmasındandır. vb.net ilk indisi 0(sıfır) kabul eder.. " i " döngü yapacağımız için yazdık. hemen aşağısında 0(sıfır) dan başlayarak günleri tanımladık. daha sonra For i=0 to 6 dedik İ ye 0 - 6 dizinlerini atadık... i nin ilk değeri sıfırdır. Daha sonra msgbox diyerek her dönmede 1 artacak ve bize 1. gün pazartesi gibi bir uyarı penceresi açacaktır. vbtab kodumuz araboşluk & ise birleştirme oparatörümüzdür... Şİmdi kodumuzu biraz değiştirelim. Kullanıcıya sayı isteyen diyalog kutusu açıp kullanıcının yazdığı sayıya göre hangi gün olduğunu bulalım...

    Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click

    Dim gunler(7), soru As String
    gunler(1) = "Pazartesi"
    gunler(2) = "Salı"
    gunler(3) = "çarşamba"
    gunler(4) = "Perşembe"
    gunler(5) = "Cuma"
    gunler(6) = "Cumartesi"
    gunler(7) = "Pazar"
    soru = InputBox("Gün Sayısı yazın", "Gün sırası belirtiniz")
    MsgBox (soru & ". gün" & vbTab & gunler(soru))

    End Sub
    burada da sadece soru adında bir değişken tanımlayarak kullanıcıya bir sorgu penceresi açtık kullanıcı 2 yazdı diyelim. soru'nun değeri 2 oldu ve msgbox kutumuzda 2.gün Salı adında bir uyarı aldık... Bir diğer farklılıkta ilk indisi 1 olarak belirledik çünkü normalde 0 diye bir gün yok ve kullanıcı 0 yazmaz..

    Mehmet Ali

    Grafik tasarım konusunda bir şeyler öğrenmekte, öğrenmekte olduklarını paylaşmakta.

    Website: Mhmtalizm

    • Blogger Yorumları
    • Facebook Yorumları

    0 yorum:

    Yorum Gönder

    Item Reviewed: Vb.NET For Next Döngüsü Örnek Uygulama Rating: 5 Reviewed By: Kirli Adam
    Scroll to Top