How do I open a report using CR 10 in VB 6.0?

In CR 8.5, I used to open it using Crystal Report Control
VB Code:
  1. CrystalReport1.Reset

  2.     CrystalReport1.ReportFileName = App.Path & FileName

  3.     CrystalReport1.Destination = crptToWindow

  4.     CrystalReport1.Action = 1
Thanks