我通过将数据源拖到表单上创建了一个TableAdapter,它填充了一个数据网格。包含数据的表有300,000行,我只想在datagrid中有5-10行。所以我添加了一个这样的过滤器:
Private Sub frmCertPremEdit_Load(sender As Object, e As EventArgs)
Handles MyBase.Load
Dim lngID As Long
If Not Long.TryParse(frmMain.txtCertID.Text, lngID) Then Exit Sub
CertPremiumBindingSource.Filter = "CertID = " & lngID.ToString
CertPremiumTableAdapter.Fill(Me.CertPremium._CertPremium)
Adapter.Fill语句暂停5-10秒。 CertID是主键,此过滤器的其他用途返回瞬时结果。似乎我正在做的事情出了问题。
这需要5-10秒吗?如果没有,那么正确的方法是什么?