Liste kutusundaki satırları aşağı yukarı taşıma
#1
öncelikle liste kutusunun kayıtları değer listesi şeklinde olmalıdır. bunu bu şekilde belirttikten sonra
Visual Basic
  1. Dim degeri As String
  2. Dim indeksi As Integer
  3. indeksi = Liste0.ListIndex
  4. degeri = Liste0.Value
  5. If indeksi >= 1 Then
  6. Liste0.RemoveItem (indeksi)
  7. Liste0.AddItem degeri, indeksi - 1
  8. Else
  9. MsgBox "Zaten en başta"
  10. End If


kodu ile yukarı
Visual Basic
  1. Dim degeri As String
  2. Dim indeksi As Integer
  3. indeksi = Liste0.ListIndex
  4. degeri = Liste0.Value
  5. If indeksi < Liste0.ListCount - 1 Then
  6. Liste0.RemoveItem (indeksi)
  7. Liste0.AddItem degeri, indeksi + 1
  8. Else
  9. MsgBox "En sona ulaşmış durumdasınız"
  10. End If


kodu ile aşağı taşıyabiliriz


Eklenti Dosyaları
.rar   LİSTE İNDEKS.rar (Boyut: 10,74 KB / İndirilme: 196)
Teşekküre gerek yok, Taş atın yeter!!!



  Alıntı
Bu mesajı beğenenler:
#2
Ben teşekkür edeyim,
taşı başkaları atsın,
ben bilgi veren kafalara taş atamam.



  Alıntı
Bu mesajı beğenenler:
#3
Her Programcının Arşivinde bulunması gereken bir Örnek



  Alıntı
Bu mesajı beğenenler:
#4
teşekkürler



  Alıntı
Bu mesajı beğenenler:
#5
teşekkürler



  Alıntı
Bu mesajı beğenenler:
#6
teşekkürler sayın adnan bey



  Alıntı
Bu mesajı beğenenler:


Benzer Konular...
Konu: Yazar Cevaplar: Gösterim: Son Mesaj
  Dosya taşıma beab05 2 3.225 29-05-2014, 14:18
Son Mesaj: sel306
  Klasörün İçeriğini Kople taşıma (Dosyaların oluşturma tarihine göre) kaan2000 4 2.625 29-04-2013, 11:41
Son Mesaj: kaan2000
  Klasörün İçeriğini Kople taşıma kaan2000 1 1.584 26-04-2013, 09:13
Son Mesaj: dazi
  Liste kutusundaki verileri yukarı aşağı taşıma (kaydırma) jon206 11 5.871 09-11-2012, 10:40
Son Mesaj: umutakkaya
  Kenarlıksız Form Taşıma furkan_68200 13 7.604 30-08-2012, 10:33
Son Mesaj: furkan_68200
access-sql-1 Metin Kutusundaki Karakter-Satır Sayısı ve Sınırlamasısı furkan_68200 9 4.418 12-07-2012, 17:41
Son Mesaj: kurt26

Foruma Git:


Bu konuyu görüntüleyen kullanıcı(lar): 1 Ziyaretçi