With Dialog1
     .ShowSave
     Str = "select * Into [Excel8.0;database="&.FileName&"].jobs From   Customers".DefaultExt="*.XLS"
End With
在VB中此语句写在一行内,但是出现语法错误,不知如何改正,谢谢指教!