Liste Toplam İşleminde Filtre Yaparken Run Time Error '13' Hatası

Değerli hocalarım iyi akşamlar öncelikle. Ekte gönderdiğim form örneğinde Run Time Error 13 hatası alıyorum. Uzun süre uğraştım ancak sonuca varamadım. 

Sorunum; Listede verilerim var. Listeye hiç dokunmadığım zaman filtreleme yaptığımda herhangi bir sorun ile karşılaşmıyorum.
Ancak filtreleme yapıp listeden bir kayıt seçtiğimde, aynı filtreye benzer bir filtre yapmak istediğimde hata veriyor. Hatayı veren kod listedeki verileri sayan kod. (hesapla kodu)

video görüntüsü de yükledim. filtrelemelerim normal çalışıyor. eğer filtrelenecek kayıtlarla ilgili bir kayıt seçili ise orada hata veriyor. saygılar sunarım.

Merhaba
toplam = toplam + [listbox].Column(1) burda sanırım Metin var ve toplam ondan dolayıyapmıyor

toplam = toplam + [listbox].Column(0)
şeklinde değiştirin

Teşekkürler hocam. saoğlun. bazen gözümüzün önündeki en basit şeyleri göremiyoruz. yardımınınız için  teşekkürler. Hayırlı günler dilerim.