下面的示例用 aprinters( ) 函数创建一个存储已安装打印机的名称和它们通信端口名的数组 gaprinters，
然后显示打印机名和端口名。如果没有安装任何打印机， 程序将显示相应信息。
if aprinters(gaprinters) > 0 && 是否有安装的打印机驱动程序
clear && 清除visual foxpro主窗口
display memory like gaprinters && 显示打印机名和端口
else && 否则，没有安装打印机
wait window 'no printers installed.'
endif