如何使用print方法

Question

我有一个名为worker.dat的文件，在该文件中，信息列表存储为变量“收入”、“晋升”、“年龄”等。我想从文件中读取这些信息并打印在屏幕上。

所以我用了

Open App.Path & "worker.DAT" For Input As #1

并使用Print方法打印信息。

然而，为了强调，我想用更大的尺寸和不同的字体等打印一些信息。

所以我写了这个。

Printer.FontSize = 16  
Printer.Print "Income = "; Income 

然而，这并不起作用。有谁知道如何解决这个问题吗？

Answer 1

设置字体对象的大小：

Dim pt As Long

With Printer.Font
    pt = .Size

    Printer.Print "default text"

    .Size = 16
    Printer.Print "larger text"

    .Size = pt
    .Bold = True
    Printer.Print "bold ";
    .Bold = False
    Printer.Print "in default size"

    Printer.EndDoc
End With