标记用户的选择 SelBookmarks 集合包含所有选定的记录的书签。当最终用户手工选择记录时(即在单击时按住 CTRL 键),每一个选定的记录的书签都会加入到该集合中。使用标准的循环,用户可以知道已经选定了什么,也可以保存书签(因为可能需要恢复某个值),以及执行操作: Dim i as Integer ’ 计数器 Dim intCount As Integer intCount = DataGrid1.SelBookmarks.Count - 1 ReDim arrSelBK(intCount) ’ 声明用于保存书签的数组。 For i = 0 To intCount ArrSelBK(i) = DataGrid1.SelBookmarks(i) ’ 在此处执行操作。如果该操作必须被 ’ 取消,则退出该循环,然后使用该数 ’ 组来取消这些更改。 Next i
通过在程序中添加到 SelBookmarks 集合来选择记录 通过将记录添加到这个集合,也可以在程序中选定记录。例如,可能有一个显示指定的客户所有订货的网格。如果要高亮显示该客户花费超过 $100的所有记录,则对记录进行过滤,并将结果书签添加到 SelBookmarks 集合。 Dim rs As Recordset Set rs = Adodc1.Recordset
While Not rs.EOF If rs!SupplierID = 12 Then DataGrid1.SelBookmarks.Add rs.Bookmark End If rs.MoveNext Wend
显示计算结果字段 假设在表中有一个名为 "Price" 的字段,并且想使用本地税率来计算表中每一项的税费。这就是一个计算结果字段,可以通过修改 DataSource 的查询来计算这个值,并把这个值返回给 DataGrid 控件。 要在 DataGrid 控件中创建一个计算结果字段 1. 确认在机器上已为 Northwind 数据库建立了一个OLE DB 数据源;如果还没有创建这样的一个数据源,请按照“创建 Northwind 的OLE DBData 连接”的步骤操作。 2. 在窗体上放置一个 ADO Data 控件和一个 DataGrid 控件。 3. 将 ADO Data 控件的ConnectionString 属性设置为 Northwind 的数据源。 4. 设置 ADO Data 控件的 RecordSource 属性。在“属性”窗口中,单击“记录源”并输入 Select ProductName, UnitPrice,(UnitPrice * .082) As Tax From Products。 5. 将 DataGrid 控件的 DataSource 属性设置为这个 ADO Data 控件。 6. 运行该工程。