Listboxtan TextBox'a Veri Alırken Hata

[Astalavista58]

Merhabalar herkese hayırlı günler dilerim.,
Bu kod ile TextBoxa tarih verisi girerken noktalarını kendisi koyuyor, ancak listboxta double click ile textboxa veriyi aktarırken, tarihi formatında gelmiyor. bu sorunu nasıl çözebilirim

Private Sub tbSilahTeslimTarihi_Change()
    tbSilahTeslimTarihi.MaxLength = 10
    Select Case tbSilahTeslimTarihi.SelStart
        Case Is = 2, 5
        tbSilahTeslimTarihi.SelText = "."
    End Select
End Sub

bu kod ile listboxtan tarihin olduğu textboxa veriyi aktarıyorum

tbSilahTeslimTarihi.Value = listSilahsiz.List(listSilahsiz.ListIndex, 6)

 

[Ömer]

Merhaba,

Deneyiniz.

tbSilahTeslimTarihi.Value = Format(listSilahsiz.List(listSilahsiz.ListIndex, 6), "dd.mm.yyyy")

 

[Astalavista58]

Çok çok teşekkür ederim Ömer bey, bende format formülünü kullanmayı denedim ama yanlış kullanmışım. Hayırlı akşamlar