print方法的问题，有人能解决么？

Question

你难道没有试这一段小程序？
Private Sub Command1_Click()
          Picture1.Print "袁飞"
          Picture1.DrawMode = 2
          Picture1.Line (0, 0)-(Picture1.Width, Picture1.Height), , BF
End Sub

Answer 1

我觉得用paintpicture+图片叠加的效果比较好，而且便于控制。
图片叠加功能imagelist控件自己就有，连bitblt都省了。

Answer 2

Picture1.ForeColor=RGB(255,0,0) '红色
Picture1.Print "..."

Answer 3

去看看windows中device context(设备场景)的概念。
你是没有办法“单独”改变什么方法的属性的。

Answer 4

把前景色改成其它颜色。如RGB（0，255，0）'绿色