Soru Listview de Toplama

[sirkülasyon]

Üstadım;
Listview1 "Öğrenci Sayısı" (4.Sütun) başlıklı sütunun toplamını Textbox10' a aldırmak istiyorum. Rica etsem yardımcı olabilir misiniz?

 

[Mahmut Bayram]

Dim i As Integer
Dim Toplam As Double
 
    For i = 1 To ListView1.ListItems.Count
        Toplam = Toplam + ListView1.ListItems(i).SubItems(3)
    Next
    
TextBox10.Text = Val(Toplam)

Dener misin.

 

[sirkülasyon]

Teşekkür ederim