basic - 我可以将整个控制台保存为字符串变量吗?

标签 basic qb64

我试图在程序末尾获取整个控制台文本并将其保存为字符串变量。然后我将获取字符串变量并将其保存为文本文档。解决这个障碍的最佳方法是什么?谢谢!

最佳答案

我认为此解决方案可能有助于解决您的问题。

下面的Qbasic代码需要一个文本文件来读取,它读取文件的前九行并在屏幕上打印,然后在控制台的后半部分复制前十行的内容,从屏幕内存中读取字符.

SCREEN 0

INPUT "File name: ", fname$

OPEN fname$ FOR INPUT AS #1

x = 9
WHILE NOT EOF(1) AND x <> 0
  INPUT #1, x$
  PRINT x$
  x = x - 1
WEND
CLOSE #1

PRINT "----------------------------------"

REM HERE THE PROGRAM READS THE SCREEN
LOCATE 12, 1
FOR y = 1 TO 10
  FOR x = 1 TO 80
    PRINT CHR$(SCREEN(y, x, 0));
  NEXT x
NEXT y

关于basic - 我可以将整个控制台保存为字符串变量吗?,我们在Stack Overflow上找到一个类似的问题: https://stackoverflow.com/questions/62313117/

相关文章:

flat-file - 如何说服编程团队放弃旧方法?

basic - TAB 子例程 Applesoft BASIC 出错

BASIC:函数名称末尾的感叹号是什么意思?

basic - basic里面有wait命令吗?

basic - QB64 控制台/显示字体大小

qb64 - 如何设置标题栏文字和应用程序图标

QBasic:如何从另一个程序中运行一个程序?

python - 计算星期几的程序