Currency format for listview items in vb.net

For k = 1 To DSDs.Tables(0).Columns.Count - 1
               If k = DSDs.Tables(0).Columns.Count - 1 Then
                 lstrow.SubItems.Add(CDbl(DSDs.Tables(0).Rows(j)k).ToString()).ToString("N2"))
                Else
                            lstrow.SubItems.Add(DSDs.Tables(0).Rows(j)(k).ToString)
                End If

Next