可以 用LPRINT语句
例如：
LPRINT "打印测试....test"

也可以用OPEN .....
QB把LPT端口还有COM口。。。。等等都当作一个文件

还有个方法，把结果输出到记事本里，在再WIN中打印
PRINT语句里如果加上文件号就是输出到文件
PRINT #文件号，内容
例如:我们要做一个成绩单,把六门课的成绩保存到文件里.
步骤:1 打开建立一个文件 2 输入成绩  3 把输入的数据写到文件里 4 显示你的成绩单
OPEN "成绩单.TXT" FOR OUTPUT AS #1
PRINT #1,"6门课的成绩单"
FOR I=1 TO 6
    PRINT "请输入第"; I; "门课的成绩__";
    INPUT N
    PRINT #1,"请输入第";I;"门课的成绩__",N
NEXT I
CLOSE
SHELL "NOTEPAD 成绩单.TXT"
这时就能看到你生成的文件了!
SHELL 可以调用外部的命令、程序 。  这个NOTEPAD实际上就是记事本
这个例子是我置顶的帖子《写给真正想学编程的初级教程，从0起步！》中的 一个例子

lprint语句功能与print基本相同，不同的是前者打印而后者显示，还有就是TAB的用法上有些限制(lprint中tab不能先后颠倒--这是我印象中的，现在是否还有此限制？)。

1楼的方法不错！解决了我的大问题，可是为什么xp系统里运行完程序，文件倒是存在，但有的机器上用记事本能打开TXT文档，有的打不开，说命令错误，就是最后那句无效。什么原因，系统的服务限制？

另外在XP系统里，用Ctrl+Esc切换到桌面后，为什么有的机器可以再回到原qb界面，有的却是黑屏，连显示器都灭了，但用Ctrl+Esc还可再切换回桌面，郁闷！求高人指点，怎么调系统？

OPEN "LPT1" FOR OUTPUT AS #1
PRINT #1,"6门课的成绩单"
FOR I=1 TO 6
    PRINT "请输入第"; I; "门课的成绩__";
    INPUT N
    PRINT #1,"请输入第";I;"门课的成绩__",N
NEXT I
CLOSE

to 3楼：

QB中文件操作时，要注意最后要关闭文件。
关闭文件一般有两种形式：
一种是显式关闭，也就是用close来关闭打开的文件；一种是隐式关闭，也就是关闭QB系统时，QB系统先要关闭所有相关文件，也包括用open打开的文件。

文件在QB中关闭后，才能正常地用其它软件打开。

呵呵,在DOS中QB中没关闭文件,其他程序一样可以打开的.

打开是可以的，你要是还想编辑，可就要慎重了。我不建议你这么做。

有一个特殊的用法
就是在QB中用不同或相同的文件方式打开同一个文件
open f$ for input as #1
open f$ for binary as #2
用的时候要小心喔,但却很好用喔.