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为空。