listbox'ta görüntü kirliliği

[volkangandalf]

Listbox' a farklı sayfalardan veri aldığımda
1-)
ReDim Preserve list2(1 To 15, 1 To z + sat)
z = z + 2
For j = 1 To 14
list2(j + 1, z) = list1(1, j + 2)
Next

koduyla bir satır boşluk bırakarak sayfaların başlık kısmını alıyorum
2-)
z = z + 1
For j = 1 To 14
list2(1, z) = myarr(k)
list2(j + 1, z) = list1(i, j + 2)

koduylada sayfada, kriterime uyan verileri alıyorum.
Benim sorum [ 2-) nolu kodlar] uygun veri olmadığında 1-) nolu kodların çalışmasını önlemek ve diğer sayfa için devam etmek.
Çünkü bu haliyle görüntü kirliliği yapıyor (Resim ekte)

İlgilenenlere teşekkür ederim.

 

[volkangandalf]

başlık kısmını yüklemeden sayfada uygun veri olup olmadığını kontrol etmemiz gerekiyor herhalde de nasıl yapılır bilmiyorum

 

[volkangandalf]

başlık kısmını yüklemeden sayfada uygun veri olup olmadığını kontrol etmemiz gerekiyor herhalde de nasıl yapılır bilmiyorum

Öyle de yaptım:biggrin:
Sorgu ve listbox'a veri aktarmak için kullandığım bütün kod grubunu 1-) nolu kodun önüne farklı indislerle yeniden yazdım. satır sayısını kontrol ettirip değişmiyorsa diğer sayfaya geçirttim. Biraz fazla kod kullansam da istediğim oldu.
İlginiz için teşekkür ediyorum.