|
|
Private Sub Form_Load() Me.Caption = Forms![].[TreeView1].SelectedItem Me.RecordSource = "Select * from " & Forms![].[TreeView1].SelectedItem End Sub
Private Sub Form_Load() Me.Caption = Forms![].[TreeView1].SelectedItem Me.RecordSource = "Select * from " & Forms![].[TreeView1].SelectedItem , , , End Sub