sözlük

[karaelmas4467]

sözlük konulu bir çok başlık var ama yine de istediğimi yapamadım. açıklama ekli dosyadadır. yardımcı olacaklara şimdiden teşekür ederim.

 

[leumruk]

Merhaba,
Örneği inceleyiniz.

 

[karaelmas4467]

teşekür ederim.

 

[leumruk]

teşekür ederim.

Rica ederim.

 

[karaelmas4467]

Merhaba,
Örneği inceleyiniz.

Selamlar.. bu dosyada listbox verileri excel çalışma sayfasından alıyor. listboxun verileri for next döngüsü kullanarak almasını sağlayabilirmiyiz. yani -a- tuşuna tıklandığında a ile başlayan veriler çalışma sayfasından değil de döngü ile listelensin. bunun için a- ile başlayan terimlerin ilgili tuş için oluşturulan diziye eklenmesi gerekiyor ama ben beceremedim. şimdiden tşk ederim.

 

[leumruk]

Kelimeleri sayfadan alıyor. Kelime alırken For-Next döngüsü kullanıyor. Sanırım siz kelimeleri kodların içine yerleştirmek istiyorsunuz.

 

[karaelmas4467]

evet kelimeleri kodlara yerleştirmek istiyorum. zamanınızı almaması için a-b-c- harflerine 2 şer tane ekleyip yapabilirseniz, ben üzerinde çalışırım. tşk..

 

[leumruk]

evet kelimeleri kodlara yerleştirmek istiyorum. zamanınızı almaması için a-b-c- harflerine 2 şer tane ekleyip yapabilirseniz, ben üzerinde çalışırım. tşk..

Kullanışlı olur mu bilemem; ancak isteğiniz doğrultusunda A harfi için örnek kodlama aşağıdaki gibi. Diğer Commandbuttonların kelimelerini aynı şekilde ekleyeceksiniz. Tek yapmanız gereken, Array içindeki kelimeleri değiştirmek. Eklemelerden sonra anlam bulmak için de yeni kodlar eklemek gerekecektir, unutmayın.

Private Sub CommandButton1_Click()
ListBox1.Clear
Kelime = Array("AHZ", "AİDİYET", "AKAMET", "AMME", "ARİYE", "ARZETMEK", "AVDET", "AYNİYAT", "AZL")
For x = LBound(Kelime) To UBound(Kelime)
ListBox1.AddItem Kelime(x)
Next
End Sub