台湾led芯片:vb的小问题?

来源:百度文库 编辑:高校问答 时间:2024/04/27 21:41:04
要添加Data1_Reposition ()控件需要在控件表上添加什么样的部件

本例使用 Reposition 事件更新一个标题列表,它们来自 BIBLIO.MDB 示例数据库中的 Publisher。首先在一个窗体上放一个 DataGrid,一个 TextBox 和两个 Data 控件。将两个 Data 控件的 DatabaseName 属性设置为 BIBLIO.MDB 示例数据库。将 Data1 的 RecordSource 属性设置为 Publisher。将 Text1 的 DataSource 属性设置为Data1,DataField 属性设置为 Name。将 DataGrid1 的 DataSource 属性设置为 Data2。添加下列代码:

Private Sub Data1_Reposition()
'选择由 Data1 中的
'当前记录所发布的全部标题
Data2.RecordSource = "Select * from Titles where PubID = " & Data1.Recordset("PubID")
Data2.Refresh ' Rebuild the recordset
End Sub

用 Data1 在 Publishers 记录集中移动时 DataGrid 控件中的标题列表自动更新。