請協助。我不想過濾，而是想找到一個值，例如值 10 并跳轉到該值 10，但仍然顯示小于 10 和大于 10 的值。這個值是某種東西的大小，所以如果我沒有大小 10 我希望能夠看到更大或更小的可用尺寸，因為它們可能適合我的需要。值按升序排序因此，我不是過濾資料，而是跳轉到值 10，并且應該能夠向上或向下滾動以查看小于或大于我的值的值。如果值 10 不可用，它可以跳轉到下一個更大的值。我下面的代碼沒有選擇我搜索的值，它只是從零開始顯示。
Sub search()
Try
DataGridRecords.Rows.Clear()
conn.Open()
Dim cmd As New OleDb.OleDbCommand("Select * from tblDies where `IDSIZE` <> " & txtIdSize.Text & " ", conn)
dr = cmd.ExecuteReader
While dr.Read
DataGridRecords.Rows.Add(dr.Item("ID"), dr.Item("DIENUMBER"), dr.Item("DESCRIPT"), dr.Item("OLDNUMBER"), dr.Item("CODE"), dr.Item("QUANTITY"), dr.Item("IDSIZE"), dr.Item("ODSIZE"), dr.Item("HEIGHT"), dr.Item("FLANGE HT"), dr.Item("FLANGE DIA"), dr.Item("CuRef"), dr.Item("CUTEL"), dr.Item("CuContact"), dr.Item("Price-selling"), dr.Item("P/no"), dr.Item("Stoksize"), dr.Item("Material"), dr.Item("Shore"), dr.Item("DieChkd"), dr.Item("DIECOST"), dr.Item("DATE"), dr.Item("REMARKS"), dr.Item("PRREF"))
End While
DataGridRecords.Sort(DataGridRecords.Columns(6), System.ComponentModel.ListSortDirection.Ascending)
dr.Close()
Catch ex As Exception
MsgBox(ex.Message)
End Try
conn.Close()
End Sub
uj5u.com熱心網友回復：
不要將資料直接添加到您的網格中。填充 aDataTable并通過 a 將其系結到網格BindingSource。如果你需要排序（你應該默認使用查詢）然后設定Sort屬性。BindingSource有一個回傳索引的Find方法，您可以將其分配給它的Position屬性。
Dim table As New DataTable
table.Load(myDataReader)
myBindingSource.DataSource = table
myDataGridView.DataSource = myBindingSource
myBindingSource.Position = myBindingSource.Find(columnName, value)
uj5u.com熱心網友回復：
<> 此符號表示不相等，請嘗試類似 Select * from tblDies where IDSIZE>= ? 或IDSIZE<= ？
轉載請註明出處，本文鏈接：https://www.uj5u.com/houduan/496420.html