Private Sub Command1_Click()
Set MSFlexGrid1.DataSource = Data1
MSFlexGrid.Refresh
End Sub
Private Sub Command2_Click()
Set MSFlexGrid1.DataSource = Data2
MSFlexGrid.Refresh
End Sub
Or you can do this by changing the Data control [RecordSource
Code:
Private Sub Command1_Click()
Data1.RecordSource = "SELECT * FROM <New Table>;"
Data1.Refresh
End Sub