如何在datagrid中显示所选值? vb 6

时间:2014-02-19 04:28:32

标签: vb6

我正在尝试获得数量少于15的药物的价值并将其显示在datagrid中。例如,我的扑热息痛剂量为15或更少,那么扑热息痛将自动显示在数据网格中。我有一个表名称库存,字段名称为MedicineName,Genericname,StockQuantity等。我的问题是数据库显示中的所有记录。 请帮我。谢谢..

这是我在adodc连接中的代码 从库存中选择StockQuantity


Private Sub Form_Load()
  Adodc2.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & App.Path & "\clinic.mdb" & ";Persist Security Info=False"
Adodc2.RecordSource = "select * from inventory order by StockQuantity asc"
Set DataGrid2.DataSource = Adodc2
Adodc2.Refresh

IF  StockQuantity <= 15 then Adodc2.Recordset(“StockQuantity”)
End If
End sub

1 个答案:

答案 0 :(得分:1)

如果您需要过滤结果,只需检索已过滤的列表,而不是获取所有数据并在数据表级别添加过滤器。

您只需修改查询;

Adodc2.RecordSource = "select * from inventory where StockQuantity < 15 order by StockQuantity asc"