我有一个名为worker.dat
的文件,在该文件中,信息列表存储为变量“收入”,“促销”,“年龄”等。
我想从文件中读取该信息并在屏幕上打印。
所以我用了
Open App.Path & "worker.DAT" For Input As #1
并使用Print
方法打印信息。
然而,为了强调,我想以更大的尺寸和不同的字体等打印一些信息。
所以我写了这个。
Printer.FontSize = 16
Printer.Print "Income = "; Income
然而这不起作用。有人如何解决这个问题?
答案 0 :(得分:0)
设置字体对象的大小:
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