listboxda bazı kolonların sayısal değer olması

[udentr2002]

Merhaba arkadaşlar,
Listboxda 12 kolonum var. Bu kolonların bazılarının sayısal değer olmasını ve bu değerlerin virgülden sonra 2 haneye olarak gösterilmesi için ne yapabilirim.
Şimdiden ilgilenen arkadaşlarıma teşekkür ederim.

Saygılarımla

 

[EmrExcel16]

Deneyiniz..

For i = 0 To ListBox1.ListCount - 1
    ListBox1.List(i, 0) = CDbl(Format(ListBox1.List(i, 0), "0.00"))  '1. kolon
    ListBox1.List(i, 4) = CDbl(Format(ListBox1.List(i, 4), "0.00"))  '5. kolon
    ListBox1.List(i, 9) = CDbl(Format(ListBox1.List(i, 9), "0.00"))  '10. kolon
Next i

 

[udentr2002]

Hocam çok teşekkürler
ellerine sağlık

Deneyiniz..

For i = 0 To ListBox1.ListCount - 1
    ListBox1.List(i, 0) = CDbl(Format(ListBox1.List(i, 0), "0.00"))  '1. kolon
    ListBox1.List(i, 4) = CDbl(Format(ListBox1.List(i, 4), "0.00"))  '5. kolon
    ListBox1.List(i, 9) = CDbl(Format(ListBox1.List(i, 9), "0.00"))  '10. kolon
Next i

 

[EmrExcel16]

Hocam çok teşekkürler
ellerine sağlık

Rica ederim , iyi çalışmalar.