列表视图SubItem将Int转换为视图数字

时间:2015-09-23 03:27:12

标签: vb.net listview

Dim rcc As String

Try       
    rcc = saaoblv.SelectedItems(0).Text
    strSQL = "SELECT * from budget  where ctrl = '" & rcc & "' and types = 'MOOE'"
    CONNECTION.Open()
    cmd = New MySqlCommand(strSQL, CONNECTION)
    dr = cmd.ExecuteReader()

    MOOElv.Items.Clear()

    Do While dr.Read()

        Dim lv As New ListViewItem(dr("Particular").ToString())
        lv.SubItems.Add(dr("Ep").ToString())
        lv.SubItems.Add(CInt(dr("Allotment")).ToString("#,##0.00"))
        lv.SubItems.Add(CInt(dr("Obligation")).ToString("#,##0.00"))
        lv.SubItems.Add(dr("Balance").ToString())

        MOOElv.Items.AddRange(New ListViewItem() {lv})

    Loop
    dr.Close()
    CONNECTION.Close()
    cmd.Dispose()
Catch ex As Exception
    MOOElv.Clear()
End Try

lv.SubItems.Add(CInt(dr("Allotment")).ToString("#,##0.00"))
lv.SubItems.Add(CInt(dr("Obligation")).ToString("#,##0.00"))

我想在ListView中将分配,义务和余额显示为货币或数字,但只有一列有效。如果我如上所述转换其他的,它将使我的ListView为空。

0 个答案:

没有答案