(给分)武汉一家公司招聘VB程序员出了这样一个题,求助高手帮忙解答出来

Question

我朋友会这个，给你他的邮箱：[email protected]

Answer 1

Sub PrintOnScreen()    Form1.BackColor = &H80000009    Form1.Scale (0, 0)-(100, 100) '设置坐标    Form1.Line (100, 0)-(0, 100) '显示画线    Form1.CurrentX = 0    Form1.CurrentY = 0    Form1.FontName = "黑体" '输出文字    Form1.FontSize = 20    Form1.Print "模拟打印"
    Form1.Print "|-----------------------------------|"
    Form1.Print "|项目|          |项目编码|220203167 |"
    Form1.Print "|----|----------|--------|----------|"
   
    Form1.PrintForm '将显示窗体的内容送到打印机    Printer.EndDoc '开始打印End Sub
搜索出来的关键是要有图形打印的思维嘿嘿，估计都没在DOS下做过程序

Answer 2

呵呵，如果你用过FoxBase的话，就知道这个东西比较好弄了
主要是细心

Answer 3

用PictureBoxpicture1.line(x,y)-(x1,y1)
这样慢慢画,这样，可以做成预览打印时，换成Printer.line(x,y)-(x1,y1)这类型的东东我做得多了。
主要是细心的画