folder Tahribat.com Forumları
linefolder Visual Basic - Basic - PicBasic ve Türevleri
linefolder Excel İçindeki Vba Derleyecisinde Bu Nasıl Yapılır



Excel İçindeki Vba Derleyecisinde Bu Nasıl Yapılır

  1. KısayolKısayol reportŞikayet pmÖzel Mesaj
    Pirates
    Pirates's avatar
    Kayıt Tarihi: 20/Temmuz/2009
    Erkek

    Görev 1: İlgili harfe tıklandığında o harf ile başlayan terimlerin listelenmesi

     

    1.       İlgili harf ile başlayan terimleri saklamak amacıyla modül seviyesinde 2 boyutlu bir dizi oluşturun. Dizinin ilk boyutu terimi, ikinci boyutu ise terimin açıklamasını saklamak amacıyla kullanılacaktır.

     

    2.       Terimleri ilgili harf için oluşturduğunuz diziye ekleyin.

     

    3.       Terimleri listelemeden önce ListBox denetiminde yer alan tüm öğeleri silin. ListBox denetiminde yer alan tüm öğeleri silmek için Clear metodunu kullanın.

     

    4.       Bir For ... Next döngüsü kullanarak diziye eklediğiniz terimleri ListBox denetimine ekleyin. ListBox denetimine yeni öğe eklemek için AddItem metodunu kullanın.

     

    5.       Listeleme işleminin ardından listede yer alacak ilk terimin varsayılan olarak seçili olmasını sağlayın. Bu işlem için ListBox denetiminin ListIndex özelliğine 0 değerini atayın ve terimin açıklamasını Label denetiminde görüntüleyin.

     

    Eğer ilgili harf ile başlayan her hangi bir terim yok ise sadece bu işlem adımlarını gerçekleştirin.

     

    1.       ListBox denetiminde yer alan tüm öğeleri silin. ListBox denetiminde yer alan tüm öğeleri silmek için Clear metodunu kullanın.

     

    2.       ListBox denetimine Bu harfle başlayan bir terim yok biçiminde bir öğe ekleyin. ListBox denetimine yeni öğe eklemek için AddItem metodunu kullanın.

     

    3.       Label denetiminde görüntülenen açıklamayı silin.

     

     

     

     

    Görev 2: Listeden seçilen terimin açıklamasının görüntülenmesi

     

    1.       ListBox denetimininde yer alan bir öğeye tıklandığında seçili öğenin değerini kontrol edin. Eğer seçili öğe Bu harfle başlayan bir terim yok ise ilgili olay yordamından çıkın. Yordamdan çıkmak için Exit Sub deyimini kullanın.
    Seçili öğenin değerine göre işlem yapabilmek amacıyla ListBox denetiminin Value özelliği ile If .. Then koşul yapısını kullanın. Koşul yapıları uygulama sürecinin kontrol etmek amacıyla kullanılır.

     

     

     

    If .. Then Koşul Yapısının Söz Dizimi

    If Kosul1 Then
        ' Kosul1 sağlandığında yapılacak işlemler
    ElseIf Kosul2 Then
        ' Kosul2 sağlandığında yapılacak işlemler
    Else
        ' Hiçbir koşul sağlanmadığında yapılacak işlemler
    End If

     

    Örnek

    Dim A, B
    A = 10: B = 15
    If A > B Then
        MsgBox "A B'den büyüktür."
    ElseIf A < B Then
        MsgBox "A B'den küçüktür."
    Else
        MsgBox "A ve B eşittir."
    End If

     

     

     

    2.       Yeni bir If .. Then koşul yapısını kullanarak ListBox denetiminde seçili öğenin ilk harfine göre ilgili terimin açıklamasını Label denetiminde görüntüleyin.

     

     

     

    Seçili öğenin ilk harfini almak ve küçük harfe dönüştürmek için sırasıyla Left ve LCase işlevlerini kullanın. İşlevlerin nasıl kullanıldığını öğrenmek için VBA geliştirme ortamının yardımından faydalanın.

     

      

     

    ----

     

      

     

    Arkadaşlar bunu nasıl yapabilirim?

     

    istenen hangi harfe basılırsa o harfle ilgili  kelimeler gelicek ve o kelişmeler geldiğinde herhangi birinin üzerine tıklannınca bi alt kısımda açıklaması yazıcak, bir nevi sözlük olayı

     

    Reply With Quote Alıntı yap
Toplam Hit: 956 Toplam Mesaj: 1