Qbasic中的粗体输出文本

时间:2014-01-22 19:04:11

标签: qbasic

我正在尝试在输入文本字段中获取粗体特定文本。我不确定如何解决这个问题,因为q基本代码没有在文本字段中解释,我试过了

10 REM PROGRAM TO PRINT A BOLD STRING 
15 CLS
18 PRINT "PLEASE INPUT YOUR MATRIC NUMBER"
20 INPUT M$
30 PRINT TAB(15); "YOUR MATRIC NUMBER IS "; M$; 
40 END

2 个答案:

答案 0 :(得分:2)

您可以使用屏幕模式0在monocrome显示屏上打印带下划线的文字。

然后你必须将前景色设置为1(带下划线)。

当您在屏幕上打印时,每个字符都带有下划线!

所以,例如:

CLS
SCREEN 0
COLOR 1
PRINT "This String will be printed underlined."
END

另一种解决方案是在其他屏幕模式下使用LINE命令在所需字符下方画一条线:

CLS
SCREEN 8
PRINT "This String will HOPEFULLY be printed underlined."
LINE (0, 10)-(100, 10)
END

你必须自己计算出行位置,这样你的行才会显示在字符下面。

答案 1 :(得分:0)

在文字后放置下划线:

PRINT "This is a line of text."
PRINT "-----------------------"

否则,无法在一行的基础上为文本加下划线。