The best solution would be to fix you report, but I'm not familiar with crystal. To answer you question, yes, you can select fake/static data:

Code:
        Dim roneveshtQuery = _
        "SELECT r.FldNosabt, r.FldCodeMabda, r.FldVahedName,'','','',''" & Environment.NewLine & _
        "FROM tblRonevesht r" & Environment.NewLine & _
...