|
阅读:980回复:1
MapObject23的Recordset对象效率很低不知道什么原因
<P>下面这段代码,运行时,500条记录要30秒,很慢,哪位高手指点一下</P>
<P> Public Sub FillFeatures()</P> <P> Dim frmO As frmMain = Me.Owner Dim row As DataRow Dim i As Integer Dim iCount As Integer = 0 Dim lvItem As ListViewItem Dim tt As String</P> <P> Assistant.SelectedRecordset.MoveFirst() While Not Assistant.SelectedRecordset.EOF lvItem = New ListViewItem(Assistant.SelectedRecordset.Fields.Item(arrCols(0)).ValueAsString) For i = 1 To iFieldCount - 1 lvItem.SubItems.Add(Assistant.SelectedRecordset.Fields.Item(arrCols(i)).ValueAsString) Next lvFeatures.Items.Add(lvItem)</P> <P> Assistant.SelectedRecordset.MoveNext() iCount += 1</P> <P> lblFeatureCount.Text = iCount.ToString() End While 'lblFeatureCount.Text = iCount.ToString() End Sub</P> |
|
|
1楼#
发布于:2005-05-25 09:12
没法啦!
|
|
|