data environment 1 . connection 1 . Open '打開連接。
FindStr = Str1 '查詢字符串
調用data environment 1 . RS command 1 . open(Findstr，data environment 1 . connection 1，adopenkeyset，adlockoptimal)'來執行查詢。
數據報告1。顯示'打開報告編輯器，然後妳可以打印它。
這是我以前做的壹個程序，在指揮下。程序其實很簡單，就是設計報表編輯器就行了。