帮我看看这个动态加载数据到listView的函数!
cp07 2003-08-20 01:24:57 function inputListView()
If MyConnection.State = ConnectionState.Closed Then MyConnection.Open()
dim MySql_Cust as string="select ref_no,cust_simp,papymant_ccy from GBCUST"
Dim cmd As SqlCommand = New SqlCommand(MySql_Cust, MyConnection)
Dim rd As SqlDataReader
rd = cmd.ExecuteReader
Do While rd.Read
Dim i As Integer = 0
Do While rd.Read
ListView1.Items(i).SubItems.Add(rd("ref_no"))
ListView1.Items(i).SubItems.Add(rd("cust_simp"))
ListView1.Items(i).SubItems.Add(rd("payment_ccy"))
i = i + 1
Loop
Loop
rd.Close()
cmd.Dispose()
If MyConnection.State = ConnectionState.Open Then MyConnection.Close()
ListView1.Refresh()
End function
为什么第一列加载不到,为什么rd("paymenu_ccy")会出错,而rd("ref_no")却没事?是不是哪个地方写错了!