Microsoft KB Archive/171318

= How To Bind Data Controls Across Multiple Forms =

Article ID: 171318

Article Last Modified on 6/29/2004

-

APPLIES TO


 * Microsoft Visual Basic 4.0 Professional Edition
 * Microsoft Visual Basic 5.0 Professional Edition
 * Microsoft Visual Basic 6.0 Professional Edition
 * Microsoft Visual Basic 4.0 Enterprise Edition
 * Microsoft Visual Basic 5.0 Enterprise Edition
 * Microsoft Visual Basic 6.0 Enterprise Edition

-



This article was previously published under Q171318



SUMMARY
The information in this article demonstrates how to bind two Data Controls on separate forms and have the bound controls updated to scroll through the same recordset.



MORE INFORMATION
With Microsoft Visual Basic, you can assign or set the RecordSet property of a Data Control to any other recordset, including an existing Dynaset, Snapshot, or Table object. In addition, you can update the bound fields of the Data Control to reflect changes in the recordset. This allows all bound fields on all open forms to scroll through the same recordset.

Step-by-Step Example
 In Visual Basic, start a new project. Form1 is created by default. Add a data control (Data1) and two text boxes (Text1 and Text2) to Form1.  Using the following table as a guide, set the following properties of the controls on Form1:   Control     Property        Value --  Data1       DatabaseName    BIBLIO.MDB Data1      RecordSource    Titles Text1      DataSource      Data1 Text1      DataField       Title Text2      DataSource      Data1 Text2      DataField       Year Published   Add the following code to the Load event of Form1. Sub Form1_Load Data1.Refresh ' Data control must be refreshed before ' showing form2. Form2.Show    ' Load second form that refers to data control ' on this form. End Sub  Add a second form to the project. Form2 is created by default. Add a data control (Data1) and two text boxes (Text1 and Text2) to Form2.  Using the following table as a guide, set the following properties of the controls on Form2:   Control     Property        Value --  Text1       DataSource      Data1 Text2      DataSource      Data1   Add the following code to the Form_Load event of Form2. Sub Form_Load Text1.DataField = "Subject"  ' Assign the bound field values. Text2.DataField = "Comments" Set Data1.Recordset = Form1.Data1.Recordset ' This is the key. End Sub </li> Press the F5 key to run the program. The two forms should display on the screen. When you click either Data Control to scroll through the recordset, the bound fields on both forms will scroll at the same time.</li></ol>

Additional query words: kbVBp500 kbVBp600 kbdse kbDSupport kbVBp kbVBp400 kbCtrl

Keywords: kbhowto KB171318

-

[mailto:TECHNET@MICROSOFT.COM Send feedback to Microsoft]

© Microsoft Corporation. All rights reserved.